Microsoft 365 Access VBA

Question

In Microsoft 365 Access VBA lässt sich die Schleife Whie ... End While nicht kodieren.

Beim Kodieren des End While meldet VBA "Fehler beim Kompilieren: Erwartet: If oder Select oder Sub oder Function oder Property oder Type oder With oder Enum oder Anweisungsende"

Der Aufruf der Hilfe aus der Fehlermeldung heraus führt zu: "Dieser Befehl ist nicht verfügbar. Der Administrator Ihrer Organisation hat den für die Verwendung dieser Funktion erforderlichen Dienst deaktiviert."

Das kann doch nicht angehen! 

Was ist zu tun, damit die While .. End While Schleife kodert werden kann?

Answer 1

Hallo,

hier ist Roman, ich bin unabhängiger Berater.

Laut der Fehlermeldung stimmt etwas mit dem Ablauf nicht - wahrscheinlich ist innerhalb der Schleife schon ein Fehler der für den Abbruch sorgt.

Hier die Doku zu deinem Fehler auf deutsch:

https://docs.microsoft.com/de-at/office/vba/lan...

sg Roman

Answer 2

Vielen Dank für die Antwort.

Wo ist hier der Fehler, dass die Anweisung End While nicht angenommen wird?

Answer 3

Es schaut so aus als ob du VBA 7.1 oder so verwendest (Office 365)

Da scheint es einen neuen Syntax für While zu geben:

While

...

Wend

https://docs.microsoft.com/office/vba/language/...

sg Roman

Answer 4

Hallo,

Die korrekte Syntax für das While-Konstrukt ist 

While

...

Wend

Das ist die Syntax in VBA bereits seit mindestens Access 95.

Alternativ funktionert auch: 

Do While i < 10

...

Loop

Gruss - Peter

Answer 5

Vilen Dank.

Da hab ich VBA mit VB nicht auseinandergehalten.

Dumm von mir.