find and go to with vba

  1. 4 tahun lalu
    Di sunting 4 tahun lalu oleh bejo

    slmat malam all master yg saya hormati, saya ingin minta tolong, bagaimana script find and goto, / meletakkan pointer pada range yg dituju, terima kasih sebelumnya

  2. Masdad

    9 Mar 2020 Terverifikasi Demak + 2.198 Poin

    Coba kode untuk CommandButton1-nya diganti ini:

    Private Sub CommandButton1_Click()
    Dim rCari As Integer
    With Sheet7
        rCari = .Cells.Find(Cbkelas2.Value).Row
        Application.Goto .Range("B" & rCari), True
    End With
    End Sub

  3. TERIMA KASIH BANYAK MASTER, ITS DONE!!!!!!!

 

atau Mendaftar untuk ikut berdiskusi!