Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
560to564
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
560to564
560to564
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Richtige Schreibweise zum eintragen von Formeln.

Richtige Schreibweise zum eintragen von Formeln.
04.02.2005 08:09:46
Formeln.
Guten Morgen Forum,

Ich trage mit einem aufgezeichneten Makro,

********************************************************************************
Sheets(3).Select **(Info: Sheets (3) entspricht "Jahr_2005")**
Range("C4").Select
Selection.ClearContents
ActiveCell.FormulaR1C1 = "='Jahr_2004'!R[60]C+1"
********************************************************************************
Überträge von einem Tabellenblatt zum anderen ein.
Wenn sich nun mein Tabellenblattname ändert
(z.B. von "Jahr_2004" nach "Jahr_2004_neu)
passt mein Makro nicht mehr. Die Auswahl habe ich über Sheets(3) gelöst.


Weitere Info:
Die Tabellenblätter werden mit einem weiteren Makro
anhand einer dynamische Liste angelegt.
Dannach werden die Formeln eingetragen.
Die Position in der Tabelle bleibt immer gleich.
Die Tabellenblattnamen werden nur öfters geändert.
z.B."Jahr_2004" ist immer Tabellenblatt (2) wird zu "Jahr_2004_neu"
"Jahr_2005" ist immer Tabellenblatt (3) wird zu "Jahr_2005_neu"


Nun meine konkrete Frage:
Wie muss ich die Formel umschreiben

ActiveCell.FormulaR1C1 = "='Jahr_2004'!R[60]C+1"

das auf das Tabellenblatt (2) gegriffen wird.

Ich hoffe es ist verständlich erklärt.

Im voraus schon mal besten Dank.

Gruß
Gerold Dornbusch

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Richtige Schreibweise zum eintragen von Formel
04.02.2005 08:30:11
Formel
Hallo Gerold!
Wenn die Reihenfolge immer gleich bleibt, dann so.

Sheets(3).Range("C4").FormulaR1C1 = "='" & Sheets(3).Name & "'!R[60]C+1"

Dann ersparst du dir auch das Selectieren!
Gruß Sepp
P.S.: Rückmeldung nicht vergessen!
AW: Richtige Schreibweise zum eintragen von Formel
04.02.2005 08:46:21
Formel
Hallo Sepp,
vielen Dank für die schnelle Antwort.
Ich habe es auch schon getestet.
Funktioniert super.
Vielen Dank und schönes Wochenende.
Gruß
Gerold Dornbusch
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige