En este vídeo mostraré como usar la función NOMPREPROPIO() en Excel y VBA PROPER(). Ademas, emplearemos un código VBA con el cual convertiremos de igual manera la primera letra de una cadena de texto usando el espacio en blanco como criterio para convertir la primera letra a mayúscula
Código VBA
Sub Convertir()
Dim M As String
Dim I As Single
M = Empty
For I = 1 To Len(TextBox1)
If Mid(TextBox1, I, 1) = " " Then
M = M & " " & UCase(Mid(TextBox1, I + 1, 1))
I = I + 2
End If
M = M & Mid(TextBox1, I, 1)
Next I
Me.TextBox1.Text = UCase(Left(M, 1)) & Mid(M, 2, Len(M))
End Sub
Contacto : [email protected]
Смотрите видео Función Proper() VBA онлайн без регистрации, длительностью online в хорошем качестве. Это видео добавил пользователь EcoDev-Solutions 16 Апрель 2019, не забудьте поделиться им ссылкой с друзьями и знакомыми, на нашем сайте его посмотрели 855 раз и оно понравилось 17 людям.