¿Como cambiar de mayusculas a minusculas?

Perfecto Jose Luis, he defino la variable, y va... perfecto.

Dim obj As Range
For Each obj In Selection
obj.Value = UCase(obj.Value)
Next obj
End Sub

Y ya lo dijo Baltasar Gracián, discípulo del genial Quevedo, "Lo bueno si
breve, dos veces bueno"; y en este foro no se habla de sexo.


"JoseLuisArg" <ForosYListas(arroba)jlf.com.ar> escribió en el mensaje
news:

para modificar el rango seleccionado:

For Each obj In Selection
obj.Value = UCase(obj.Value)
Next obj


Saludos
PD: No soy ningún mounstro... aunque.. fisicamente.. no estoy tan alejado
ja!


"Cheeky" escribió en el mensaje
news:#
> Lo suyo sería "actuar" sobre todo un rango seleccionado de celdas, y

luego

> con For each Cells in range "modificar" todo el rango seleccionado.
> No pongo el código, porque lo he intentado y no me ha salido.
> Seguro que alguno de los "monstruos" nos da la pista buena.
>
> "Javier G" escribió en el mensaje
> news:
> > Aquí te van dos líneas de código, la primera convierte a minúsculas,

la

> > segunda a mayúsculas.
> > Tiene la limitante que solo funciona en la celda actual, es decir que
> debes
> > primero seleccionar la celda antes de ejecutar la macro.
> >
> > Sub minusculas()
> > ActiveCell = LCase(ActiveCell)
> > End Sub
> > Sub mayusculas()
> > ActiveCell = UCase(ActiveCell)
> > End Sub
> >
> > Espero te sirva.
> >
> > Un Saludo.
> >
> > Javier G.
> >
> > "Carlos Baruch Santiago S." escribió en el mensaje
> > news:
> > > ¿Donde puedo conseguir una macro, para cambiar de mayusculas a
> minusculas
> > en
> > > determinadas celdas?
> > > o ¿como se podria hacer automaticamente en excel? gracias por su
ayuda!
> > >
> > >
> >
> >
>
>