Die Suche ergab 3763 Treffer

von F3K Total
Sa, 20.12.2025 11:24
Forum: Base / SQL
Thema: Filter in Subformular
Antworten: 8
Zugriffe: 11771

Re: Filter in Subformular

krt hat geschrieben: Sa, 20.12.2025 10:51 Das funktioniert aber nur mit Makros, wie im Handbuch auf S. 523 beschrieben, oder?
Nein, einfach im Listenfeld den obersten, leeren Eintrag auswählen und die Anfangsbuchstaben eintippen. Kein Makro nötig!
Listenfeld.gif
Listenfeld.gif (285.98 KiB) 6337 mal betrachtet
Gruß R
von F3K Total
Sa, 20.12.2025 09:41
Forum: Base / SQL
Thema: Filter in Subformular
Antworten: 8
Zugriffe: 11771

Re: Filter in Subformular

Moin,
wenn ich dich richtig verstanden habe, möchtest du die Liste im Listenfeld Ver_ID durch einen Vorfilter verkürzen.
Das geht ohne Makro, aber mit mehreren Klicks.
Siehe deine geänderte Datei anbei. lst.png

Suchbegriff eingeben
Listenfeld anklicken
Listenfeld aktualisieren
Dann werden im ...
von F3K Total
Fr, 19.12.2025 13:30
Forum: Base / SQL
Thema: Filter in Subformular
Antworten: 8
Zugriffe: 11771

Re: Filter in Subformular

Moin,
an einem Bild kann man die Datenbank nicht verstehen.
Lade die Datei, ggf. verfremdet, hier hoch, dann kann man eventuell mal schauen.

Gruß R
von F3K Total
Do, 18.12.2025 16:21
Forum: Base / SQL
Thema: Filter in Subformular
Antworten: 8
Zugriffe: 11771

Re: Filter in Subformular

Moin,
mit ein paar Klicks geht das auch, aber umgekehrt.
Erst wird der Veranstaltende gesucht, mit zwei Filter-Feldern, dann wird ein Datum zugeordnet.
Beispiel anbei, bitte von 1.) bis 6.) durchklicken.

Gruß R
PS: Wusstest du, dass ein Listenfeld filtern kann? Sprich, du gibst die ...
von F3K Total
Sa, 12.07.2025 11:40
Forum: Base / SQL
Thema: CD Zähler
Antworten: 1
Zugriffe: 23709

Re: CD Zähler

Code: Alles auswählen

SELECT "CD's", COUNT("CD's") AS "ANZAHL" FROM "T_CDs" GROUP BY "CD's"
von F3K Total
Mo, 23.06.2025 16:58
Forum: Makros und allgemeine Programmierung
Thema: Libreoffice Base Hauptfenster (Containerfenster) Ausblenden
Antworten: 1
Zugriffe: 28167

Re: Libreoffice Base Hauptfenster (Containerfenster) Ausblenden

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 ...
von F3K Total
Sa, 21.06.2025 11:20
Forum: Calc
Thema: Calc - Textfelder lassen sich nicht mehr kopieren und formatieren
Antworten: 4
Zugriffe: 30866

Re: Calc - Textfelder lassen sich nicht mehr kopieren und formatieren

Moin,
reiner Zufall, habe bissel rumgeklickt.

Gruß R
von F3K Total
Sa, 21.06.2025 09:23
Forum: Calc
Thema: Calc - Textfelder lassen sich nicht mehr kopieren und formatieren
Antworten: 4
Zugriffe: 30866

Re: Calc - Textfelder lassen sich nicht mehr kopieren und formatieren

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 ...
von F3K Total
Sa, 17.05.2025 17:38
Forum: Base / SQL
Thema: Datenbank ist mit der richtigen Quelle verbunden - aber ich verstehe es nicht.
Antworten: 2
Zugriffe: 42342

Re: Datenbank ist mit der richtigen Quelle verbunden - aber ich verstehe es nicht.

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 ...
von F3K Total
Mi, 19.03.2025 21:02
Forum: Base / SQL
Thema: Berechnung von Megabyte in Gigabyte
Antworten: 1
Zugriffe: 15435

Re: Berechnung von Megabyte in Gigabyte

Aber sicher, wenn man weiß, dass 1024 Megabyte ein Gigabyte sind, braucht man nur noch
  • /
  • SUM()
Das schaffst du.
von F3K Total
Sa, 15.02.2025 08:48
Forum: Writer
Thema: Passwortschutz für Dokumente?
Antworten: 2
Zugriffe: 19880

Re: Passwortschutz für Dokumente?

... und beim Speichern als PDF kann man das Passwort auf dem Reiter Sicherheit setzen ...
PW.png
PW.png (28.51 KiB) 18736 mal betrachtet
Gruß R
von F3K Total
Do, 09.01.2025 17:23
Forum: Makros und allgemeine Programmierung
Thema: [gelöst]nur dann, einen bestimmten Bereich drucken, wenn in einer Zelle ein X
Antworten: 6
Zugriffe: 26407

Re: nur dann, einen bestimmten Bereich drucken, wenn in einer Zelle ein X

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 ...
von F3K Total
Mi, 08.01.2025 17:04
Forum: Makros und allgemeine Programmierung
Thema: [gelöst]nur dann, einen bestimmten Bereich drucken, wenn in einer Zelle ein X
Antworten: 6
Zugriffe: 26407

Re: nur dann, einen bestimmten Bereich drucken, wenn in einer Zelle ein X

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 ...
von F3K Total
Mi, 25.12.2024 10:49
Forum: Makros und allgemeine Programmierung
Thema: Makro für Suche bei Betätigung der Enter-Taste
Antworten: 2
Zugriffe: 17309

Re: Makro für Suche bei Betätigung der Enter-Taste

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 ...
von F3K Total
Di, 10.12.2024 16:58
Forum: Makros und allgemeine Programmierung
Thema: LO_Calc ListBox Makro
Antworten: 2
Zugriffe: 18527

Re: LO_Calc ListBox Makro

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 ...