Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
276to280
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
276to280
276to280
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Summenformel über Marko dynamisch erstellen

Summenformel über Marko dynamisch erstellen
05.07.2003 17:03:42
Chris
Hallo,
ich melde mich nochmal, da mein Problem leider noch nicht ganz gelöst war:
mein Makro soll eine Formel, die die Summe einer Spalte eines anderen Tabellenblattes einfügen. Das ganze soll im Rahmen einer Schleife geschehen. Mit absoluten Bezügen (z.B. Tabelle2!g:g) funktioniert es, ich möchte jedoch erreichen, daß in Abhängigkeit von i immer eine Spalte nach oben gezählt wird ( also z.B. i=1=> Spalte g; i=2=> Spalte h). Dafür habe ich bisher folgendes Coding:
Dim i as integer
For i = 1 to 10
Activecell = "=sum(tabelle2!" & ?????????????
Activecell.offset(0,1).select
next i
Wichtig dabei, es muß eine Formel auf dem Tabellenblatt eingefügt werden, da sich die Werte auf "Tabelle2" verändern und ich nicht jedesmal das Makro laufen lassen möchte.
Ihr wißt sicher (wie immer), wie es geht.
Grüße
Chris

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Summenformel über Marko dynamisch erstellen
05.07.2003 17:40:46
WernerB.
Hallo Chris,
was hältst Du hiervon:
~begin~
Option Explicit

Sub Chris()
Dim sB As String
Dim i As Byte
For i = 7 To 16
sB = Left(Cells(1, i).Address(False, False), 1)
ActiveCell.Formula = "=SUM(Tabelle2!" & sB & ":" & sB & ")"
ActiveCell.Offset(0, 1).Select
Next i
End Sub

~end~
Viel Erfolg wünscht
WernerB.

Anzeige

167 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige