Microsoft Excel

Herbers Excel/VBA-Archiv

Range zuordnen

Betrifft: Range zuordnen von: Matthias Pospiech
Geschrieben am: 19.09.2004 13:04:56

Ich möchte Funktionen die ich bislang nur über .select, With Selection
gemacht habe umschreiben so dass ich ohne die selects auskomme.

Leider legt mir VBA dabei Steine in den Weg:

Dim ThisRange As Range
ThisRange = ActiveSheet.Range(Cells(2, startSpalte), Cells(ZeilenAnzahl, endSpalte))

gibt mir den Fehler 91: Object oder With variable nicht festgelegt.

Wenn ich ThisRange as Variant definiere, dann bekomme ich einen Fehler wenn ich
With ThisRange
.irgentetwas
end with

benutzte.


Was mache ich falsch ??
Matthias

  


Betrifft: AW: Range zuordnen von: Bert
Geschrieben am: 19.09.2004 13:17:48

Obejekte, wie z.B. Range, müssen mit Set referenziert werden.

Dim ThisRange As Range
Set ThisRange = ActiveSheet.Range(Cells(2, startSpalte), Cells(ZeilenAnzahl, endSpalte))

Bert


  


Betrifft: AW: Range zuordnen von: Hans W. Hofmann
Geschrieben am: 19.09.2004 13:18:56

Wenn Du Funktion sagts, meinst Du auch Function? Da macht das Adressieren von Range keinen Sinn.
Meinst Du Sub dann...
Range ist ein Object. Zuweisungen an Objektreferenzen erfolgen als
Set ThisRange = ....
Merke: ThisRange ist ein Zeiger auf das Objekt und nicht die Instanz selber!

Gruß HW


 

Beiträge aus den Excel-Beispielen zum Thema "Range zuordnen"