Fehlermeldungen durch Makro

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

MHage
**
Beiträge: 49
Registriert: Fr, 17.12.2010 19:28

Fehlermeldungen durch Makro

Beitrag von MHage »

Hallo,

ich habe eine Calc Tabelle, der mehrere Makros hinterlegt sind. Da dort zum Teil sensible Daten drin stehen, habe ich diese Bibliotheken Passwort geschützt.

So weit, so gut. in einem Feld der Calc Tabelle wird ein Speicherpfad angegeben. Solange der richtig ist, funktioniert alles bestens. Sobald dort aber ein nicht funktionierender Pfad eingetragen wird, kommt es zu einer Fehlermeldung im Makro und er macht doch tatsächlich das Fenster auf und zeigt freizügig den Quelltext!

Das war so nicht geplant. Kann man die Fehler nicht abfangen, und an stelle dem Quelltext eine MsgBox öffnen?

Gruß
Matze
Benutzeravatar
komma4
********
Beiträge: 5332
Registriert: Mi, 03.05.2006 23:29
Wohnort: Chon Buri Thailand Asia
Kontaktdaten:

Re: Fehlermeldungen durch Makro

Beitrag von komma4 »

MHage hat geschrieben:Kann man die Fehler nicht abfangen, und an stelle dem Quelltext eine MsgBox öffnen?
Klar - kann man.

Prüfe die Eingabe mit XURLTransformer und gib ggfs. eine Fehlermeldung aus.

Viel Erfolg!
Cheers
Winfried
aktuell: LO 5.3.5.2 30m0(Build:2) SUSE rpm, unter Linux openSuSE Leap 42.3 x86_64/KDE5
DateTime2 Einfügen von Datum/Zeit/Zeitstempel (als OOo Extension)
MHage
**
Beiträge: 49
Registriert: Fr, 17.12.2010 19:28

Re: Fehlermeldungen durch Makro

Beitrag von MHage »

Hi,

Danke für deine Antwort. Gut zu wissen, das es auch anders geht.

Ich habe mir mal deinen Link angesehen. Damit bin ich im Moment überfordert. Kannst du mich das etwas präziser erklären?

Vielleicht mit einem Beispiel?

Gruß
Matze
Benutzeravatar
komma4
********
Beiträge: 5332
Registriert: Mi, 03.05.2006 23:29
Wohnort: Chon Buri Thailand Asia
Kontaktdaten:

Re: Fehlermeldungen durch Makro

Beitrag von komma4 »

Matze:

handelt es sich um "lokale" Verzeichnisse?
Dann geht es auch einfach mit der DIR-Funktion

Code: Alles auswählen

Sub de56639
' 20110211


sPfadDa = "c:\programme\openoffice.org 3"
sPfadFehlt = "C:\Programme\Fehlt"

' Variable enthaelt den Verzeichnisnamen
sValue = DIR( sPfadDa )
Msgbox sValue

' leere Variable 
sValue = DIR( sPfadFehlt )
Msgbox sValue

End Sub


Hilft Dir das weiter?
Cheers
Winfried
aktuell: LO 5.3.5.2 30m0(Build:2) SUSE rpm, unter Linux openSuSE Leap 42.3 x86_64/KDE5
DateTime2 Einfügen von Datum/Zeit/Zeitstempel (als OOo Extension)
Antworten