rij verwijderen

[Morsyd]

afhankelijk van de keuze uit een keuzelijst-box moet er een lijst verwijderd worden
maar met mijn code lukt het niet
wat doe ik fout:

Private Sub CmdWis_Click()
Dim i As Integer
Me.ListBox1.ListIndex = i
i = i + 1
Rows("i:i").Select
Selection.Delete Shift:=xlUp
End Sub

i+1 is omdat de ListIndex altijd bij 0 begint te tellen...
na de foutmelding staat Rows("i:i").Select in het geel dus daar moet zich ergens de fout situeren
hopelijk kan iemand me redden?

 

[Ginger]

Morsyd, ff zo uit de losse pols... Rows(i).Select
Je roept namelijk de variabele i aan. Dan kan je 'm nooit tussen dubbele quotes zetten.
Enne... moet het niet zo zijn??? i = Me.ListBox1.ListIndex

Groet, Leo

 

[Morsyd]

Morsyd, ff zo uit de losse pols... Rows(i).Select
Je roept namelijk de variabele i aan. Dan kan je 'm nooit tussen dubbele quotes zetten.
Enne... moet het niet zo zijn??? i = Me.ListBox1.ListIndex
Groet, Leo

Wat een schitterende losse pols heb jij!
bedankt!!!!

 

[Ginger]

Wat een schitterende losse pols heb jij!

Groet, Leo