pitcher_

La función "Si" te puede ayudar como esta : =SI(A1=B1;"Si";"No") o tambien dando una consulta al resultado : =SI(D1=VERDADERO;"SI";"NO")

Solo agregue en tu código un "\" cuando das la ruta del archivo y funciono. Y deje como comentario objMessage. Display por que anterior mente haces al objeto un log off y funciona. Public Sub SendMail() 'On Error GoTo Err_SendMail Dim objOutlook As...

Disculpa la demora en contestar, pero no tenia tiempo. Mira pega este código: Sub Puesto() Ciclo = Range("E65535").End(xlUp).Row Range("A2:E" & Ciclo).Select Selection.Sort Key1:=Range("E1"), Order1:=xlDescending, Header:=xlGuess, _ OrderCustom:=1,...

Para identificar la ultima columna es de la siguiente manera Aux = Range("IV16").End(xlToLeft).Column

Para que te agregue los valores en la misma celda es así. ActiveCell.Value = "" For I = 1 To 3 If Me.Controls("Checkbox" & I).Value = True Then ActiveCell.Value = ActiveCell.Value & " " & Me.Controls("checkbox" & I).Caption & vbCrLf End If Next I

Se puede hacer, tengo varias ideas de como hacerlo. Este código es cuando uno abre el archivo y revisa tu fórmula de =DIAS360(HOY();A5) y si el menor a 3 envía el mensaje. Este código debes pegarlo en ThisWorkbook Private Sub Workbook_Open() If...

Por más que intente darle al recordset la consulta de access no me fue posible, creo que lo único que tienes que hacer es darle la sentencia de Sql. Suerte Pitcher !

Que te parece si me envías el archivo a victorpalmacastro@hotmail. Así podre trabajar directamente en lo que necesitas y vemos que se puede hacer. Saludos Pitcher!

Este código es como para orientarte en lo que tu quieres. Si ya tienes el archivo guardado con los nombres. Mira este código lo tienes que pegar en la hoja el cual están los nombres. Private Sub Worksheet_Change(ByVal Target As Range) Dim Filas,...

Intenta seleccionar el rango de la siguiente manera: Sheets("Hoja2").Range("A1").Select Se produce este error por que el commandbutton1 (botón), esta como objeto en la hoja1. Es por este motivo que se debe dejar de esta manera.

He generado para ti dos códigos, los cuales uno es para grabar la lista de nombres y te crea un archivo txt en C:\. Y otro código para cargar los datos guardados en el archivo de texto. Mira copia estos códigos en la planilla donde están los Nombres...

Deshabilita la seguridad de macro en el 2003 es : - Herramientas - Macro - Seguridad - Pon la opción bajo y listo. En 2007 es : - Boton de office (el boton de la esquina superior izquierda) - Opciones de Excel (esta al lado del boton Salir de excel)...

Te da error por que en VBA no esta establecido el App. Path y este comando es reemplazado por ActiveWorkbook. Path, desarrolle un código para lo que necesitabas: Sub abrir() StrCarpeta =ActiveWorkbook.Path + "\" ChDir StrCarpeta StrArchivos =...

Se produce el error por que con este comando Range("a15:a38"). Value, tratas de ver el valor de un rango. Te recomiendo que lo hagas por separado y no en rango. Si necesitas borrar todos los registros #N/A. Te recomiendo hacer esto : Cells.Select...