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é