Hey Leute,
mich lässt ein Problem seit einigen Tagen nicht mehr in Ruhe. Und zwar habe ich eine Excel-Tabelle bei der 2 Worksheets vorhanden sind. Und zwar ist das eine Produktionsplanung. Nun hab ich vor das ich durch einen Button einen vordefinierten Zellbereich lösche. Heißt so viel: Wenn ein Produkt fertig produziert wurde (Was quasi an 1. Stelle der Tabelle ist) kann ich es durch Drücken des Buttons diesen Eintrag löschen. War ja auch über VBA und Co. kein Problem. Das Löschen hab ich bereits hinbekommen ->
Private Sub CommandButton1_Click()
Dim Zelle As Range
For Each Zelle In Range("I5:P5")
If Not Zelle.HasFormula Then Zelle.ClearContents
Next Zelle
End Sub
Nun würde ich gerne die restlichen Produkte, die nun unterhalb der gelöschten Bereiche sind, eins nach oben verschieben, sodass dieser leere Zellbereich (der von mir gelöscht wurde), wieder besetzt ist.
Kann mir da jemand weiter helfen? Ich hab keine Ahnung wie ich da weiter vorgehen soll... DANKE LEUTE :) Ihr würdet mir so viel dabei helfen
Gruß Daniel
|