find and go to with vba

  1. 3 minggu lalu
    Di sunting 3 minggu 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

    Mar 9 Terverifikasi Demak + 1.364 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!