Hola, alguien sabrá como le puedo hacer para que en una celda me ponga sólo mayusculas, aunque escriba en minusculas??, es decir, si capturo una palabra en minúsculas las convierta en mayúsculas una vez que me cambie de celda.

Gracias por las aportaciones.
Saludos.

en excel no se puede hacer eso directamente, podrias capturar los datos mediante una macro o ventana de captura, o vincular a otra celda con la formula =MAYUSCULAS(TEXTO)

Basicamente es esta macro:
[code:1:90b01766be]Sub Captura_Datos()
Dim Nombre As String
Dim Ciudad As String
Dim Edad As Integer
Dim fecha As Date
Worksheets("Sheet1").Activate
ActiveSheet.Range("A1").Activate
' Buscar la primera celda vacía de la columna A y convertirla en activa
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Activate
Loop
Nombre = InputBox("Entre el Nombre (Return para Terminar) : ", "Nombre")
' Mientras la variable Nombre sea diferente a cadena vacía
Do While Nombre <> ""
Ciudad = InputBox("Entre la Ciudad : ", "Ciudad")
Edad = Val(InputBox("Entre la Edad : (Debe ser Número)", "Edad"))
fecha = CDate(InputBox("Entra la Fecha : (con formato de Fecha dd/mm/yy )", "Fecha"))
With ActiveCell
.Value = UCase(Nombre) 'Se antepone la función UCASE para forzar a escribir mayusculas
.Offset(0, 1).Value = Ciudad 'No se antepone función alguna, por lo que lo escribirá talcual
.Offset(0, 2).Value = Edad
.Offset(0, 3).Value = fecha
End With
ActiveCell.Offset(1, 0).Activate
Nombre = InputBox("Entre el Nombre (Return para Terminar) : ", "Nombre")
Loop
End Sub
[/code:1:90b01766be]

[list:90b01766be]UCASE([i:90b01766be]Cadena[/i:90b01766be]) = Mayusculas
LCASE([i:90b01766be]Cadena[/i:90b01766be]) = Minusculas[/list:u:90b01766be]