Range
04.08.2002 09:50:03
Max M.
kann ich folgendes Makro auch anders Schreiben?
With Range("H35,J35,L35,N35,P35,R35,T35,V35,X35,Z35,AB35,AD35,AF35,AH35,AJ35,")
.Borders(xlEdgeLeft).ColorIndex = 2
End With
With Range("G36,I36,K36,M36,O36,Q36,S36,U36,W36,Y36,AA36,AC36,AE36,AG36,AI36")
.Borders(xlEdgeTop).LineStyle = xlContinuous
.Borders(xlEdgeTop).ColorIndex = 2
End With
With Range("G35,I35,K35,M35,O35,Q35,S35,U35,W35,Y35,AA35,AC35,AE35,AG35,AI35")
.Borders(xlEdgeLeft).ColorIndex = 16
.Borders(xlEdgeTop).LineStyle = xlContinuous
.Borders(xlEdgeTop).ColorIndex = 16
End With
Da ich doch sehr viele Zeilen und Spalten mit diesen Makro Füllen möchte.
Max M.