Habe im Netz folgenden Code gefunden, mit dem ich nach Auswahl in Combobox2 den Inhalt der Zellen der Spalten 1 bis 3 der gleichen Zeile löschen kann. Jetzt soll aber auch noch der Inhalt der Zellen in den Spalten 5 bis 200 gelöscht werden.
Und kann man vieleicht noch eine Abfrage ob wirklich gelöscht werden soll einfügen?
With Worksheets("Tabelle2")
a = ComboBox2.ListIndex + 3
Range(Cells(a, 1), Cells(a, 3)).ClearContents
End With
Danke fürs lesen und die Hilfe!mfg, Andreas