Verwijderen waarde combobox

[Taribo1982]

Beste forum genoten,

Ik ben bezig met een formulier in Excel aan het opstellen.
Nu heb ik een combobox in dit formulier geplaatst.
D.m.v. deze combobox kan ik waarden selecteren die in Kolom A staan.

Nu wilde het volgende:
Wanneer ik een waarde selecteer in de combobox dat ik dan enkel op een knop "ok" hoef
te drukken en dat de geselecteerde waarde uit de combobox wordt verwijderd, dus eigenlijk wordt verwijderd uit kolom A van het desbetreffende Excel werkblad.

Ik hoop dat jullie mij kunnen helpen.

Groeten,

Taribo

 

[Cotje]

Allereerst zal je in VBA een sub moeten maken die aangeroepen wordt als je iets selecteerd in de combobox.

In die sub zal ongeveer de volgende code moeten, misschien nog een beetje fijn slijpen voor jouw specifieke doeleind, maar het idee zal er dan wel zijn.

Private Sub ComboBox1_Change()

    For x = 1 To 10
        If Range("a" & CInt(x)).Value = ComboBox1.Text Then
            Range("a" & CInt(x)).Value = ""
        End If
    Next x
    
End Sub

Voor de duidelijk heid een excel document bijgevoegd waarin ik jouw vraag heb toegepast.

Cotje

 

[Taribo1982]

Cotje,

GEWELDIG!!! Hartstikke bedankt. Dit werkt top! Ik denk dat ik het zo wel kan aanpassen aan mijn eigen wensen. Nogmaals super bedankt!

Groeten,

Taribo

 

[Cotje]

Graag dedaan

 

[snb]

Zoals het eigenlijk hoort (want stel dat eenzelfde waarde meer dan eens voorkomt in kolom A.

Private Sub Knop_verwijder()
  sheets(1).cells(combobox1.listindex+1,1).entirerow.delete
Next

 

[Taribo1982]

Ook top deze aanvulling!

Zoals het eigenlijk hoort (want stel dat eenzelfde waarde meer dan eens voorkomt in kolom A.

Private Sub Knop_verwijder()
  sheets(1).cells(combobox1.listindex+1,1).entirerow.delete
Next

 

[Wigi]

Graag de vraag nog op opgelost zetten aub. Bedankt.