Registriert seit: 12.04.2014
Version(en): Beruflich Office 365 / Privat LibreOffice
Hallo,
ich habe von VBA nicht viel Ahnung und habe den Code in der zweiten Zeile so ergänzt:
Dim j As Integer, Txt As String, Adr As Range
Das Ergebnis: In der Messagebox erscheint jetzt die Meldung "Es liegen keine Zirkelbezüge vor".
Nehme ich das "Adr as Range" wieder heraus funktioniert der Code wieder.
Ist meine "Ergänzung" falsch oder liegt da sonst noch etwas im Argen?
Gruß
Peter
Registriert seit: 28.08.2022
Version(en): 365
Hi,
Adr musst du als String definieren.
Wenn man unerklärliche Phänomene hat, solle man als erstes immer On Error Resume Next entfernen…
Gruß,
Helmut
Win11 - Office365 / MacOS - Office365
Registriert seit: 12.04.2014
Version(en): Beruflich Office 365 / Privat LibreOffice
Hallo,
danke - jetzt sieht es besser aus.
Zitat:Wenn man unerklärliche Phänomene hat, solle man als erstes immer On Error Resume Next entfernen…
Habe ich jetzt mal getan, aber die Fehlermeldung hätte mich auch nicht wirklich weiter gebracht.

VBA und ich werde in diesem Leben vermutlich keine Freunde mehr.
Gruß
Peter
Registriert seit: 12.03.2016
Version(en): Excel 2003/ 2016
Hallo
@Peter wer lange übt, freundet sich auch mit VBA an. Ich habe mir alles selbst beigebrahct. Aber mit System.
Zu beginn, ~1990 mit Excel 7, gab es eine 3 1/2 Zoll Disk 1,4 MB mi Beispiel Dateien von DataBecke.
Alle Makros kopierte ich mir in eine Tabelle und suchte mit Suchlauf nach den gängigen Befehlen.
Ich war überrascht wie gross der Unterschied zwischen den Programmierern war, lernte von ihnen.
Ich wünsche alle Kollegen noch frohe Festtage und einen guten Rutsch ins neue Jahr.
mfg Gast 123