Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Spustite program Microsoft Excel a zadajte " Find pozíciu ľubovoľný znak v tejto vete . " V A1 . Kliknite na kartu " Vývojár " a kliknite na " Visual Basic " otvorte Editor jazyka Visual Basic . " . Modul " Pridať nový kód modulu VBA kliknutím na ponuku " Vložiť " a kliknutím na tlačidlo 
 2 
 Pridať nový postup pridaním nasledujúci kód : 
 
 Private Sub findPositionOfCharacter ( ) 
 3 
 Vytvorte nasledujúce tri premenné , ktoré budete používať na vyhľadanie pozície vášho charakteru : 
 
 Dim MyString Ako StringDim MyChar Ako StringDim Pos As Integer 
 
 4 
 Definujte znak , ktorý chcete nájsť a získať veta sa nachádza v A1 : 
 
 MyChar = " d " Range ( " A1 " ) SelectmyString = Range ( " A1 " ) . . Hodnota 
 klipart 5 
 skopírujte a vložte nasledujúci kód na vyhľadanie pozície znaku definovaného v predchádzajúcom kroku a zobrazí sa správa s jeho polohe : 
 
 Pos = Instru ( 1 , MyString , MyChar , vbTextCompare ) MsgBox ( "pozície " " a MyChar & " ' je : " & Pos ) 
 6 
 zadajte " End Sub " na koniec svojho postup a stlačte " F5 " spustiť kód VBA . 
              
Copyright © počítačové znalosti Všetky práva vyhradené