Mir qualmt hier schon der Kopf.
Ich möchte einen festen Bereich im Sheet "Arbeiter" löschen. Der gesuchte Bereich wird mit einer UserForm Namens "ArbeiterAustragenAusBox" ausgewählt und übergeben.
Nach nunmehr drei Tagen weiß ich keinen Weg mehr.
Könnt Ihr mir helfen?
Private Sub ArbeiterAustragen_OK_Click()
Dim ArbInt, ArbVar
Dim sstart As Range, sende As Range
ArbInt = ArbeiterAustragenAusBox
ArbVar = CVar(ArbInt)
Set b = ArbeiterAustragenAusBox
Set sstart = Range("A:A").Find(b).Select
Set sende = sstart.End(xlToRight)
Range(sstart, sende).Clear
End Sub
Was mache ich nur falsch??
Gruß
Udo