Hallo,
ich bin absoluter Neuling. Was ich gerne lösen möchte.
aus über 80 Tabellenblättern möchte ich in die Tabelle "Übersicht" in die Spalte A die Tabellennamen und in Spalte B die jeweils dazugehörigen Inhalte der Zelle A3 so eintragen, dass eine Verknüpfung besteht.
Kann mir einer helfen?
gleiche Zellen aus Tabellenblättern auslesen
Moderator: Moderatoren
Hallo Neuling,
Zuerst brauchst Du ja die Tabellennamen in Spalte A1.
Wenn es keine Namenslogik gibt dann hilft Dir ein kleines Makro,
(Hoffentlich überfordere ich Dich damit nicht)
denn ich denke Du möchtest die Namen nicht alle händisch eintragen.
Die Tabelle "Übersicht" sollte Dein erstes Tabellenblatt sein.
Wenn es bei 80 Tabellenblättern aber das letzte Blatt ist dann musst Du in dem Makro ändern!!
Das Makro also installieren und ausführen.
Schwups sind alle Tabellennamen in Spalte "A" schön untereinander aufgelistet.
Die Tabelle "Übersicht" wird da natürlich auch angezeigt. Die Zelle kannst Du ja löschen.
In Zelle B1 schreibst Du jetzt folgende Formel:
und ziehst die nach unten so lang wie Deine Liste in Spalte A ist.
Fertig.
Viel Erfolg
Jürgen
Zuerst brauchst Du ja die Tabellennamen in Spalte A1.
Wenn es keine Namenslogik gibt dann hilft Dir ein kleines Makro,
(Hoffentlich überfordere ich Dich damit nicht)
denn ich denke Du möchtest die Namen nicht alle händisch eintragen.
Code: Alles auswählen
Sub TabellenNamenAuslesen
doc=thisComponent
for i = 0 to doc.sheets.count - 1
doc.sheets(0).getcellbyposition(0,i).string=doc.sheets(i).name
next
End Sub
Die Tabelle "Übersicht" sollte Dein erstes Tabellenblatt sein.
Wenn es bei 80 Tabellenblättern aber das letzte Blatt ist dann musst Du in dem Makro
Code: Alles auswählen
"doc.sheets(0)" in "doc.sheets(79)"
Das Makro also installieren und ausführen.
Schwups sind alle Tabellennamen in Spalte "A" schön untereinander aufgelistet.
Die Tabelle "Übersicht" wird da natürlich auch angezeigt. Die Zelle kannst Du ja löschen.
In Zelle B1 schreibst Du jetzt folgende Formel:
Code: Alles auswählen
=INDIREKT(VERKETTEN(A1;".A$3"))
Fertig.
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
Win 7 SP1/ LibreOffice 3.4.2 OOO340m1 (Build:203) / Firefox 15.0.1 / Notebook ASUS K70IO 64 Bit-Betriebssytem