Orlando Collarte respondió:
Una solución rápida puede ser algo así. Private Sub Worksheet_Change(ByVal Target As Range) addr$ = Target.Address If Target <> "" Then ActiveCell.Offset(-1, 0).Select ActiveCell.Value = UCase(ActiveCell) End If End Sub Esto lo debes poner en la...
Cambiar a Mayúsculas al abandonar celda