Drehfeld Min/Max Werte aus Zelle ?

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

Moderator: Moderatoren

clag
********
Beiträge: 3570
Registriert: Di, 27.01.2009 15:30

Drehfeld Min/Max Werte aus Zelle ?

Beitrag von clag »

Hallo Leutz,

kann man in den Eigenschaften eines Drehfeldes den Werten von Min und Max Werte aus Zellen zuweisen ?
Da ich so in den Eigenschaften nichts gefunden habe, wie man da eine Zelle einbinden könnte vermute ich,
es geht nur über einen Makro Befehle?

Wenn ja, wie oder womit krieg ich da 'nen Zellenwert rein ?

schonmal Danke
LG
clag

nutzt: WinXP SP3 / AOO 4.1.10 / Firefox
DPunch
*******
Beiträge: 1112
Registriert: Mo, 02.11.2009 16:16
Wohnort: Marburg

Re: Drehfeld Min/Max Werte aus Zelle ?

Beitrag von DPunch »

Aloha

Da Du ja mittlerweile weisst, wie man Xray benutzt und Werte aus Zellen ausliest, sollte Dir eigentlich nur noch der Zugriff zum Drehfeld fehlen.
Den kriegst Du (in einem Calc-Dokument) folgendermassen:

Code: Alles auswählen

sSpinButtonName = "Drehfeld 1"  ' <--- muss natürlich der Name sein, den Du Deinem Drehfeld gegeben hast
oDoc = thisComponent
oSheet = oDoc.CurrentController.ActiveSheet
oDrawpage = oSheet.Drawpage
oForm = oDrawpage.Forms(0)
oControlModel = oForm.getByName(sSpinButtonName)
xray oControlModel
oder auch

Code: Alles auswählen

sSpinButtonName = "Drehfeld 1"  ' <--- muss natürlich der Name sein, den Du Deinem Drehfeld gegeben hast
oDoc = thisComponent
oSheet = oDoc.CurrentController.ActiveSheet
oDrawpage = oSheet.Drawpage
For i = 0 To oDrawpage.Count-1
	If oDrawpage(i).supportsService("com.sun.star.drawing.ControlShape") Then
		oControlModel = oDrawpage(i).Control
		If oControlModel.Name = sSpinButtonName Then
			xray oControlModel
		End If
	End If
Next i
clag
********
Beiträge: 3570
Registriert: Di, 27.01.2009 15:30

Re: Drehfeld Min/Max Werte aus Zelle ?

Beitrag von clag »

Hallo DPunch,
DPunch hat geschrieben:Da Du ja mittlerweile weisst, wie man Xray benutzt und Werte aus Zellen ausliest,
noch nicht wirklich

aber mit deiner prima Anleitung habe ich es jetzt geschafft und konnte die Werte direkt auslesen und hineinschreiben

Code: Alles auswählen

....
oControlModel1.ScrollValue = 100

wenn denn endlich mal was funktioniert ist das schon motivierend :D


Edit !

jetzt habe ich aber doch immer noch ein Problem
und zwar finde ich auch mit X-ray keinen Hinweis darauf, welche Zelle als Datenbereich zugewiesen wurde
um die per Makro wechseln zu können?
Speziell bei der zwei Bildlaufleisten wollte ich da per Makro wechseln um einen Schleppeffekt zu bekommen

Danke
LG
clag

nutzt: WinXP SP3 / AOO 4.1.10 / Firefox
turtle47
*******
Beiträge: 1849
Registriert: Mi, 04.01.2006 20:10
Wohnort: Rheinbach

Re: Drehfeld Min/Max Werte aus Zelle ?

Beitrag von turtle47 »

Hi Clag,
clag hat geschrieben:und zwar finde ich auch mit X-ray keinen Hinweis darauf, welche Zelle als Datenbereich zugewiesen wurde
um die per Makro wechseln zu können?
Wer suchet > "Drehfeld" der findet. :wink:

Viel Erfolg.


Jürgen
Software hat keinen Verstand - benutze deinen eigenen...!

Win 7 SP1/ LibreOffice 3.4.2 OOO340m1 (Build:203) / Firefox 15.0.1 / Notebook ASUS K70IO 64 Bit-Betriebssytem
Antworten