Victor Rodriguez

No se si con "dato" te refieres a cualquier dato o siempre el mismo dato. Si es cualquier dato, modifica la fórmula y pon: =SI(A1="";FORMULA;FORMULA+1) Si es un dato concreto: =SI(A1=dato concreto;FORMULA+1;FORMULA) En ambos casos deberás sustituir...

Sigue estos pasos y te resultará facil: Ordena por ID En la columna de ejemplo pon la formula =SI(B1=B2;concatenar(E1;";";C2);C2) y arrastra Por ejemplo en la columna D que está libre pon =LARGO(E2) y arrastra Ahora ordena por la columna D (de mayor...

A ver de que se trata... :-) [email protected]

Si tu consulta se refiere a ahorrarte picar teclas, si pones 02/02 te da como resultado 02/02/2017 si en formato de celda tienes fecha

Yo también te di una respuesta, que con rounddown solucionaba esta problemática...

Con esta macro obtendrás el resultado Sub nombres() Sheets("Tabla").Range("A2").Select m = 2 Do j = ActiveCell.Offset(0, 1).Value For i = 1 To j Sheets("Resultado").Range("A" & m) = ActiveCell.Value m = m + 1 Next ActiveCell.Offset(1, 0).Select Loop...

Si pones más información de tu caso, tal vez podamos ayudar mejor o dar una solución alternativa. Creo que tu solución podría pasar por usar la función INDIRECTO como se muestra en el enlace https://exceltotal.com/listas-dependientes/ El limite de...

Esto te solucionará el problema Sub Aleatorio() Dim numero As Integer Dim divisor As Integer x = 10 Randomize For i = 15 To 23 'CUADRO DEL LUNES Range("B" + Trim(Str(i))).Value = Int((x * Rnd()) + 1) Range("C" + Trim(Str(i))).Value = Int((x * Rnd())...

El número que te da es la edad en días. Si quieres los años deberás cambiar txt_Edad.Value = Edad por txt_Edad.Value = ROUNDDOWN(Edad/365,0)

Esta macro te debería servir: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("H:H")) Is Nothing Then If (Target.Value = "Juan Perez" Or Target.Value = "Pepe Lucho") Then MsgBox "no se puede registrar a esa persona"...