Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1264to1268
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
Inhaltsverzeichnis

Formel kopieren

Formel kopieren
Golem
Hallo Excel-Fachleute,
ich habe nur sehr geringe Kenntnisse im Bereich VBA und habe deshalb nach fertige Lösungen für meinen
Wunsch gesucht.
Leider ohne Erfolg!
Mein Wunsch ist, ein Code/Makro zu verwenden, um folgende Formel ❴=SUMME(ZÄHLENWENN(T36:Y36;$E$26:$Q$26))❵ , ist in der Zelle z.B. C35 vorhanden, in andere Spaltenbereiche zu kopieren ( z.B. K40:K25000, R40:R25000, Z40:Z25000 usw. ).
Z.B. ich gebe in den CODE/Makro die Spaltenbereiche ein ( die Spaltenbereiche werden einmal festgelegt und werden nicht mehr verändert ) und durch betätigen eines Button wird aus der Zelle C35 die Formel in die Spaltenbereiche kopiert. Die Formel passt sich automatisch den Spalten- und Zeilenköpfen an.
Sollte mal die Formel geändert werden, so kann dann durch betätigen des Button die Formel in den Spatenbereichen geändert werden.
Für evtl. Tipps oder Anregungen schonmal besten Dank!
Golem

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Formel kopieren
24.05.2012 15:08:19
haw
Hallo,
z.B. so:
Sub FormelKopieren()
Range("K40:K25000").FormulaR1C1 = Range("C35").FormulaR1C1
Range("R40:R25000").FormulaR1C1 = Range("C35").FormulaR1C1
Range("Z40:Z25000").FormulaR1C1 = Range("C35").FormulaR1C1
End Sub

Gruß
Heinz
AW: Formel kopieren
24.05.2012 15:26:23
ChrisL
Hi
Oder so....
Private Sub CommandButton1_Click()
Dim rng As Range
Set rng = Range("K40:K25000,R40:R25000,Z40:Z25000")
rng.Formula = Range("C35").Formula
End Sub

cu
Chris
AW: Formel kopieren
24.05.2012 15:37:51
Reinhard
Hallo Beteiligte,
wie wäre es mit:
Sub tt()
Range("K40:K25000,R40:R25000,Z40:Z25000").FormulaArray = Range("C35").FormulaArray
End Sub

Gruß
Reinhard
Anzeige
AW: Formel kopieren
25.05.2012 10:39:53
Golem
Hallo Excel-Fachleute,
einen schönen Dank für Eure Vorschläge. Werde ich sofort für meine Anwendung verwenden.
Schöne Grüße
Golem

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige