Clever-Excel-Forum

Normale Version: [VBA] GetDataClosedWB
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2 3
Er gibt mir immer "ADOSheet = FALSCH" an .. 

Es muss an der externen Datei "Struktur" liegen ..
Sobald die externe Datei mehrere Blätter hat, geht es nicht mehr habe ich das Gefühl ?
Hallo, :19:

lade doch mal so eine Datei hier hoch. Mit anonymisierten Daten. Nur die Struktur ist wichtig. :21:
selbst wenn ich eine völlig leere, neue Datei mit mehreren Blättern erstelle passiert es..

Jetzt gehts selbst bei einem Blatt nicht mehr haha..

oh man
Hallo, :19:

Ooohhh Mann - mein Fehler. Lösche das ": Exit Function" bei der Else raus. Blush

Dann klappt es bei mir - sofern Daten im Blatt sind. :21:
Knaller !! Smile


Danke !
Es war doch etwas komplizierter als gedacht:

Code:
Sub T_0()
Cells(10, 1).Formula = "=isref('Z:\xxx\Foren\[Jules.xlsx]OCT ALL'!$A$1)"
Cells(11, 1).Formula = "=isref('Z:\xxx\Foren\[Jules.xlsx]MAY'!$A$1)"
Cells(12, 1).Formula = "=isref('Z:\xxx\Foren\[Jules.xlsx]NOV ALL'!$A$1)"
End Sub

Die Prüfung aus A10 - A12 zeigt, welche Sheets enthalten sind, Leerzeichen stören nicht.
Hallo Fennek, :19:

mit "=isref(..." hat er doch das gleich Problem wie am Anfang. Ist das Tabellenblatt nicht vorhanden wird er von Excel per Dialog aufgefordert ein Tabellenblatt auszuwählen. Diese Meldung lässt sich - zumindest bei mir - mit den üblichen Mitteln (On Error..., DisplayAlerts...nicht unterdrücken. :21:
Richtig :)

Daher die von Case gepostete Variante.

Tip Top!
Seiten: 1 2 3