Die Suche ergab 3763 Treffer

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

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) 7755 mal betrachtet
Gruß R
von F3K Total
Sa, 20.12.2025 09:41
Forum: Base / SQL
Thema: Filter in Subformular
Antworten: 8
Zugriffe: 13189

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: 13189

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: 13189

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: 24658

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: 29179

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: 31994

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: 31994

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: 1
Zugriffe: 43777

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: 16236

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: 20217

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) 19073 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: 27329

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: 27329

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: 18212

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: 19302

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