Office: (Office 2013) Prüfen der Erreichbarkeit von Hyperlinks

Helfe beim Thema Prüfen der Erreichbarkeit von Hyperlinks in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Guten Tag, ich bin leider ziemlich neu und kann mit VBA nur rudimentär umgehen. Ich hoffe ich kann mein Problem gut genug beschreiben. Ich habe eine... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Etheron, 27. Februar 2019.

  1. Prüfen der Erreichbarkeit von Hyperlinks


    Guten Tag,

    ich bin leider ziemlich neu und kann mit VBA nur rudimentär umgehen.
    Ich hoffe ich kann mein Problem gut genug beschreiben.

    Ich habe eine EXCEL-Tabelle erzeugt mit vielen Informationen.
    In Spalte "C" (also der dritten) habe ich Hyperlinks mit der Funktion =Hyperlinks() erzeugt (nicht mit rechts-klick -> Link!)

    Es handelt sich teilweise um Pfade zu Ordnern aber die meisten verweisen direkt auf PDF-Dateien. Diese sollen dann durch drücken des Links geöffnet werden.

    Ich würde gerne in regelmäßigen Abständen prüfen ob dir Datei noch dort ist bzw. der Hyperlink funktioniert.

    Der Link verweist auf ein Netzwerk-Laufwerk und manchmal löscht oder verschiebt jemand eine Datei.

    Falls möglich, wäre es schön wenn man die Abfrage in Spalte "E" (also der 5ten)schreiben könnte. Wenn der Link geht dann "OK" wenn er nicht geht dann "nicht okay".

    Leider finde ich zu der Funktion =Hyperlink() keine genauen angaben und auch nicht wie man das auslesen kann.

    Vielen Dank für die Hilfe.

    mit freundlichem Gruß Etheron

    :)
     
    Etheron, 27. Februar 2019
    #1
  2. Hallo,

    du kannst die Formel in ihrer englischen Schreibweise über Code:
    auslesen.
    Mit der Funktion instr() kannst du testen, ob im String sFormel auch wirklich eine Hyperlinkformel steckt:
    if instr(sFormel, "HYPERLINK") > 0
    Mit den Funktionen mid() und instr() kannst du den Pfad extrahieren.
    Die Funktion dir() zeigt dir, ob die Datei bzw. der Pfad, noch existiert.

    Kommst du klar?
    Grüße, Ulrich
     
    losgehts, 1. März 2019
    #2
  3. Hallo Ulrich,

    vielen Dank für deine Hilfe. Leider komme ich nicht weiter.

    Hier mal mein erster Versuch:

    Code:
    Da ich VBA leider nicht beherrsche verstehe ich ein paar Dinge nicht.

    Das Auslesen des Pfades ist nicht nötig oder? Ich brauche den Pfad nicht, ich weiß wo die Dateien liegen. Ich mag nur die Funktion des Hyperlinks testen ohne die +300 Links anzuklicken...

    Dir() ist einfach eine Suchfunktion oder?

    Wenn ich die Funktion Dir() suche (im Internet..) benutzen fast alle eine Variable = Dir(...) und geben dann direkt den Pfad oder die Datei an oder es wird nach Dateiendungen gesucht. Diese wird dann überprüft.

    Leider schaffe ich es nicht das weiter zu spinnen.

    Meine Idee:


    If InStr(sFormel, "HYPERLINK") > 0 Then
    Dir (Pfad des Hyperlinks in Zeile 3)
    wenn Datei auffindebar -> schreibe in Zeile 5 okay

    else

    schreibe nicht okay.

    Ich schaffe das aber nicht so aufzubauen.
    Ich hoffe man versteht das so.

    Hast du evtl. noch einen Tipp für mich?

    Danke
     
    Etheron, 3. März 2019
    #3
  4. Prüfen der Erreichbarkeit von Hyperlinks

    Hallo,

    Mir ist keine Möglichkeit bekannt, wie du den Hyperlink "testen" kannst. Daher ist mein Vorschlag, dass du den Pfad aus der Formel ausliest und überprüfst, ob der Pfad existiert.

    Hm, was habe ich nochmal zu der Funktion im letzten Post geschrieben :-) ?
    Dazu beantworte ich nur fragen wie "in der Hilfe steht ... da verstehe ich ... nicht" oder ähnlich ;-).
    Ich habe keine Lust, dir hier die Hilfetexte reinzukopieren. Übrigens kannst du zu jeder Funktion im VBE (Visualbasiceditor) die Hilfe ganz leicht aufrufen, indem du den Cursor auf die Funktion/Methode setzt und F1 drückst.


    mach dir mal drei Testfälle, von denen du weißt, was rauskommen soll:
    1. gültiger Pfad auf eine Datei
    2. gültiger Pfad auf ein Verzeichnis
    3. Pfad, der nicht gültig ist.

    Ich habe das jetzt mal in die Zellen C1:C3 geschrieben.

    Und dann hier mein Tipp: Code:
    Am besten du kopierst den Code in ein Modul und führst ihn Schritt für Schritt aus: Im VBE (VisualBasicEditor) F8 drücken. Dann wird immer nur eine Codezeile ausgeführt. Gleichzeitig beobachtest du im Lokalfenster (Ansicht => Lokalfenster) wie sich der Inhalt der Variablen ändert.


    Und unbedingtes Muss:
    Wenn ich dir Funktionen nenne, solltest du als erstes in der Hilfe nachsehen, was diese Funktionen tun.

    kommst du klar?

    Grüße, Ulrich
     
    losgehts, 3. März 2019
    #4
  5. Hallo Ulrich,

    habe es geschafft. Habe es mit einer MsgBox gemacht und nicht in die Spalte E geschrieben. Das mit dem Schreiben hat nicht geklappt.

    Vielen Dank für deinen Input.
     
    Etheron, 7. März 2019
    #5
