Juan Carlos González Chavarría

Juan Carlos González Chavarría

Programador en VBA, Visual Studio, Contador Privado
 273K puntos  Costa Rica @jcgonzalez31 desde - visto

Respuestas en Microsoft Excel

Respuesta en a

Comparar Texto

Tienes que crear un formato condicional (Formato-Formato Condicional) y utilizar esta fórmula =CONTAR.SI($N$8:$N$56,M8)>1. Escoges un color para distinguirlo.
Respuesta en a

Extraer las 3 uiltimas fechas

Suponiendo que los códigos están en la columna A y las fechas en B, entonces en H1 hasta H3 digito:=K.ESIMO.MAYOR(INDICE((A2:A13=F2)*B2:B13,0),8). Esto me desplegará la primera fecha, si al final lo cambio por 9, la segunda y la tercera es 10.
Respuesta en a

Comparar valores desordenados en dos columnas

puedes hacer un formato condicional (Formato-Formato Condicional). Ahí puedes poner la fórmula =CONTAR.SI($N$8:$N$56,M8)<1 Aquí estoy comparando lo que tiene la columna N con M, se escoge un color y si alguno coincide lo pondrá en el color...
Respuesta en a

Macro en Excel, If y For

Dim i As Integer For i = 1 To 700 If ActiveCell.Value = ActiveCell.OffSet(0,2).Value Then TuCodigo End If Next i Esto es una idea para que te guíes.
Respuesta en a

ListBox1.Selected

No entiendo bien tu solicitud.
Respuesta en a

Error de compilación:"Next sin For"

No entiendo bien. ¿Quieres pasarte a otra hoja con solo seleccionar el año o escogerla entre un grupo?
Respuesta en a

Conexión entre excel y sql

Tienes que poner: sql = "select * from tabla WHERE fecha >= #2000/12/01# AND fecha< #2000/12/02#" Lo demás te queda de tarea.
Respuesta en a

Macro para usar un Button y transferir información

'Declaración de Variables Dim SigFila As Long Range("A2").Select Selection.Copy Hoja10.Select 'Aquí pones la hoja donde vas a grabar. SigFila = Application.WorksheetFunction.CountA(Range("A:A")) + 1 ActiveSheet.Paste ActiveCell.Offset(1, 0).Select...
Respuesta en a

Macro en Excel

Adapta este ejemplo. Sub GetImportFileName() Dim Filt As String Dim FilterIndex As Integer Dim FileName As Variant Dim Title As String ' Configurar lista de archivos filtrados Filt = "Archivos de texto (*.txt),*.txt," & _ "Archivos Lotus...
Respuesta en a

Llevar datos a fila en serie

Veo que no pones atención a las dos respuestas. En la primera querías en la B y te dí la modificación y en la segunda te puse que tienes que crear un código similar. PERO Lógicamente con la modificación de la primera respuesta. Dim iFila As Long Dim...