[gelöst] Hyperlink überprüfen ob Datei vorhanden

[speedym79]

Hallo Leute

In meiner Rechnungsnummernliste, ist hinter jeder Zeile, der automatisch erzeugte, dazugehörige Link. Es wäre schön, wenn ich aber auch gleich angezeigt bekommen könnte, ob die datei zum automatisch erzeugten Link auch wirklich existiert. Wäre ungemein hilfreich, sich eingeschlichene Fehler auf den ersten Blick zu erkennen!

Die Sache mit dem Link ist derzeit so gelöst und funktionier:
h14=TEXT(A14;"00")&B14&TEXT(C14;"000")&D14&TEXT(E14;"000")&".doc" => 12-003-561.doc (jahr-fortlaufend-kd.nr.)
i14=HYPERLINK("C:\Dokumente und ...\RECHNUNG\"&h14;" zur Rechnung") => Hypyerlink zur datei

In der Forumssuche bin ich auf diese Lösung gestoßen, welche aber nicht funktioniert:
=WENN(HYPERLINK("C:\Dokumente und....RECHNUNG\"&K13;" zur Rechnung")<>"";HYPERLINK("C:\Dokumente und Einstellungen\Admin\Eigene Dateien\Schriftverkehr Geschäftlich\RECHNUNG\"&K13;" zur Rechnung");" keine Datei")

Kann mir jemand weiterhelfen? Gibts in Calc überhaupt eine Lösung/Funktion für das Problem?

Schöner Gruß - Martin

[Karolus]

Hallo
per Basicfunktion:

Code: Alles auswählen

function fileexist( pfad )
fileexist = iif ( fileexists( ConvertToUrl( pfad )), 1, 0 )
end function

Aus Calc aufrufen mit:
=FILEEXIST( "C:\Dokumente und ...\RECHNUNG\"&h14;" zur Rechnung")

Karo

[speedym79]

Hallo Karolus

Danke für deine Antwort... aber ich fürchte, für die Basicfunktion bin ich nicht schlau genug!

Habe unter Bibliotheken ein Makro erstellt und deinen Text hineinkopiert. Die Calc-Zeile habe ich entsprechend abgeändert und eingefügt, aber es kommt nur die Meldung "Wert"!

Fällt dir in meiner Vorgehensweise ein Fehler auf?
Könntest du so nett sein und nochmal kurz über deinen Text schauen und schauen ob sich ein fehler eingeschlichen hat!? Wie wichtig sind die Leerzeichen?
Ich selbst kenn mich ehrlich gesagt zu wenig aus um einen möglichen Fehler zu entdecken!!

Besten Dank - Martin

[Karolus]

Hallo

Ich hab vergessen zu erwähnen das Funktionen, die aus einer Calczelle heraus aufgerufen werden sollen, in einem Modul unterhalb deiner 'Standard' -bibliothek(en)*** existieren müssen -

***entweder ...→MeineMakros→Standard oder ...→deinDokumentname.ods→Standard..

Aber falls du sie in eine andere Bibliothek gesteckt hast wäre ein #Name fehler ausgegeben worden und nicht #Wert
?
Karo

[speedym79]

Hallo Karolus

Hatte versehentlich in der Zelle "=fileexist..." verhundst! Jetzt steht statt "#Wert" "#Name" dort.

Finde aber den Fehler trotzdem nicht:

test-basic2.jpg (126.07 KiB) 938 mal betrachtet

Wenn ich die Prozedurschritte durchgehe, kommt dieser Fehler:

test-basic3.jpg (125.15 KiB) 938 mal betrachtet

Hat das was zu bedeuten?

Sg Martin

[Karolus]

Hallo

Hat das was zu bedeuten?

Du startest die Funktion aus der Basicoberfläche dabei gibst du aber kein 'Pfad' -argument mit - deshalb der Fehler.


______
zum #NAME-fehler:

Genau den Fall hab ich doch in der letzten Antwort beschrieben!

Du hast offenbar eine neue Bibliothek 'fileexist' angelegt und die funktion in einem Modul in dieser Bibliothek gespeichert.
Die Funktion muss aber in ein Modul in der 'Standard'-bibliothek um aus Calc heraus erreichbar zu sein.

Karo

[speedym79]

Hey Karolus

Tatsache - es funktioniert! Jetzt wirft es mir 0 oder 1 aus... damit lässt sich was anfangen!

Das habe ich nicht zuletzt deiner Geduld zu verdanken!!! Auch wenn ich absoluter Basic-Neuling bin, hab ich mich ja nicht gerade mit Ruhm bekleckert!
Nochmal DANKE dafür!!

Schöne Grüße - Martin