VBA zoeken op ander tabblad

[jelle87]

Goedenmiddag,

Ik ben een zoekknop aan het maken, die in een bepaalde cel kijkt naar de waarde, en die waarde dan opzoekt in dat specifieke tabblad:
Bekijk bijlage Zoeken met behulp van knop.xlsm

De macro die er nu in staat, zorgt ervoor dat de waarde op datzelfde tabblad wordt gezocht.

Het is ongetwijfeld een kleine toevoeging, maar:
Hoe zorg ik ervoor dat de macro gaat zoeken op tabblad 2, in plaats van tabblad 1?

alvast bedankt!

 

[JeanPaul28]

Kan je hier verder mee

 

[RoCompy87]

Hoi,

Met de code hieronder wordt gezocht op Sheet 2 en wordt die cel geactiveerd.

Private Sub CommandButton1_Click()
'
' zoekenmacro2 Macro
'

Dim Z As Integer
Z = Range("E2").Value
With Sheets(2)
    .Activate
    .Cells.Find(What:=Z, After:=ActiveCell, LookIn:=xlValues, LookAt:= _
        xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False _
        , SearchFormat:=False).Activate
End With
End Sub

 

[jelle87]

Beide werken naar volle tevredenheid, bedankt voor het meedenken!

 

[Warme bakkertje]

Of

Sub tst()
    Application.Goto Sheets(2).Range(Sheets(2).Columns(1).Find(Range("E2").Value, , xlValues, xlWhole).Address)
End Sub

 

[jelle87]

Bedankt Rudi, dat werkt inderdaad ook prima. Zit er nog verschil tussen jouw macro, en die andere 2? Misschien qua snelheid of iets in die geest?

 

[Warme bakkertje]

Select, Selection, Activate kunnen in vele gevallen idd vertragend werken. Bovendien is het onnodig, overbodig en zorgt ook voor de nodige onrust op je beeldscherm.