Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen der Seite angezeigt.

Link zu der Vergleichsansicht

Beide Seiten, vorherige Überarbeitung Vorherige Überarbeitung
Nächste Überarbeitung		 Vorherige Überarbeitung
Letzte ÜberarbeitungBeide Seiten, nächste Überarbeitung
informatik:vba:start [2022/12/11 10:54] – [For...Next] jonathan.pfeifferinformatik:vba:start [2022/12/11 10:55] – [Do...Loop] jonathan.pfeiffer
Zeile 78: Zeile 78:
  
 'Beispiel 'Beispiel
-For zeile = 4 To ActiveSheet.Cells(Rows.Count, 5).End(xlUp).Row Step 1+For i = 4 To ActiveSheet.Cells(Rows.Count, 5).End(xlUp).Row Step 1
  
-        Range("E" + CStr(zeile) + ":G" + CStr(zeile)).Borders.LineStyle = xlContinuous +Next
-        Range("E" + CStr(zeile) + ":G" + CStr(zeile)).Font.Bold = True +
-        Range("E" + CStr(zeile) + ":G" + CStr(zeile)).Interior.ColorIndex = 2 +
-   Next+
 </code> </code>
  
Zeile 104: Zeile 101:
  
 'Beispiel 'Beispiel
 +zaehler = 10
 +
 +Do Until zaehler = 0
 +        zaehler = zaehler - 1
 +Loop
  
 </code> </code>