Button ausblenden

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

Moderator: Moderatoren

Stephan
********
Beiträge: 12368
Registriert: Mi, 30.06.2004 19:36
Wohnort: nahe Berlin

Re: Button ausblenden

Beitrag von Stephan »

Wenn der Name der Schaltflähe "Schaltfläche 1" und der Name des sog. Formulars auf dem sich die Schaltfläche befindet "Formular" ist, dann z.B.:

Code: Alles auswählen

sub Main
tc0 = ThisComponent.Sheets(0)
If tc0.getCellRangeByName("C34").Value <= -1 Then 
	x = tc0.Drawpage.Forms.getByName("Formular").getByName("Schaltfläche 1")
	x.enableVisible = Not(x.enableVisible)
End If
end sub
Gruß
Stephan
Dateianhänge
Schaltfläche-sichtbar-unsichtbar.ods
(9.05 KiB) 297-mal heruntergeladen
clag
********
Beiträge: 3570
Registriert: Di, 27.01.2009 15:30

Re: Button ausblenden

Beitrag von clag »

Hallo aqua,
aqua hat geschrieben:Hab es mal versucht auf meinen Fall zu übertragen, leider ohne Erfolg..
das bedeutet nun was?
LG
clag

nutzt: WinXP SP3 / AOO 4.1.10 / Firefox
Benutzeravatar
komma4
********
Beiträge: 5332
Registriert: Mi, 03.05.2006 23:29
Wohnort: Chon Buri Thailand Asia
Kontaktdaten:

Re: Button ausblenden

Beitrag von komma4 »

Da wir weder Deine Datei kennen, noch den (angepassten) Code, weiss ich nicht, wie wir Dir hier weiterhelfen könnten.
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)
aqua
**
Beiträge: 34
Registriert: Do, 23.07.2015 07:25

Re: Button ausblenden

Beitrag von aqua »

Ok das stimmt. Hab die Datei mal hochgeladen.

Die Schaltfläche die ausgeblendet werden soll befindet sich auf dem Blatt "Modul1". Der Vergleichspunkt ist entweder C34 auf dem Blatt "Modul1" oder B21 auf Grunddaten.
Gestartet werden soll das am mit dem Speicherbutton auf dem Blatt Grunddaten.
Dateianhänge
Test.ods
(24.54 KiB) 213-mal heruntergeladen
clag
********
Beiträge: 3570
Registriert: Di, 27.01.2009 15:30

Re: Button ausblenden

Beitrag von clag »

Moin aqua,

unter welchen Bedingungen kann sich der Wert in C34 ändern
Zur Zeit steht da [=$Grunddaten.B21] $Grunddaten.B21, was ist dein plan für $Grunddaten.B21?
Erfolgt immer eine Eingabe in $Grunddaten die die Werte verändern kann?

Dann verwende das Tabellenereignis Inhalt geändert in von $Grunddaten als Trigger für eine Prüfung von "Modul 1.C34"

hier Stephans Code etwas abgeändert

Code: Alles auswählen

sub checkC34
	Form = ThisComponent.Sheets(1).Drawpage.Forms.getByName("Formular")
	if ThisComponent.Sheets(1).GetCellRangeByName("C34").value < -1 then 
		Form.getByName("Schaltfläche 1").enableVisible = false
	else
		Form.getByName("Schaltfläche 1").enableVisible = true
	end if
end sub
ändere in $Grunddaten.B21 den Wert und beobachte Tabelle Module 1 danach.
Test+.ods
(23.94 KiB) 210-mal heruntergeladen
hilft das weiter?
LG
clag

nutzt: WinXP SP3 / AOO 4.1.10 / Firefox
aqua
**
Beiträge: 34
Registriert: Do, 23.07.2015 07:25

Re: Button ausblenden

Beitrag von aqua »

Hi clag
Vielen Dank für deine Mühe. Der Wert in Grunddaten.B21 wird per Hand eingetragen.
Das Aus- und Einblenden ist zwar falsch rum, aber da muss ich ja nur true und false tauschen, dann ist es genau so wie ich es will.
Dann verwende das Tabellenereignis Inhalt geändert in von $Grunddaten als Trigger für eine Prüfung von "Modul 1.C34"
Hab keine Ahnung wovon du da redest :(
clag
********
Beiträge: 3570
Registriert: Di, 27.01.2009 15:30

Re: Button ausblenden

Beitrag von clag »

Hallo
aqua hat geschrieben:Hab keine Ahnung wovon du da redest :(
einem Tabellenblattereignis ein Makro zuordnen:
dazu ein Rechtsklick mit der Maus im Tabellenblattregister auf den Reiter mit dem Tabellenblattnamen und im aufkommenden
Kontextmenü > Tabellenereignisse.. -Inhalt geändert > Zuweisen: [Makro] .... das gewünscht Makro zuordnen.
LG
clag

nutzt: WinXP SP3 / AOO 4.1.10 / Firefox
Antworten