calvuch

En hoja 2 columna DE pones esto: =si(si.error(coincidir(a1;hoja1!$a$1:$a$4;0);0)=si.error(coincidir(b1;hoja1!$b$1:$b$4;0);0);buscarv(a1;hoja1!$a$1:$d$4;4;falso);"")

¿Cómo estas tomando lo datos? Acá un ejemplo sencillo Private Sub UserForm_Initialize() Dim i As Integer ListBox1.Clear For i = 1 To 100 ListBox1.AddItem ActiveSheet.Range("A" & i) Next End Sub Carga al list los datos del rango A1:A100 de la hoja...

¿De dónde tomaras los datos a copiar? ¿De las celdas A1 A2 A3 o de la lista desplegable? Si es desde la lista desplegable, estas hablando de una lista ( control activex o de la que te pone automáticamente excel mediante la funcionalidad "validación...

Seguramente se actualizan las demás por que se esta incluyendo una función como =ahora(), esto cambiara cada vez que abras el libro por ejemplo. Si se desea que no se modifiquen los valores ya editados ( horas) deberían pasarse como cadenas de...

utiliza la funcion =contar.si.conjunto() ejemplo: =CONTAR.SI.CONJUNTO(A1:A8;">=20";A1:A8;"<=30") Acá cuentas en el rango A1 hasta A8 todos los valores mayores o iguales a 20 y menores o iguales que 30 Para el resto de segmento solo modificas esos valores

Para pasarle el "contenido" de un combo (como argumento) a una función pasalo así: tu_funcion(ComboBox1) Nada más.

Aplica formato al label : Ejemplo: Label1.Caption = Format(Range("A1"), "HH:MM:SS") Acá tomo el valor desde celda A1, tu cambialo por la celda en donde deseas tomar el valor Bye

Usa el evento change de la hoja así: Private Sub Worksheet_Change(ByVal Target As Range) Select Case Target.Column Case Is = 1 Cells(Target.Row, 6) = "=NOW()" Case Is = 11 Cells(Target.Row, 12) = "=NOW()" End Select End Sub En este ejemplo consideras...

Prueba Application.CommandBars("Worksheet Menu Bar").enabled = True

Prueba esto: Copia esta función en algún modulo de tu libro: Public Function sistema(dato As String) Dim sh As Integer Dim sl As Integer dato = UCase(dato) sh = InStr(1, dato, "SH", vbTextCompare) sl = InStr(1, dato, "SL", vbTextCompare) If sh > 0...