Thema Datum  Von Nutzer Rating
Antwort
12.11.2018 09:21:10 Hunzen
NotSolved
12.11.2018 09:28:18 Hunzen
NotSolved
Rot Open Workbooks Methode funktioniert nicht konsistent
12.11.2018 11:56:27 Gast98206
NotSolved
12.11.2018 13:01:24 Hunzen
Solved

Ansicht des Beitrags:
Von:
Gast98206
Datum:
12.11.2018 11:56:27
Views:
508
Rating: Antwort:
  Ja
Thema:
Open Workbooks Methode funktioniert nicht konsistent
Sub tt()
Dim TestfileWkb As Workbook
Dim YardWkb As Workbook
     
'*****************************
Dim strTestfileFile As String
'*****************************
     
   Set YardWkb = ThisWorkbook   ' = OK
   Debug.Print YardWkb.Name
   '
   'On Error Resume Next           wozu?
   '
   '**********************************************************
   strTestfileFile = "Mappe3.xlsm"  'woher weis dein Code das?
   '**********************************************************
   '
   Set TestfileWkb = Workbooks.Open(Filename:=strTestfileFile)       'Testfile öffnen
   Debug.Print TestfileWkb.Name
   TestfileWkb.Close False
   '
   'wozu als Funktion?
   Set TestfileWkb = OpenIt(strTestfileFile)
   Debug.Print TestfileWkb.Name
   
End Sub

Function OpenIt(File As String) As Workbook
   Set OpenIt = Workbooks.Open(Filename:=File)
End Function

 


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.11.2018 09:21:10 Hunzen
NotSolved
12.11.2018 09:28:18 Hunzen
NotSolved
Rot Open Workbooks Methode funktioniert nicht konsistent
12.11.2018 11:56:27 Gast98206
NotSolved
12.11.2018 13:01:24 Hunzen
Solved