OpenOffice.info

Moin,
du hast einen zu kurzen Strich vor dem LibreOffice Base verwendet
FALSCH:
If oFrame.Name = "BibliographicDataBase" Or InStr(oFrame.Title, "- LibreOffice Base") > 0 Then
RICHTIG:
If oFrame.Name = "BibliographicDataBase" Or InStr(oFrame.Title, "– LibreOffice Base") > 0 Then
Spiegelstrich ...

Moin,
reiner Zufall, habe bissel rumgeklickt.

Gruß R

Moin,
das kann ich nachvollziehen, die Symbolleiste "Zeichnungsobjekteigenschaften" erscheint nicht, wenn man das Textfeld anklickt.
Scheint in dieser Version ein Bug zu sein, in 24.8.7 funktioniert es noch.
Bei mir half als Workaround:
Textfeld markieren
zwei Mal auf "Textfeld" klicken (kein ...

Moin,
ich habe eben versucht, deine Situation dadurch nachzustellen, dass ich die Calc Datei (.ods) und die Base Datei (.odb) zusammen in zwei unterschiedlichen Ordnern gespeichert habe.
Die .odb im ersten Ordner habe ich unter Extras/Optionen/LO Base/Datenbanken registriert, sie zeigte auf die Calc ...

Aber sicher, wenn man weiß, dass 1024 Megabyte ein Gigabyte sind, braucht man nur noch

• /
• SUM()

Das schaffst du.

... und beim Speichern als PDF kann man das Passwort auf dem Reiter Sicherheit setzen ...Gruß R

Moin,
weil ich heute gute Laune habe:
Sub PrintIfXInCell
Dim oDoc As Object
Dim oSheet As Object
Dim oRange As Object
Dim cell As Object
DIM oPrintareas(0) as new com.sun.star.table.CellRangeAddress
DIM printProp(0) as new com.sun.star.beans.PropertyValue
printProp(0).name = "Wait ...

Moin,
weiß nicht woher das Makro kommt, es funktioniert nicht, ThisComponent.PrintRanges gibt es in AOO/LO nicht.
Folgendes Makro sollte funktionieren, aktuell für Tabellenblatt 1, kann hier geändert werden:
oSheet = oDoc.Sheets(0) ' 0 für das erste Blatt
Sub PrintIfXInCell(optional event) 'event ...

Moin,
binde dieses kurze Makro an die Eigenschaft Text modifiziert des Suchfeldes. TM.png
Sub Suchen
oF_FILTER = Thiscomponent.drawpage.forms.F_FILTER
oSuchfeld = oF_FILTER.Suchfeld
oSuchfeld.commit
oF_FILTER.UpdateRow()
oF_Anzeige = oF_FILTER.Anzeige
oF_Anzeige.reload
end sub

Frohe ...

Bitteschön:
Dim oDialog2 as Object
Sub Dialog2_Show
oSheet = Thiscomponent.sheets.getbyname("Tabelle1")
DialogLibraries.LoadLibrary("Standard")
oDialog2 = CreateUnoDialog( DialogLibraries.Standard.Dialog2 )

if oDialog2.Execute() then
Dim cell_val
oPatternField1 = oDialog2.GetControl ...

Moin,
ich kann dieses Verhalten unter W10; AOO 4.1.15 nicht nachvollziehen.
Wenn ich die Spaltenbreite zurück auf den Standardwert (2,27 cm) setze, das Dokument speichere, schließe und wieder öffne, ist die Spalte 2,27 cm breit, so wie gewollt.
Gruß R

oder, dem Beispiel von Helmut_S folgend, einfach Das & Zeichen (kaufmännisches UND) verbindet Texte
Gruß R

Hallo Anfänger007,
nie im Leben, die beiden Dateien, die du geschickt hast haben ja sogar eine unterschiedliche Dateigröße: Gruß R

Moin Anfänger007,
was machst du da?
Wenn ich deine beiden .csv Dateien in einem Editor vergleiche, sehe ich, dass sie unterschiedlich sind.
Während in der Datei des "alten Rechners" tatsächlich Kommas und Semikola so wie für deinen Import notwendig, enthalten sind, gibt es in der .csv Datei des ...