Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
248to252
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
248to252
248to252
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wo liegt der Fehler?

Wo liegt der Fehler?
25.04.2003 10:14:26
Vera
Hier bekomme ich die Meldung, daß in der letzten Zeile die Typen unverträglich sind. Was mache ich falsch?

Dim Datei As Workbook
Dim l As Integer
For l = 1 To 6
Set Datei = Workbooks("Ausw_Spiell_00" & l & ".xls")
Dim SpalteA As Range
SpalteA = Workbooks(Datei).Worksheets("Tabelle1").Range("A1:A15")

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Wo liegt der Fehler?
25.04.2003 10:21:54
Andreas S

Hallo,

da Range ein Objekt ist, muß die Zuweisung mit Set erfolgen.

Also:

Set SpalteA = Workbooks(Datei).Worksheets("Tabelle1").Range("A1:A15")

Gruss
Andreas

Re: Wo liegt der Fehler?
25.04.2003 10:34:00
Vera

Hallo Andreas,

ich habe es ausprobiert, aber es kommt immer noch dieselbe Fehlermeldung.

Gruß, Vera

Re: Wo liegt der Fehler?
25.04.2003 10:38:41
Alf

Salu Vera

Datei ist ein Workbook-Objekt und gibt nicht den
Dateinamen an, also muss es heissen:

Set SpalteA = Datei.Worksheets("Tabelle1").Range("A1:A15")

Gruss Alfred

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige