Sheet Array copy wie muss das Array aussehen?
18.06.2004 09:23:35
Nike
wie muss das Array bei dem Copy Befehl aussehen?
Ich hab mal nen Grundaufbau, mir fehlt nur noch der Array zum Kopieren...
Sub Export_2()
Dim arr(0) As Variant
Dim i As Integer
For i = 1 To Worksheets(Worksheets.Count)
ReDim Preserve arr(i)
arr(i) = Worksheets(i)
i = i + 1
Next
Sheets(arr()).Copy
End Sub
Infos waeren nett.
Bye
Nike