|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
27.11.2015 08:44:47 |
joerg |
|
|
|
27.11.2015 11:52:22 |
Gast38073 |
|
|
|
27.11.2015 20:27:50 |
joerg |
|
|
|
27.11.2015 22:18:44 |
Gast38157 |
|
|
|
28.11.2015 12:59:58 |
Gast71553 |
|
|
|
28.11.2015 22:33:59 |
joerg |
|
|
|
28.11.2015 23:21:19 |
Gast42519 |
|
|
 mehrere Textdateien per Makro mit "Opentext "in Excel importieren |
29.11.2015 11:42:55 |
Gast29586 |
|
|
|
29.11.2015 19:35:46 |
joerg |
|
|
|
30.11.2015 11:11:58 |
Gast42392 |
|
|
|
30.11.2015 18:35:18 |
joerg |
|
|
|
29.11.2015 21:37:54 |
Gast19665 |
|
|
Von:
Gast29586 |
Datum:
29.11.2015 11:42:55 |
Views:
735 |
Rating:
|
Antwort:
|
Thema:
mehrere Textdateien per Makro mit "Opentext "in Excel importieren |
|
Hallo Jörg!
Ist hier wieder ein Rechner wo ich die Formatierung nicht beeinflußen kann, versuche aber trotzdem mal zu antworten.
Bei meiner Variante mittels FileDialog(msoFileDialogFolderPicker) wird in die Variable datei der volle Dateinamen geschrieben. Um nun auf die einzelnen Blätter zu kommen, musst du wieder die Dateiendung .txt entfernen ( umgekehrt wie bei dir). Mit der Benennung der Variablen sheet für das Tabellenblatt würde es z.B so gehen. sheet = Left(datei, Len(datei) - 4) und der Zugriff dann mittels Workbooks(datei).Worksheets(sheet).Cells.Copy . Damit sollte das Ansprechen klappen.
Zum kopieren, bräuchte ich noch INFOS. Wohin sollen die Daten? In die aufrufende Datei - welches Tabellenblatt? Und wie viele Daten sind es ungefähr (also die Zeilenanzahl). Weil wenn es übertrieben geschrieben ein ganzes Tabellenblatt ist, geht halt nur eine Seite zum Einfügen. Und den Dateinamen würde ich in Spalte A schreiben und den Rest ab Spalte B. So sind die Namen untereinander.
Achja, damit ich den Code halbwegs identisch habe (zum Testen) willst du mit der Inputbox arbeiten oder dem FileDialog(msoFileDialogFolderPicker). Mir wär's ergal, geht nur darum, dass ich weiß, wie ggf. die Variablen aussehen bzw. deren Inhalte dargestellt werden (s.o. das Problem mit der Dateiendung). So das war's erstmal.
Viele Grüße Matthias
|
- 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
|
|
27.11.2015 08:44:47 |
joerg |
|
|
|
27.11.2015 11:52:22 |
Gast38073 |
|
|
|
27.11.2015 20:27:50 |
joerg |
|
|
|
27.11.2015 22:18:44 |
Gast38157 |
|
|
|
28.11.2015 12:59:58 |
Gast71553 |
|
|
|
28.11.2015 22:33:59 |
joerg |
|
|
|
28.11.2015 23:21:19 |
Gast42519 |
|
|
mehrere Textdateien per Makro mit "Opentext "in Excel importieren |
29.11.2015 11:42:55 |
Gast29586 |
|
|
|
29.11.2015 19:35:46 |
joerg |
|
|
|
30.11.2015 11:11:58 |
Gast42392 |
|
|
|
30.11.2015 18:35:18 |
joerg |
|
|
|
29.11.2015 21:37:54 |
Gast19665 |
|
|