Die Methode.... Range ... fehlgeschlagen
Claudia
aufgrund meiner sehr bescheidenen Kenntnisse bitte ich um Hilfe.
Ich habe ein bisher problemlos funktionierendes Programm unter Excel 2003 mit eigener Symbolleiste nunmehr komplett kopiert und übertragen für Excel 2007 und mit eigener Ribbon-Leiste (IDBE Ribbon Creator) versehen.
Jetzt erhalte ich aber beim Aufruf eines Makros folgende Fehlermeldung:
Die Methode 'Range' für das Objekt '_Worksheet' ist fehlgeschlagen.
Das dazugehörige Modul nachstehend
'diese Prozedur legt die Objekte fest
Public Sub doObjects(bolSet As Boolean)
If bolSet Then
If Not wsInit Is Nothing Then Exit Sub
Set a = Application
Set wsGantt = ThisWorkbook.Worksheets(1)
Set wsInit = ThisWorkbook.Worksheets("Init")
Set wsData = ThisWorkbook.Worksheets("Data")
Set rGantt = wsGantt.Rows("7:" & a.Max(7, GetLastRow(wsGantt)))
Set rTimeUnits = wsData.Range("Zeiteinheit_Daten")
dblUnits = wsInit.Range("Units").Value
Call Read_aLs
Else
Set a = Nothing
Set wsGantt = Nothing
Set wsInit = Nothing
Set wsData = Nothing
Set shp = Nothing
End If
End Sub
In dieser Zeile
...Set rTimeUnits = wsData.Range("Zeiteinheit_Daten")...
steigt das Makro aus. Leider sagt mir das überhaupt nichts. Das ganze Programm ist leider auch zu groß zum uploaden (2,3MB) so dass ich hoffe Ihr könnt mir mit meinen o.a. Angaben helfen.
Danke und Gruß Claudia