Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1544to1548
1544to1548
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

wenn Hyperlink dann Warnmeldung deaktivieren

Forumthread: wenn Hyperlink dann Warnmeldung deaktivieren

wenn Hyperlink dann Warnmeldung deaktivieren
06.03.2017 12:28:41
udo
Hallo Forum
Habe in einer Spalte untereinander gelistet
Dateipfade stehen zu unseren Videofiles ( Messungen ) in einem best. Ordner
im Netzwerk.
Ich möchte per Makro das Video der aktiven Zeile aus Spalte 6 einfach abspielen
( wenn mgl. ohne Hinwiesfenster bzgl. fremder Quellen und Virengedöhns Hinweisen )
Ich wandel mit meinem Makro derzeitig den Dateipfad der aktiven Zelle zunächst in einen Hyperlink, folge diesem ( sprich es öffnet sich die Datei ) und entferne dann den HL gleich wieder ...
Das nervige daran ist lediglich dieses Hinweisfenster das jedesmal aufgeht beim
ausführen des Videoabspielen Makros.
Ich hab versucht mit zuvor - Application.DisplayAlerts = False und danach wieder
Application.DisplayAlerts = true das Hinweisfenster zu umgehen, klappt leider nicht ? Es geht weiterhin auf wenn ich ein Video kurz einsehen möchte.
Habt ihr ne Idee wie ich den Hinweis / Warnmeldung umgehen kann ...
Evtl. eine Lösung ohne Hyperlink ? kann ich die Videos auch anders starten anhand des Zellverweises ?
oder eben den Hinweis unterbinden , da wäre ich schon sehr glücklich.
Vielleicht hat Jemand ne Idee ? Bin um jede Hilfe dankbar.
LG udo
Mein Abspiel Code: 
Sub Video_abspielen()
On Error GoTo Ende:
If Cells(ActiveCell.Row, ActiveCell.Column) = "" Then GoTo Ende:
If ActiveCell.Row > 15 Then GoTo 1:
GoTo Ende:
1: '-------------------------------------------------------------------------------------------- _
_
Cells(ActiveCell.Row, 6).Select
Cells(ActiveCell.Row, 6).Hyperlinks.Add Anchor:=Selection, Address:=ActiveCell.Value
Application.DisplayAlerts = False
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
Selection.Hyperlinks.Delete
Application.DisplayAlerts = True
GoTo Ende:
Ende:
End Sub

'-----------------------------------------------------------------------------
Hinweisfenster das immer aufgeht :
Öffne ( ... Pfadangabe ... )
Einge Dateien können Viren enthalten oder ihren Computer in anderer Weise
beschädigen.
Es ist wichtig sicherzustellen, dass diese Datei aus einer vertrauenswürdigen Quelle stammt.
Möchten Sie diese Datei öffnen ?
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Hallo Case, leider nein ...
06.03.2017 17:11:18
udo
Hatte ich heute auch schon gegoogelt, und gesehen, auch schon probiert ... sowie MS Beitrag zu Office 2015 hierzu mit Schlüsselerstellung in der Registry ... auch alles ohne Erfolg.
Dieses Hinweisfenster ist sehr sehr hartnäckig ;-),
Daher meine Hoffnung hier evtl. einen entspr. Code zu cashen ;o)
https://support.office.com/de-de/article/Aktivieren-oder-Deaktivieren-von-Sicherheitswarnungen-zu-Verknüpfungen-und-Dateien-von-verdächtigen-Websites-a1ac6ae9-5c4a-4eb3-b3f8-143336039bbe#__toc311699278
Dies hab ich gefunden hierzu ... klappt aber auch nicht , hab auch schon neugestartet usw.
Es bleibt ein Rätzel ?
Danke dir sehr für deine Mühe !
LG Udo
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Hyperlink-Warnmeldungen in Excel deaktivieren

Schritt-für-Schritt-Anleitung

