Ako používať Visual Basic for Applications počítať výskyty znakov vo výbere v programe Excel

Preklady článku Preklady článku
ID článku: 89794 - Zobraziť produkty, ktorých sa tento článok týka.
Rozbaliť všetko | Zbaliť všetko

Na tejto stránke

SUHRN

V programe Microsoft Excel, môžete použiť makro zistiť počet výskytov špecifický charakter v bunke alebo rozsahu buniek. Tento článok obsahuje vzorky makro počítať výskyty špecifického charakteru v bunku alebo rozsah buniek.

Môžete tiež použiť vzorec pre splnenie úlohy. Ak uprednostňujete nie Ak chcete použiť makro, kliknite na nasledovné číslo článku, čím zobrazíte články v Microsoft Knowledge Base:
187667 Vzorce počítať výskyty textu, znaky alebo slová v programe Excel pre systém Macintosh

DALSIE INFORMACIE

Spoločnosť Microsoft poskytuje príklady programovacieho kódu len ako názornú ukážku bez ľubovoľnej vyjadrenej alebo implicitnej záruky. Toto zahŕňa, okrem iného, implicitné záruky obchodovateľnosti a vhodnosti pre konkrétny účel. Úroveň odbornosti článku predpokladá, že ovládate predvádzaný programovací jazyk a nástroje, ktoré sa používajú na vytváranie a ladenie procedúr. Pracovníci technickej podpory spoločnosti Microsoft môžu pomôcť vysvetliť funkčnosť konkrétny postup, ale nie modifikuje tieto príklady poskytovať pridanú funkčnosť alebo výstavbe postupy splniť vaše konkrétne požiadavky.

Postup vzorky Visual Basic

Nasledujúci postup Visual Basic zobrazí výzvu pre znak (alebo znaky), potom prehľadá aktuálne vybratú bunku alebo rozsah buniek a zobrazí okno hlásenia zobraziť celkový počet výskytov znak alebo reťazec znakov. To funguje pre všetky alfanumerické znaky.
Dim Count As Integer
Dim Target As String
Dim Cell As Object
Dim N As Integer

Sub Target_Count()
   Count = 0
   Target = InputBox("character(s) to find?")
   If Target = "" Then GoTo Done
      For Each Cell In Selection
         N = InStr(1, cell.Value, target)
         While N <> 0
            Count = count + 1
            N = InStr(n + 1, cell.Value, target)
         Wend
      Next Cell
   MsgBox count & " Occurrences of " & target
Done:
End Sub
				

ODKAZY

Ďalšie informácie o možnostiach získania pomoci s programom Visual Basic for Applications získate po kliknutí na nasledovné číslo článku databázy Microsoft Knowledge Base:
305326Zoznam programovací prostriedky pre jazyk Visual Basic for Applications
226118 Zoznam zdrojov, ktoré sú k dispozícii, ktoré vám pomôžu naučiť jazyka Visual Basic pre programovanie aplikácií
163435 Programovací Zdroje pre Visual Basic for Applications

Vlastnosti

ID článku: 89794 - Posledná kontrola: 10. októbra 2011 - Revízia: 2.0
Informácie v tomto článku sa týkajú nasledujúcich produktov:
  • Microsoft Office Excel 2007
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
  • Microsoft Excel 2004 for Mac
  • Microsoft Excel X for Macintosh
  • Microsoft Excel 2001 for Macintosh
  • Microsoft Excel 98 for Macintosh
Kľúčové slová: 
kbcode kbhowto kbprogramming kbmt KB89794 KbMtsk
Strojovo preložené
DÔLEŽITÉ: Tento článok bol preložený pomocou softvéru na strojový preklad od spoločnosti Microsoft, nie prekladateľom. Spoločnosť Microsoft ponúka články preložené prekladateľmi aj strojovo preložené články, vďaka čomu máte možnosť prístupu ku všetkým článkom databázy Knowledge Base vo svojom jazyku. Strojovo preložený článok však nie je vždy perfektný. Môže obsahovať chyby týkajúce sa slovnej zásoby, syntaxe alebo gramatiky, podobne ako cudzinec môže robiť chyby, keď rozpráva vašim jazykom. Spoločnosť Microsoft nenesie zodpovednosť za akékoľvek nepresnosti, chyby alebo škody spôsobené akýmkoľvek nepresným prekladom obsahu alebo jeho použitím zo strany zákazníkov. Spoločnosť Microsoft softvér na strojový preklad pravidelne aktualizuje.
Pokiaľ chcete vidieť anglickú verziu článku, kliknite sem:89794

Odošlite odozvu

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com