Cum se numără litere și cifre folosind o macro
Puteți utiliza funcția „Editați - Găsiți” pentru a căuta anumite texte, numere, litere și secvențe de numere. De asemenea, puteți utiliza o macro pentru a căuta caractere în tabelele dvs.
Următoarea macro solicită utilizatorului un conținut și caută acest conținut în intervalul de celule selectat anterior. Deci, mai întâi selectați o zonă din tabel și apoi activați următoarea macro:
Sub Numărare caractere ()
Dim i As Long
Poziție slabă ca lungă
Semnul dim ca șir
Dim Cell As Range
Dim a As String
Character = InputBox („Ce personaj doriți să numărați?”)
i = 0
Pentru fiecare celulă selectată
Poziție = InStr (1, UCase (Cell.Value), UCase (Personaj))
În timp ce poziția 0
i = i + 1
Position = InStr (Position + Len (Character), Cell.Value, Character)
Merge încet
Următoarea celulă
a = MsgBox („Șirul” & caracterul „au devenit„ _
& i & "Găsit ori.", vbOKOnly, "Rezultat căutare")
Sfârșitul Sub
În primul pas, macro-ul întreabă într-o fereastră ce caracter doriți să căutați în zona marcată:
Apoi se caută intervalul de celule. O fereastră de rezultate vă arată cât de des a fost găsit personajul pe care îl căutați:
Căutarea nu distinge majuscule și minuscule. De asemenea, puteți căuta șiruri care sunt mai lungi decât o literă sau un număr. Pe lângă litere, puteți căuta și cifre sau combinații de litere și cifre.
Sfat: Dacă doriți să știți cum să introduceți și să porniți macrocomenzile în Excel, veți găsi o scurtă descriere aici: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
