kobinationsfeld in dialog

[ykcim]

Du mußt lediglich eine Schleife über den Calc-Bereich machen und die einzelnen Werte dem Kombinationsfeld hinzufügen.

Code: Alles auswählen

  Dim MyDlg as Object
  Dialoglibraries.Loadlibrary("Standard")
  MyDlg= CreateUnoDialog(Dialoglibraries.Standard.Dialog1)
  MyControl=MyDlg.GetControl("ComboBox1")
  
  myDoc = thisComponent
  mySheet = myDoc.sheets(0)
'  Zum Beispiel für die erste Spalte bis Zeile 7 
  For i=0 to 6
  mycell = mysheet.getCellByPosition(0,i)
  MyControl.additem(mycell.value, i)
  next i
  MyDlg.execute()

mfg
Michael

[komma4]

Developers Guide bzw. http://api.openoffice.org/docs/common/r ... le-ix.html sind die Quellen...

[ykcim]

Schau mal in den aller ersten Beitrag in dieser Gruppe. Dort stehen einige nützliche Verweise auf Dokumentation.

Vor allem das SDK mit einer Referenz ist wichtig.
Für 2.4: http://download.openoffice.org/2.4.0/sdk.html
Für 3.0: http://download.openoffice.org/3.0.0/sdk.html

Na ja un meine FAQ ist auch recht nützlich


mfg
Michael