Um die Warnmeldungen für Hyperlinks in Excel zu deaktivieren, kannst du folgende Schritte ausführen. Beachte, dass die hier beschriebenen Schritte für Excel 2010 und höher gelten.

  1. Registry-Editor öffnen:

    • Drücke Win + R, um das Ausführen-Fenster zu öffnen.
    • Gib regedit ein und drücke Enter.

  2. Navigiere zu folgendem Pfad:

    HKEY_CURRENT_USER\Software\Microsoft\Office\<deine Office-Version>\Excel\Security

    Ersetze <deine Office-Version> mit der entsprechenden Version wie 14.0 für Office 2010 oder 15.0 für Office 2013.

  3. Neuen DWORD-Wert erstellen:

    • Klicke mit der rechten Maustaste auf den Ordner „Security“.
    • Wähle Neu > DWORD-Wert (32-Bit).
    • Nenne den neuen Wert DisableHyperlinkWarning.

  4. Wert ändern:

    • Doppelklicke auf DisableHyperlinkWarning und setze den Wert auf 1.

  5. Excel neu starten:

    • Beende Excel und starte es erneut. Die Warnmeldung sollte nun deaktiviert sein.

Häufige Fehler und Lösungen

  • Problem: Die Warnmeldung bleibt auch nach Änderungen in der Registry bestehen.

    • Lösung: Stelle sicher, dass du die richtigen Berechtigungen hast, um Änderungen in der Registry vorzunehmen. Prüfe auch, ob Excel im Administratormodus ausgeführt wird.

  • Problem: Ich bekomme immer noch die Meldung „Einige Dateien können Viren enthalten oder ihren Computer in anderer Weise gefährden“.

    • Lösung: Überprüfe, ob du die richtige Office-Version in der Registry bearbeitet hast. Es könnte auch nötig sein, die Datenschutzeinstellungen in Excel zu überprüfen.

Alternative Methoden

Falls die Registry-Änderung nicht funktioniert, gibt es alternative Ansätze:

  1. Makros verwenden:

    • Du kannst ein Makro erstellen, das den Hyperlink direkt öffnet, ohne ihn zu erstellen. Beispiel: 
      Sub Video_abspielen()
Dim videoPath As String
videoPath = Cells(ActiveCell.Row, 6).Value
If videoPath <> "" Then
   Shell "explorer.exe """ & videoPath & """", vbNormalFocus
End If
End Sub

      Dieses Makro öffnet das Video direkt, ohne die Hyperlink-Warnung zu triggern.

  2. Verwendung von Datei-Shortcuts:

    • Erstelle Desktop-Shortcuts zu den Videos und öffne sie über das Makro.

Praktische Beispiele

Wenn du die oben genannten Schritte befolgt hast, kannst du den folgenden VBA-Code verwenden, um ein Video aus der aktiven Zeile abzuspielen, ohne dass ein Hinweisfenster erscheint:

Sub Video_abspielen()
    On Error GoTo Ende:
    If ActiveCell.Row > 15 Then GoTo Ende:
    Dim videoPath As String
    videoPath = Cells(ActiveCell.Row, 6).Value
    If videoPath = "" Then GoTo Ende:

    Shell "explorer.exe """ & videoPath & """", vbNormalFocus
    GoTo Ende:
Ende:
End Sub

Tipps für Profis

  • Backup der Registry: Vor Änderungen in der Registry ist es immer ratsam, ein Backup zu erstellen, falls du die Änderungen zurücksetzen musst.

  • Makrosicherheitseinstellungen: Stelle sicher, dass die Makrosicherheitseinstellungen so konfiguriert sind, dass deine Makros ohne Probleme ausgeführt werden können.

  • Vertrauenswürdige Speicherorte: Füge den Ordner, in dem deine Videos gespeichert sind, zu den vertrauenswürdigen Speicherorten in Excel hinzu, um die Sicherheitswarnungen zu minimieren.

FAQ: Häufige Fragen

1. Frage
Wie kann ich sicherstellen, dass die Dateien aus einer vertrauenswürdigen Quelle stammen?
Antwort: Überprüfe die Herkunft der Dateien und speichere sie in einem geschützten oder vertrauenswürdigen Ordner.

2. Frage
Kann ich das Hinweisfenster auch in anderen Office-Anwendungen deaktivieren?
Antwort: Ja, die Schritte sind ähnlich, jedoch können die Registry-Pfade variieren, je nach Anwendung (Word, PowerPoint etc.).

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige