Macros excel – vba 51.- contar palabras en una celda

[José_Santos]

En este tutorial vemos como contar, con VBA, las palabras que contiene el texto de una celda en Excel.

[DiegoPC]

Excelente aporte. Esa es la forma "macroniana" pero los "formulianos" y el resto de primates usaríamos esta:

=LARGO(RECORTAR(A1))-LARGO(SUSTITUIR(A1," ",""))+1[/Code]

[DiegoPC]

Y para que mis amiguitos "macronianos" no se enojen conmigo, les pongo una UDF

Function Contar_Palabras(Texto As String) As Integer

  ARR = Split(WorksheetFunction.Trim(Texto))

  Contar_Palabras = UBound(ARR) + 1

End Function

[/Code]

[José_Santos]

Gracias DiegoPC,

Me quedo con el código "Macroniano", a ver si animamos a que usuarios avanzados de Excel aprendan VBA y lo pongan en práctica.

Saludos.