Mayusculas en la primera letra

Que tal Alejandro:
Checa este codigo, haber si te sirve,.. saludos..


Sub CambioDeLetras()
Dim Cambio As Variant, Celda As Range
Application.ScreenUpdating = False
Select Case Range("a1")
Case 1: Cambio = vbLowerCase
Case 2: Cambio = vbProperCase
Case Else: Cambio = vbUpperCase
End Select
For Each Celda In Selection.SpecialCells(xlCellTypeConstants,
xlTextValues)
Celda = StrConv(Celda, Cambio)
Next
End Sub


Jesús Peralta
Hermosillo, Sonora, Mexico
el_ultimo_profeta"alt+64"hotmail.com

"Alejandro Garcia" escribió en el mensaje
news:

¿Como puedo hacer para que una frase en minuscula, me quede luego de
una instruccion con las primera letras en mayusculas nada mas?, pero no
lo quiero con una solo instruccion. Yo se que hay una instruccion que
la realiza en Visual Basic 6 pero no me sirve esa. Deseo si es posible
hacer una rutina.

Gracias.

Hola Alejandro:

Hay una fórmula que puede hacerlo, no se si eso te interese pero de
todos modos te la pongo:

=NOMPROPIO(A1)

A1 tiene la frase que quieres que ponga con mayúsculas y minúsculas

Si, me sirve y funciona, sé de otra con StrConv, pero lo que sucede es
que debo presentar un examen, y una de las preguntas que me dieron en
el cuestionario es tratar de hacer una rutina que lo haga, no solo con
una sola instruccion sino con una rutina, y de Vbasic poco se, o mejor
dicho no recuerdo casi nada, y este algoritmo me ha dato trabajo
hacerlo.

si te sirve de algo he puesto un ejemplo que convierte
mayusculas
minusculas
nombre propio

lo puedes bajar de esta direccion

http://www.esnips.com/doc/741f71d3-...sculas.xls




http://www.esnips.com/web/MsExcel


"Alejandro Garcia" escribió en el mensaje
news:
| ¿Como puedo hacer para que una frase en minuscula, me quede luego de
| una instruccion con las primera letras en mayusculas nada mas?, pero no
| lo quiero con una solo instruccion. Yo se que hay una instruccion que
| la realiza en Visual Basic 6 pero no me sirve esa. Deseo si es posible
| hacer una rutina.
|
| Gracias.
|
|

Caballeros, gracias por sus respuestas voy a ver cual forma me sirve de
mas. Les comento luego.

Gracias.

si te sirve de algo he puesto un ejemplo que convierte
mayusculas
minusculas
nombre propio

lo puedes bajar de esta direccion

http://www.esnips.com/doc/741f71d3-...sculas.xls




http://www.esnips.com/web/MsExcel


"Alejandro Garcia" escribió en el mensaje
news:

¿Como puedo hacer para que una frase en minuscula, me quede luego de
una instruccion con las primera letras en mayusculas nada mas?, pero no
lo quiero con una solo instruccion. Yo se que hay una instruccion que
la realiza en Visual Basic 6 pero no me sirve esa. Deseo si es posible
hacer una rutina.

Gracias.