Hallo Holger,
erstmal Danke für deine Antwort!!
Ich hab deinen Vorschlag gleich ausprobiert aber leider liest das
Programm nicht aus Sheets(3)ein:
Sub test()
Sheets(2).Activate
Set v = Range(Cells(1, 1), Cells(10, 1))
Sheets(3).Activate
Set w = Worksheets(2).Range(Cells(1, 1), Cells(10, 1))
Worksheets(4).Cells(1, 1) = Application.WorksheetFunction.Correl(v, w)
End Sub
Das entprechende Tabellenblatt blinkt nach dem aktivieren auf aber
eingelesen wird nur aus dem Sheets in dem auch der Code steht.
LG
Holger schrieb am 09.01.2008 18:23:39:
Hallo Schönes_Wetter,
versuche es mit
Sheets(5).Activate
Set v = Range(Cells(2, 1), Cells(14401, 1))
Sheets(1).Activate
Set w = Worksheets("Basis").Range(Cells(2, 2), Cells(14401, 2))
a = Application.WorksheetFunction.Correl(v, w)
Viel Erfolg
Holger
Schönes_Wetter schrieb am 09.01.2008 16:49:42:
Application.WorksheetFunction.Correl(Sheets(3).Range(Cells(2, 1), Cells(14401, 1)), Sheets(8).Range(Cells(2, 2), Cells(14401, 2)))
Hallo,
leider funktioniert dieser Befehl nicht!
Weiss jemand ob mein Vorhaben überhaupt möglich ist, d.h. In einer Formel auf unterschiedliche
Sheets zugreifen.
LG
|