Hallo Zusammen,

ich habe eine Excel Datei, in der in Spalte A der Durchmesser eines Kreises und in Spalte B beliebig oft die Zahl 1, irgendwann die Zahl 2, ... steht. Ich würde gerne immer dann einen Kreis per VBA einfügen, wenn in Spalte B die Zahl 1 steht. Dies würde ich gerne über eine Do-While Schleife machen, d.h. die Kreise solange einfügen bis die Bedingung in Spalte B = 1 nicht mehr erfüllt ist.
Meine Schleife hat ja dann den folgenden Code:

Sub_Do_While_Schleife()
Dim n As Integer
n = ? (soll in der ersten Schleife B2, in der zweiten B3, in der vierten B4, ... abprüfen)

Do While n2
'Kreis einfügen (Code bereits vorhanden)
n=n+1
Loop
End Sub

Ich bin im Schleifen programmieren absolut Anfänger und wollte deshalb mal nachfragen, wie ich meinen Zähler definiere, damit die Schleife nach und nach jede Zeile durchläuft. Oder definiere ich die erste Zelle einfach über n=Range("B2") und er zählt aufgrund n=n+1 dann weiter?

Liebe Grüße
KG