Hallo.
Hab eine Tabelle mit Waren ganz oben habe ich meine buttons in meiner excell tabelle.
nun möchte ich z.B: meine angezeigte ware im Userform fenster löschen also komplet aus der excel tabelle löschen.
habe auch ein code dafür.
nun löscht es mir aber die spalte mit meinen Buttons soll aber die angezeigte ware löschen
Mein code wäre meine globale variable für die spalte ist zeile mit der ich meien waren snapreche und bearbeite:
Leider löscht dieser code zwar die werte in der zeile aber die zeilen bleiben leer ich möchte dass diese leere spalte ein auf rückt und komplet gelösct wird so dass keien leeren spalten in den daten drin sind.
Hab eine Tabelle mit Waren ganz oben habe ich meine buttons in meiner excell tabelle.
nun möchte ich z.B: meine angezeigte ware im Userform fenster löschen also komplet aus der excel tabelle löschen.
habe auch ein code dafür.
nun löscht es mir aber die spalte mit meinen Buttons soll aber die angezeigte ware löschen
Mein code wäre meine globale variable für die spalte ist zeile mit der ich meien waren snapreche und bearbeite:
Quellcode
- Cells(Zeile, 1) = ""
- Cells(Zeile, 2) = ""
- Cells(Zeile, 3) = ""
- Cells(Zeile, 4) = ""
- Cells(Zeile, 5) = ""
- Cells(Zeile, 6) = ""
- Cells(Zeile, 7) = ""
- If Zeile = 1 Then
- Else
- LastRow = ActiveSheet.UsedRange.Rows.Count
- Application.ScreenUpdating = False
- For r = LastRow To 1 Step -1
- If Application.CountA(Rows(r)) = 0 Then Rows(r).Delete
- Next r
- MsgBox "Ware Erfolgreich gelöscht."
- End If
Leider löscht dieser code zwar die werte in der zeile aber die zeilen bleiben leer ich möchte dass diese leere spalte ein auf rückt und komplet gelösct wird so dass keien leeren spalten in den daten drin sind.