Excel und VBA: Nach With klappt nix

joerg_humrich

Grünschnabel
Also ich bin ein ziemlicher Anfänger, bitte net böse werden wenns dumm ist oder so.

Ich importe gerade ne Textfile in ein ExcelSheet mit
Sub Import Data
...
Code:
ActiveWorkbook.Worksheets.Add
        With ActiveSheet.QueryTables.Add(...)
        .Name = DNSheetLeft
        .FieldNames = True
        .Row...
        End With

' Nun wenn ich hier hinter etwas schreibe, wird es nicht von VB gesehen wie:
Code:
        MsgBox("Hallo")
        End Sub
' oder was auch immer ich schreibe, es passiert nix

Kann man zwischen dem End With und dem End Sub nichts mehr schreiben? kann ich mir nicht vorstellen, aber wo ist das problem? Bitte helft mir
 
Hi,

ich weiß hundertprozentig, dass man danach noch etwas schreiben kann. Aber in deinem Code habe ich jetzt keinen Fehler sehen können. Kannst mal den ganzen With-Block posten? Und den führt er komplett und fehlerfrei aus? :confused:

Mal sehen, irgendwo muss etwas falsch sein

ulki
 
ja, du hast recht, es war etwas falsch, ich hab irgendwann beschlossen die Variablen alle umzunennen und dabei wohl eine vergessen,
danke für die Antwort
 
Zurück