VBA Excel

[harry3]

Danke für Eure Antworten!

Zuerst aber noch eine andere Frage: Manchmal verschwindet bei einer Scrollbar einfach der Schieber, da sowohl Min als auch Max den Wert 0 haben. Auch das neusetzen über VBA mittels .Min=0 und .Max=1 bringt nichts, der Schieber bleibt verschwunden.
Nur das manuelle ändern unter Eigenschaften bringt Besserung.
Irgendwelche Tipps oder Tricks zur Vermeidung dieses Fehlers!?



Achja, sollte es wen interessieren:

Das ist meine Lösung für mein Dateiproblem:

PHP-Code:

//Pfadangabe zumsammenbauen mittels &
Pfad = "TEXT;" & Range("G1").Value & Range("G2").Value

//prüfen ob datei vorhanden
On Error Resume Next
dateifehler = Dir(Range("G1").Value & Range("G2").Value) <> ""
dateifehler = dateifehler And Err = 0
dateifehler = Not dateifehler
//und erst wenn dateifehler=FALSE importiere ich die Daten
If (dateifehler = True) Then
    MsgBox ("Dateifehler: Dateiname und Dateipfad überprüfen")

Else
    //Datei laden und nach Cells(zeilen, spalten) kopieren
    With ActiveSheet.QueryTables.Add(Connection:=Pfad, Destination:=Range("S1"))
    //überprüfen ob datei vorhanden
        .Refresh
    End With
//usw.... 


Grüße,
Harri