|  
                                             
	Hi, 
	ich habe leider keine Ahnung was "Position" macht, oder warum du mit "Range(Cells(y, 2), Cells(y, 8)) = (Cells(y, 2) = "Art der Veränderung:")" eine Range mit einem 
	Wahrheitswert vergleichst. Wahrscheinlich kann man das Problem viel einfacher lösen. 
	Unter welchen Bedingungen soll eine Zeile gelöscht werden und wie ist deine Tabelle aufgebaut? Warum willst du danach in der nachgerückten Zeile Inhalte löschen? 
	Ist es richtig, dass das Makro so nie funktioniert hat? 
	Einen Button kannst du über die Steuerelemente Toolbox einfügen und dann per Rechtsklick einen Code einfügen der beim Klicken ausgeführt wird. 
	  
	Grüße 
	Till 
     |