Macro Excel Primera letra en MAYÚSCULAS
No quisiera otro tipo de macro, ¿por qué? Se trata de una macro de Numeros/Letras.
En esta parte
If Mayusculas = 1 Then TFNumero = UCase(TFNumero) 'MAYUSCULA Else TFNumero = LCase(TFNumero) 'minúscula Else TFNumero = ¿aquí que?(TFNumero) 'AQUI LA 1ª LETRA MAYUSCULA End If He puesto esta línea TFNumero = vbProperCase(TFNumero)
está para mayúsculas y minúsculas. No se cual la regla para que coloque la 1ª letra de cada palabra en Mayúsculas
He colocado esta línea pero me dice que: Se esperaba una matriz. Si quito vb me dice que no se ha definido Sub o Función. Si coloco así; TFNumero = StrConv(TFNumero, vbProperCase) me dice que Else sin If.
De verdad soy PARCO en esto de macros, si no que lo diga DAM
hice un select case pero, mmmmmmmmm me quede donde empece
1 Respuesta
H o l a:
Te anexo los ejemplos para convertir el texto a mayúsculas o minúsculas:
Sub letras() 'Por.Dante Amor texto = "dante amor" ' texto = UCase(texto) 'resultado DANTE AMOR texto = LCase(texto) 'resultado dante amor texto = UCase(Left(texto, 1)) & Mid(texto, 2) 'resultado Dante amor texto = Application.Proper(texto) 'resultado Dante Amor End Sub
Por otra parte tu estructura If then, else, endif es incorrecta, no puedes tener 2 else.
Pero eso es otro asunto, si quieres que lo corrija deberás crear otra pregunta y explicar lo que necesitas.
S a l u d o s
