Mrrrr's Forum (VIEW ONLY)
Un forum care ofera solutii pentru unele probleme legate in general de PC. Pe langa solutii, aici puteti gasi si alte lucruri interesante // A forum that offers solutions to some PC related issues. Besides these, here you can find more interesting stuff. 		Lista Forumurilor Pe Tematici
Mrrrr's Forum (VIEW ONLY) | Reguli | Inregistrare | Login

POZE MRRRR'S FORUM (VIEW ONLY)

Nu sunteti logat. 		Nou pe simpatie:
Tanya_sexy
Femeie
24 ani
Hunedoara
cauta Barbat
24 - 47 ani
Mrrrr's Forum (VIEW ONLY) / Tutoriale si Ghiduri Utile // Tutorials and useful guides / [WORD] Count Occurences of a Word or Character in Selection [VBA] Moderat de TRaP, TonyTzu
Autor
Mesaj Pagini: 1
TRaP
Moderator

Inregistrat: acum 6 ani
Postari: 739
Count occurrences in Selection of:
- Words
- Characters with spaces
- Characters without spaces


Sub GetWordsCount_Selection()

Dim w, Ch, ChSp As Long

    w = Selection.Range.ComputeStatistics(wdStatisticWords)
    Ch = Selection.Range.ComputeStatistics(wdStatisticCharacters)
    ChSp = Selection.Range.ComputeStatistics(wdStatisticCharactersWithSpaces)

MsgBox "The selection has:" & vbCrLf & _
        " - " & w & " words." & vbCrLf & _
        " - " & ChSp & " characters with spaces." & vbCrLf & _
        " - " & Ch & " characters without spaces."

End Sub
pus acum 1 an
   
Pagini: 1  

Mergi la