Een regel verwijderen uit een tabblad, o.b.v. gegevens die in een ander tabblad staan

[Lengerke]

Ik heb in tabblad Database een lijst met persoonsgegevens.
In tabblad Verwijder wil ik iemand kunnen selecteren uit die lijst en die persoon dan uit Database verwijderen.
Het selecteren lukt, de verwijder stap met een knop nog niet..
Wie weet raad?

 

[Leotaxi]

bv

Sub test()
With Sheets("Database")
    r = .Cells.Find(Range("E6"), .Cells(1)).Row
    .Range("A" & r, "E" & r).Delete shift:=xlUp
End With
End Sub

mvg
Leo

 

[Cobbe]

Zo misschien?

Sub cobbe()
 With Sheets("Database")
  Set regel = .Range("A:A").Find([E5])
   If Not regel Is Nothing Then
    .Rows(regel.Row).Delete
   End If
 End With
End Sub

 

[Lengerke]

Geweldig!
Jullie Belgen zijn Excellent!

 

[Cobbe]

Jullie Belgen zijn Excellent!

Dat hebben we al altijd geweten.

 

[Lengerke]

Ik ook!