Thema Datum  Von Nutzer Rating
Antwort
12.01.2021 12:48:44 Sandra
NotSolved
12.01.2021 13:15:59 volti
NotSolved
12.01.2021 13:30:41 Gast78841
NotSolved
12.01.2021 13:45:54 volti
NotSolved
12.01.2021 14:16:20 Gast82128
NotSolved
12.01.2021 14:26:36 volti
NotSolved
12.01.2021 14:36:11 Gast7029
NotSolved
12.01.2021 14:49:28 volti
Solved
12.01.2021 14:54:29 Gast37847
***
Solved
Blau Daten aus anderem Ordner in bestehendes Tabellenblatt kopieren
12.01.2021 13:31:01 Mase
NotSolved
12.01.2021 13:45:33 Gast42562
NotSolved

Ansicht des Beitrags:
Von:
Mase
Datum:
12.01.2021 13:31:01
Views:
503
Rating: Antwort:
  Ja
Thema:
Daten aus anderem Ordner in bestehendes Tabellenblatt kopieren

Hallo Sandra,

Workbooks.Open() alleinstehend in Kombination mit On Error Resume Next zu verwenden ist weniger gut als direkt in eine Objektvariable zu "setten". Wenn Du jetzt noch zuvor geprüft hast, ob Dein zu öffnendes Workbook tatsächlich existiert, dann ist das doch ne runde saubere Sache.

 

Nachvollziehbares Beispiel:

    Dim QWB As Excel.Workbook
    
    If CreateObject(Class:="Scripting.FileSystemObject").FileExists("Pfad_inkl_Dateiname") Then
        '*** Wenn Datei vorhanden, dann SET-Objektvariable
        Set QWB = Workbooks.Open("Pfad_inkl_Dateiname")
    Else
        '*** Wenn Datei nicht vorhanden, reagiere wie folgt...
        
    End If

 

 

 


Ihre Antwort
  • 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: Name: Email:



  • 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
12.01.2021 12:48:44 Sandra
NotSolved
12.01.2021 13:15:59 volti
NotSolved
12.01.2021 13:30:41 Gast78841
NotSolved
12.01.2021 13:45:54 volti
NotSolved
12.01.2021 14:16:20 Gast82128
NotSolved
12.01.2021 14:26:36 volti
NotSolved
12.01.2021 14:36:11 Gast7029
NotSolved
12.01.2021 14:49:28 volti
Solved
12.01.2021 14:54:29 Gast37847
***
Solved
Blau Daten aus anderem Ordner in bestehendes Tabellenblatt kopieren
12.01.2021 13:31:01 Mase
NotSolved
12.01.2021 13:45:33 Gast42562
NotSolved