So verwenden Sie die While-Schleifenanweisung im VBA-Excel-Makro – Einfache Schritte

Wenn Sie mehr über die verschiedenen Funktionen erfahren, die durch die in Excel verfügbaren Makros möglich sind, werden Sie in der Lage sein, Prozeduren durch die While-Schleife-Anweisung in VBA zu erstellen. VBA ist ein Programm, mit dem Sie Makros in Excel erstellen können.

Durch das Erstellen von Makros mit VBA können Sie Excel-Aufgaben schneller und einfacher erledigen. Kopieren Sie beispielsweise Zellen in Excel und fügen Sie sie ein, erstellen Sie Diagramme oder zählen Sie Zelldaten.

Dies sind nützliche Bedingungen für Tabellen, bei denen eine Reihe von Parametern festgelegt werden müssen, die ein bestimmtes Ergebnis bestimmen.

So verwenden Sie die While-Schleifenanweisung in einem VBA-Excel-Makro – Einfache Schritte

Die Module, die im Makroabschnitt erstellt werden, ermöglichen es dem Entwicklerbenutzer, als unmöglich geltende Verfahren einzuhalten.

Wenn die Verwendung der Symbolleistenzugriffe es Ihnen auf diese Weise nicht erlauben, eine Funktion auszuführen, schafft es die im Visual Basic-Editor wiedergegebene Codierung, die Parameter in Excel zu erstellen, damit Sie das gewünschte Ergebnis erhalten .

Worum geht es bei der While-Schleife-Anweisung in VBA und wie funktioniert sie?

Die Erstellung von Kodierungen, die die Anweisung des englischen Begriffs While oder Wend enthalten, werden verkörpert, um eine bestimmte Art von Prozedur zu wiederholen.

Der Makrocode besteht aus Ergänzungen, die es ermöglichen, die oben erwähnten Parameter zu bilden, unter denen die folgenden festgelegt sind:

• Hauptsächlich handelt es sich bei der Bedingung um obligatorische Daten, die durch eine Zeichenfolge oder Zahl bestimmt werden, deren Wert bestimmt, ob der Inhalt wahr oder falsch ist.
• Für den Fall, dass die von der Person eingegebenen und angeforderten Informationen die im Code festgelegten Bedingungen erfüllen, sind sie erfüllt und die Schleife wird ausgeführt.
• Andererseits wird die Anweisung als optionaler Parameter betrachtet, aber es ist wirklich das, was der Wahrscheinlichkeit des Ergebnisses Bedeutung zuweist.

Es basiert auf einer Reihe unterschiedlicher Prozeduren, die immer wieder durchgeführt werden müssen, bis der Benutzer eine falsche Bedingung einstellt.

Operationsmethode

Unabhängig von der im Code festgelegten Struktur hat die Schleife die Fähigkeit, sich selbst zu wiederholen, während die Bedingung erfüllt wird.

Wenn die Funktion oder Prozedur ausgeführt wird, wird sie von oben nach unten analysiert.

Auf diese Weise untersucht die Schleife die Bedingung, die in der oberen Zeile platziert wurde, und wenn der Rest der Information innerhalb der Parameter liegt, wird sie als wahr angenommen und die Zeilen unter “ While “ werden ausgeführt.

Sobald der “ Loop “-Term erreicht ist, kehrt das Programm zum Anfang zurück und analysiert die wiederholt eingegebene Bedingung erneut.

Wenn es eine Änderung in den Informationen in der Tabelle gibt, die dazu führt, dass die Bedingung falsch wird, um die Wiederholung der Schleife auf unbestimmte Zeit zu stoppen.

Auf diese Weise stoppt While die Ausführung und der durch den Code festgelegte Ablauf des Programms fährt fort, um die Anweisungen auszuführen, die unter “ Schleife “ stehen.

Beispielcode mit der While-Schleife

Die While-Schleife-Anweisung in VBA wird im Beispiel einer Krankenhauszimmerliste wie folgt festgelegt, um zu bestimmen, ob es verfügbar ist, um einem bedürftigen Patienten zugewiesen zu werden.

subhabstatus()

Zeile = 2

Do While Cells(row, 1) <> “”

If (Cells(row, 2) < 500 And Cells(row, 3) = “Dirty“) Then

Cells(row, 4) = “Im 4. Stock nicht verfügbar”

Ende Wenn

If (Cells(row, 2) < 500 And Cells(row, 3) = “Clean“) Then

Zellen (Reihe, 4) = “Verfügbar im 4. Stock“

Ende Wenn

If (Cells(row, 2) < 400 And Cells(row, 3) = “Dirty“) Then

Cells(row, 4) = “Nicht verfügbar im 3. Stock”

Ende Wenn

If (Cells(row, 2) < 400 And Cells(row, 3) = “Clean“) Then

Cells(row, 4) = “Verfügbar im 3. Stock”

Ende Wenn

If (Cells(row, 2) < 300 And Cells(row, 3) = “Dirty“) Then

Cells(row, 4) = “Im 2. Stock nicht verfügbar”

Ende Wenn

If (Cells(row, 2) < 300 And Cells(row, 3) = “Clean“) Then

Cells(row, 4) = “Verfügbar im 2. Stock”

Ende Wenn

If (Cells(row, 2) < 200 And Cells(row, 3) = “Dirty“) Then

Cells(row, 4) = “Im 1. Stock nicht verfügbar“

Ende Wenn

If (Cells(row, 2) < 200 And Cells(row, 3) = “Clean“) Then

Cells(row, 4) = “Verfügbar im 1. Stock”

Ende Wenn

Zeile = Zeile + 1

Schleife

End Sub