roargu

Dante Amor respondió: 1. El 12 y el 29 tienen en común el 2, ¿en dónde pondría el resultado? 2. Nuevamente el 12 y el 26 tienen en común el 2, ¿dónde pondría el resultado? 3. ¿Siempre son números de 2 dígitos? 4. El resultado concatenado, ¿tienes 2 opciones cuál pongo? 5....

Luis Mondelo respondió: Esta sería tu solución. En mi ejemplo el rango de números es A1:I5. Solo queda que lances esta macro y todo solucionado: (Recuerda finalizar y puntuar mi trabajo por favor) Sub aleatorio() Do valor = Application.WorksheetFunction.RandBetween(1, 89)...

arico19 respondió: Usa el siguiente código en el evento change: If Cells(1, 1).Value >= Cells(1, 2).Value Then Cells(1, 3).Activate Else Call mensaje End If Luego crea un procedimiento llamado mensaje: Private Sub mensaje() MsgBox ("La cantidad no puede superar el...

jrgces respondió: Suponiendo que las hojas se llamasen Hoja1, Hoja2 y Hoja3 y la celda la A1, el código podría ser: Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If (Sh.Name = "Hoja1" Or Sh.Name = "Hoja2" Or Sh.Name = "Hoja3") And...