Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
25.03.2009 16:41:26 |
Torsten |
|
|
Aw:run-time error '1004' wenn Cancel-Knopf gedru |
26.03.2009 12:32:51 |
Holger |
|
|
|
26.03.2009 13:42:05 |
Torsten |
|
|
|
26.03.2009 14:05:07 |
Holger |
|
|
|
26.03.2009 14:26:00 |
Torsten |
|
|
Von:
Holger |
Datum:
26.03.2009 12:32:51 |
Views:
949 |
Rating:
|
Antwort:
|
Thema:
Aw:run-time error '1004' wenn Cancel-Knopf gedru |
Hallo Torsten,
füge einfach vor dem Code
On Error Resume Next
und nach dem Code
On Error goto 0 'das ist eine Null
ein, so dass im Fehlerfall die Zeile übersprungen wird.
Funktioniert bei dir tatsächlich Selection.QueryTable...? Ich muss immer auf ein Element Auflistung zugreifen:
sheets("Name").querytables(1)...
Gruß
Holger
Torsten schrieb am 25.03.2009 16:41:26:
Hallo
Ich habe ein Makro aufgezeichnet, damit ich Daten in ein xls-File importieren kann und mich nicht durch alle Menüpunkte hangeln muss.
Data -> Import External Data -> Edit Text Import -> … ist mir doch zu aufwendig.
Als Code ist folgendes herausgekommen, was ich noch leicht angepasst habe und auch problemlos funktioniert.
' Datei laden und konvertieren
With Selection.QueryTable
.Connection = _
"TEXT;error*"
.TextFilePlatform = xlWindows
.TextFileStartRow = 1
.TextFileParseType = xlFixedWidth
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = True
.TextFileSemicolonDelimiter = False
.TextFileCommaDelimiter = False
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(1, 1, 1, 1)
.TextFileFixedColumnWidths = Array(19, 8, 29)
.Refresh BackgroundQuery:=False
End With
Nur leider bekomme ich den Fehler:
“ Run-time error ‘1004’: Application-defined or object-defined error ”, wenn ich doch keine Datei auswählen möchte und anstelle dessen den “Cancel”-Knopf drücke.
Bei Debug zeigt er mir die Zeile (.Refresh BackgroundQuery:=False ) als Problem an.
Jemand eine Idee, wie ich den Fehler beim betätigen des “Cancel”-Knopf abfangen kann?
Danke für eure Hilfe. |
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
25.03.2009 16:41:26 |
Torsten |
|
|
Aw:run-time error '1004' wenn Cancel-Knopf gedru |
26.03.2009 12:32:51 |
Holger |
|
|
|
26.03.2009 13:42:05 |
Torsten |
|
|
|
26.03.2009 14:05:07 |
Holger |
|
|
|
26.03.2009 14:26:00 |
Torsten |
|
|