VBA Hilfe Meldung abfangen

[markusf1895]

Hallo zusammen,

habe beim ausführen meines VBA codes folgende Meldung.
Wie könnte ich diese abfangen, sodass "Aktualisieren" automatisch ausgewählt wird?
[
Bild bitte so als Datei hochladen: Klick mich!
]

[00202]

Hallo, :19:

wenn du in deinem Code ein "Workbooks.Open" verwendest, dann schau mal hier: :21:

Workbooks.Open-Methode (Excel)...

Das Zauberwort ist hier der Parameter "UpdateLinks". Den musst Du setzen.

[markusf1895]

dies ist mir bewusst.
Aber wie lautet der Code damit die Meldung aktualisieren auswählt.

oder schlicht:
Application.DisplayAlerts = False
Mein CODE
Application.DisplayAlerts = True

???

[RPP63]

Moin!
Was hältst Du davon, hier zumindest mal Deinen Code vorstellen würdest?

Fragt sich Ralf

[00202]

Hallo, :19:

nimm unter "Optionen - Erweitert - Allgemein --- Aktualisieren von automatischen Verknüpfungen anfordern" den Haken raus. :21:

[markusf1895]

Dazu gibt es doch sicher auch nen VBA befehl, nicht?

Würde es gerne komplett in VBA machen und nicht überall ein bisschen.

[hddiesel]

Hallo markusf1895,

Mit Nachfrage:
Application.AskToUpdateLinks = True

Ohne Nachfrage:
Application.AskToUpdateLinks = False

Das kannst du auch gleich, nach Ausführung des Befehls, in den Optionen überprüfen.

[00202]

Hallo markusf1895, :19:

als kleiner Tipp am Rande: :21:

Lass mal den Makrorekorder mitlaufen, während du die Schritte die ich in #5 gepostet habe ausführst - dann kommt genau das raus, was du brauchst. :05:

In vielen Fällen kann man erst mal über den Makrorekorder zumindest raus bekommen, wie ein Befehl heißt. :21:

[hddiesel]

Hallo markusf1895,

oder folgendes Makro zum umschalten der Option wählen, in die Schnellzugriff- Symbolleiste.

Code:

'
'Nachfragen, ob die Externen Links, automatisch Aktuallisiert werden sollen.
'
Sub NachfageExterneLinks_EIN_AUS()
    Application.AskToUpdateLinks = IIf(Application.AskToUpdateLinks = False, True, False)

End Sub

Wenn die Datei per Makro geöffnet wird, am Anfang des Makros:

Code:

Application.AskToUpdateLinks = False 'Die Excel Benutzereinstellung

und am Ende des Makros:

Code:

Application.AskToUpdateLinks = True 'Die Excel Standardeinstellung