OpenOffice.info

Hallo und Danke Stephan.

Es klappt ....

Grüße
Uli_Neu

Liebe Foren-Gemeinde!

Ich habe Schwierigkeiten, ein kennwort-geschütztes Tabellenblatt, das auf Makros
und Funktionen Bezug nimmt, über die Menübefehle (Bearbeiten/ Verschieben/Kopieren)
oder erst recht per Makro (welches später mit einer Schaltfläche verknüpft werden soll)
zu kopieren und in die ...

Lieben Foren-Gemeinde!

Ich möchte Funktionen, die ich in OpenOffice 2.4.1 geschrieben habe,
vor Einblick und Veränderungen schützen.

Leider lassen sich Funktionen aus einer in die Datei eingefügten (neuen)
Modul-Bibliothek, die mit Kennwörtern geschützt worden ist, - anders als Makros -
nicht ...

Hallo Wilfried und liebe Forum-Gemeinde!

Der folgende Versuch funktioniert:

'Neuer Versuch 16.08.2008
sub NutzgBedZeigen
Dim oDialog1, oDialogLib AS Object
Globalscope.BasicLibraries.LoadLibrary("Tools")
oDialogLib = ThisComponent.DialogLibraries
oDialog1 = LoadDialog( "MakrosUH", "NutzgBed_dlg ...

Hallo liebe Forum-Gemeinde!

Also ich habe mich noch einmal um das Problem
gekümmert und bleibe dabei.

Eine aus Excel übernommene Datei, die in Zellen,
die in Excel als Zahl (Währung) formatiert worden sind,
Texteinträge enthält, liefert bei folgendem Makro ein
falsches Ergebnis.

Erst nachdem ich ...

Liebe Forum-Gemeinde!

Ich habe bisher in VBA programmiert und möchte eine Excel Anwendung
in OpenOffice 2.4.1 (*.ods) umschreiben.

Die Datei "KUH2008.ods" hat neben der standard.Bibliothek noch eine
weitere Bibliothek erhalten, die mit "MakrosUH" benannt wurde.
Die Bibliothek "MakrosKUH" enthält ...

Hallo!

Es handelt sich bei der von mir bearbeiteten
Datei um eine Excel Arbeitsmappe, die ich in
OpenOffice 2.4.1 als ods-Datei abgespeichert
habe.
Die Zelle B119 enthielt einen Texteintrag "ja",
die Zelle war aber in Excel (warum auch immer)
als Zahl formatiert worden.
Nachdem ich jetzt die ...

Hallo Winfried!

Doch - genau daran liegt es.
Ich habe mir die größere Tabelle
vorgenommen und u. a. die Zelle B119
(war wohl während der Bearbeitung in Excel
mal auf Zahl formatiert gewesen) als Text
umformatiert. ... und jetzt klappt das Makro.

Keine Leerstelle, keine Groß- und Kleinschreibung ...

Hallo!

Ich glaube, der Fehler ist gefunden.

In der Tabelle war die Zelle mit dem Eintrag "ja"
als Zahl formatiert.

Scheinbar deshalb konnte der Basic-Code darauf
nicht als string zugreifen.

Gar nicht so einfach, darauf zu kommen.

Grüße
Uli_Neu

Hallo und Danke für Eure Hilfe.

Es muss wohl irgendwie an der Datei selbst liegen.

In einer anderen Datei kopiert funktioniert das
Makro einwandfrei.

Ich versuche den Fehler zu finden und poste
das Ergebnis hier.

Grüße
Uli_Neu

Hallo!

Das Makro "haargenau so geschrieben"
funktioniert auch auf dem Laptop nicht
und zeigt trotz erster Meldung "ja" in
der zweiten Meldung "false" an.
Woran kann sowas liegen?

Ich martere mir ebenfalls den Kopf

Schöne Grüße
Uli_Neu

Hallo!

Das folgende Makro funktioniert nicht.

Kann mir jemand helfen?

sub Testmakro
Dim BKBPruef as string
Dim BKBKontrolle as boolean
'in Zelle B119 steht "ja"
BKBPruef = ThisComponent.currentcontroller.activesheet.getCellRangeByName("$B$119").string

If BKBPruef = "ja" Then
BKBKontrolle = True ...