Tabellenübergreifendes Auslesen

Antwort erstellen


BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet

Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Tabellenübergreifendes Auslesen

Tabellenübergreifendes Auslesen

von WildpigDE » Fr, 09.06.2006 22:04

Hallo Leute!

In der Schule haben wir grade VB 6.0 und ich will eine Schraubenberechnung ausführen aber mit OO. Ich docktere seit einiger Zeit mit Beispieldateien rum. Ich habe es auch soweit, das ich in einer ComboBox ein Anzugsverfahren auswähle und es in einer anderen Zeile die Auswahl erscheint. Der Code zum Schreiben in die Zelle:
Set oDoc = ThisComponent
Set oSheet = oDoc.Sheets.GetByName("Auswahl")
Set oForm = oSheet.DrawPage.Forms.GetByName("Standard")
Set oComboBox = oform.getByName("ComboBox01")
Set oCellRangeDestination = oSheet.getCellRangeByName("D16")
und zum Laden der Anzugsverfahren
Set oDoc = ThisComponent
Set oSheet = oDoc.Sheets.GetByName("Auswahl")
Set oForm = oSheet.DrawPage.Forms.GetByName("Standard")
Set oComboBox = oform.getByName("ComboBox01")
Set oCellRangeSource = oSheet.getCellRangeByName("B14:B20")
Ich möchte nun zum einen die Daten nicht aus dem Tabellenblatt "Auswahl", sondern aus dem Tabellenblatt "Anzugsverfahren" rausziehen. Zum Anderen möchte ich die in der Tabelle stehenden Anzugsverfahren angezeigt haben und die in der Nächsten Spalte stehen Werte angezeigt haben. Puh, ich hoffe, jemand kann mir da helfen :oops: Wie gesagt, ich bin da absoluter Neuling...
Bis dann
Klaus

Nach oben