|  
                                             
	Hallo David 
	ich weiss nicht ob du in den Thread nochmal reinschaust. 
	Man hat dir geholfen, aber da straeuben sich mir die Nackenhaare. 
	in deiner Anfrage habe ich m.E. den entscheidenden Fehler in 2 Sekunden gesehen, und zwar hier 
	Range("A2").NumberFormat = "0"    Du formatierst nur die Zelle A2, sonst nichts 
	Jeder Programmierer haette sofort sehen müssen was da falsch ist!.   
	Das kann man einfach nicht übersehen.  Nicht wenn man schon lange Excel programmiert.   
	Range("A2:A1000").NumberFormat = "0"     So ist die korrekte Formatierung für Spalte A 
	Wenn ich die Sache richtig sehe kann man sich die ganze For Next Formatierung sparen 
	Ich bin heute zum erstenmal in diesem Forum, aber fassunglos wenn ich sowas sehe. 
	  
     |