[gelöst] Tabellenblätter durch Liste generieren

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

Moderator: Moderatoren

jakobe
Beiträge: 5
Registriert: Di, 07.06.2011 15:43

[gelöst] Tabellenblätter durch Liste generieren

Beitrag von jakobe »

Hallo liebe OpenOffice Gemeinde,

Ich habe diesen Beitrag zwar schon im OOo Calc bereich gepostet aber man sagte mir das es eher ein Thema für Basic oder Java wäre. Sorry @ Administrator


Ich möchte in Calc anhand einer Tabelle neue Tabellenblätter generieren lassen.
Nach der Generierung möchte ich Zellen aus einer Tabelle in diese hineinkopieren.
Frage: Geht das?
bin leider noch ein Dau was Tabellenkalkulation angeht.

Hier ein Beispiel


Tabelle1 mit Namen für die Tabellengenerierung (Zelle d2 bis d20)
Anstatt Tabelle2,Tabelle3 usw. den Eintrag für Tabelle2, den Namen aus Zelle D2.Tabelle3 den Namen aus Zelle D3 usw.

dann aus Tabelle_Grund A1 bis Z16
in die neu generierten Tabellenblätter hineinkopieren.
Ich hoffe ich habe mich verständlich ausgedrückt sonst bitte kurze nachricht.

Für Hilfe wäre ich sehr dankbar.
Ich hinterlege eine Calc Datei zum besserem verständniss.
Dateianhänge
kopie6a.xls
(17.5 KiB) 38-mal heruntergeladen
Zuletzt geändert von jakobe am Mi, 08.06.2011 22:24, insgesamt 1-mal geändert.
Karolus
********
Beiträge: 7533
Registriert: Mo, 02.01.2006 19:48

Re: Tabellenblätter durch Liste generieren

Beitrag von Karolus »

Hallo

Code: Alles auswählen

Sub tabellenblaetter_kopieren
odoc = thisComponent
namensblatt = odoc.sheets().getbyName( "Klasse" )
for i = 1 to 20
	newname = namensblatt.getcellbyposition(3, i ).string
	odoc.Sheets.CopyByName("Grundtabelle", newname , i+1 )
next i

End Sub
Gruß Karo
LO7.4.7.2 debian 12(bookworm) auf Raspberry5 8GB (ARM64)
LO25.2.3.2 flatpak debian 12(bookworm) auf Raspberry5 8GB (ARM64)
jakobe
Beiträge: 5
Registriert: Di, 07.06.2011 15:43

Re: Tabellenblätter durch Liste generieren

Beitrag von jakobe »

Karolus hat geschrieben:Hallo

Code: Alles auswählen

Sub tabellenblaetter_kopieren
odoc = thisComponent
namensblatt = odoc.sheets().getbyName( "Klasse" )
for i = 1 to 20
	newname = namensblatt.getcellbyposition(3, i ).string
	odoc.Sheets.CopyByName("Grundtabelle", newname , i+1 )
next i

End Sub
Gruß Karo
Hallo Karo,
danke für deine schnelle Hilfe.
Wo muss man denn den Code einfügen?
jakobe
Beiträge: 5
Registriert: Di, 07.06.2011 15:43

Re: Tabellenblätter durch Liste generieren

Beitrag von jakobe »

Hallo Karo sorry ich habe es gefunden.
Funktioniert super Danke
Antworten