Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte list , v ktorom chcete nájsť zhodu . Stlačte tlačidlo " Alt " a " F11 " klávesy spoločne . Tým sa otvorí editor jazyka Visual Basic ( VBE ) .
2
Kliknite na " Vložiť " a potom kliknite na " modul " . To vloží prázdne okno modulu
3
Skopírujte a vložte nasledujúci kód do prázdneho okna : .
Sub Find_First ( )
Dim FindString ako string
Dim Rng ako rozsah
FindString = InputBox ( " Zadajte hľadanú hodnotu " )
Ak Trim ( FindString ) < > " " Tak
S Sheets ( " Hárok1 " ) Rozsah .. ( " A1 : Z256 " )
Set Rng = Hľadať ( Čo : = FindString , _
Po : . = Cells ( buňky. . Count ) , _
vyzerá : = xlValues , _
look : = xlWhole , _
SearchOrder : = xlByRows , _
SearchDirection : = xlNext , _
matchCase : = False )
Ak nie je Rng Je Nic Potom
Application.Goto Rng , pravda
Else
MsgBox " Nič našiel "
End If
End With
End If
End Sub
4
Zmeniť " Rozsah " v kóde do oblasti buniek , v ktorej chcete hľadať zápasu . Napríklad , ak chcete vyzerať v bunkách C1 : C1000 , zadajte " C1 : C1000 " na mieste " A1 : . Z256 "
5
Stlačte " F5 " , potom zadajte reťazec texte alebo údaje, ktoré chcete nájsť do textového poľa . Excel bude nájsť zhodu a zvýraznite bunku .
Copyright © počítačové znalosti Všetky práva vyhradené