Thema:

Prüfen der Erreichbarkeit von Hyperlinks

Die Seite wird geladen...
  1. Prüfen der Erreichbarkeit von Hyperlinks - Similar Threads - Prüfen Erreichbarkeit Hyperlinks

  2. Wartungstermine prüfen und ausgeben

    in Microsoft Excel Hilfe
    Wartungstermine prüfen und ausgeben: Guten Tag zusammen. Ich hoffe ihr könnt mir helfen. Ich möchte mir eine Übersicht erstellen, die mir anzeigt, ob eine Wartung überfällig ist oder nicht. Und zudem ausgibt, wie lange sie...
  3. zwei Zellen prüfen steht was drinnen dann schreib text

    in Microsoft Excel Hilfe
    zwei Zellen prüfen steht was drinnen dann schreib text: Hallo zusammen, mein Problem wenn in der Zelle A1 oder A2 größer 1 dann schreib Text in A3 VG Michael
  4. Mehrere Auswertungen zum prüfen von Nichtnormal- und Normalverteilung

    in Microsoft Excel Hilfe
    Mehrere Auswertungen zum prüfen von Nichtnormal- und Normalverteilung: Morgen, Ich hab eine Exceltabelle mit mehreren Tests erstellt, von Anderson-Darling bis Shapiro-Wilk. Ist noch nix aufgeräumt, noch Version 0.1 quasi. Sinn ist es 23 Zahlen zu prüfen die im...
  5. wert aus ComboBox prüfen dann hinzufügen

    in Microsoft Excel Hilfe
    wert aus ComboBox prüfen dann hinzufügen: Gutn Morgen zusammen, mit folgendem Code fülle ich meine ComboBox Private Sub UserForm_initialize() With ComboBox1 For Repeatings = 2 To...
  6. Wert aus Zelle in einer anderen Datei suchen und prüfen, ob weiterer Wert vorhanden ist

    in Microsoft Excel Hilfe
    Wert aus Zelle in einer anderen Datei suchen und prüfen, ob weiterer Wert vorhanden ist: Hallo allerseits. Ich hab wieder mal eine Frage: • Meine Formel steht in 'Datei1' R6. • In D6 steht die Kundennummer auf die sich die Formel beziehen soll. • In einer anderen Datei 'Datei2' sind...
  7. Datei vor dem verschieben prüfen, ob vorhanden

    in Microsoft Excel Hilfe
    Datei vor dem verschieben prüfen, ob vorhanden: Hallo allerseits, ich, als VBA Anfänger, bastel nun schon länger an einer Lösung herum, leider ohne Erfolg. Ich habe eine Liste mit Dateinamen. Das Programm soll diese Dateien aus dem Ordner in...
  8. Makros nach wenn dann prüfen und durchführen

    in Microsoft Excel Hilfe
    Makros nach wenn dann prüfen und durchführen: Ich arbeite zurzeit an einer Übersichtstabelle, aus der ich Informationen aus verschiedene Excelformulare entnehme. Da aber es ziemlich zeitaufwendig ist, jede einzelne Angabe manuell auf die...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden