Probleme bei Datenübergabe in Methode

[lioncar]

Hallo!

Ich möchte einen Datenbereich in eine Methode übergeben. Mit Datenbereich meine ich die Cellen in Excel, z.B. "A1:M92".

Da ich die Endspalte (im Beispiel 92) sich verändern kann habe ich sie Variabel gehalten!

Hier mein Code zum aufrufen der Methode:Code:

Call DiaCreate("Fx(b1)[N]open", Z / 2)

"Z" ist die Variable Spalte, die hier noch durch 2 geteilt werden soll!

Hier der Code der Methode:Code:

Private Sub DiaCreate(IntSheet As String, IntRange) 
                Sheets(IntSheet).Select 
                ActiveWindow.ScrollColumn = 1 
                Range("A1").Select 
                Charts.Add 
                ActiveChart.ChartType = xlXYScatterSmoothNoMarkers 
                ActiveChart.SetSourceData Source:=Sheets(IntSheet).Range(Cells(1, 1), Cells(92, Z)), PlotBy:=xlColumns 

End Sub

Die Zeile die Probleme bereitet ist folgende:Code:

ActiveChart.SetSourceData Source:=Sheets(IntSheet).Range(Cells(1, 1), Cells(92, Z)), PlotBy:=xlColumns

Er kommt mit der Bezeichnung der Cellen nicht zurecht Warum nicht
Das klappt sonst im normalen Programmablauf wunderbar!!?

Hoffe auf Hilfe

Gruß Timo

 

[thekorn]

tut mir leid, aber ich steige durch deinen Code nicht richtig durch!
Aber es ist auf jeden Fall richtiger, wenn du innerhalb der Prozedur, insbesondere in der problematischen Zeile, das "Z" durch "IntRange", also der übergebenen Variablen, ersetzt.

gruß
thekorn