Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Wert aus Tab1 mit Formel und VBA in Tab2

Wert aus Tab1 mit Formel und VBA in Tab2
10.10.2005 17:00:11
Rainer
Hallo zusammen,
ich möchte per VBA eine Formel in Tab2 eingeben, die sich auf eine Zelle in Tab1 bezieht. Die Formel sollt wie folgt aussehen: ='Tab1'!W22.
Für einen möglichen Lösungsweg bedanke ich mich im Voraus
Gruß Rainer
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert aus Tab1 mit Formel und VBA in Tab2
10.10.2005 17:12:04
tombo
Hallo Rainer,
so:

Sub Formel()
Dim strFormula As String
strFormula = "='[" & "Quelle.xls" & "]" & "Tabelle1" & "'!" & "W22"
ActiveCell.Formula = strFormula
End Sub

Gruß
tombo
AW: Wert aus Tab1 mit Formel und VBA in Tab2
10.10.2005 17:18:11
tombo
Rehi,
wenn sich alles in einer Mappe abspielt, brauchst du keine Quelle.xls-Angabe, also reicht dann:
strFormula = "=Tabelle1" & "!" & "W22"
Anzeige
AW: Wert aus Tab1 mit Formel und VBA in Tab2
10.10.2005 19:28:53
Rainer
Danke tombo,
der Anschub war genau der richtige.
Habe es so gelöst:

Sub Formel()
Dim strFormula As String
Dim Name As String
Set anzahl = Worksheets("Stammdaten").Range("i8")
Set Mitglieder = Worksheets("Mitglieder").Range("a18")
For a = 2 To anzahl Step 1
Name = Worksheets(a - 1).Range("C2")
strFormula = "='[" & "Kegelbuch.xls" & "]" & Name & "'!" & "W22"
Worksheets(a).Select
Range("W17").Select
ActiveCell.Formula = strFormula
Worksheets(a - 1).Select
For b = 1 To Mitglieder Step 1
Name = Worksheets(a - 1).Range("C2")
Zelle = "u" & b + 3
Zelle1 = "D" & b + 3
strFormula = "='[" & "Kegelbuch.xls" & "]" & Name & "'!" & Zelle
Worksheets(a).Select
Range(Zelle1).Select
ActiveCell.Formula = strFormula
Next b
Next a
End Sub

Gruß
Rainer
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige