Thema Datum  Von Nutzer Rating
Antwort
17.11.2021 12:36:45 Phaona
NotSolved
17.11.2021 14:57:48 Gast53093
NotSolved
18.11.2021 11:00:08 Phaona
NotSolved
17.11.2021 22:47:42 ralf_b
NotSolved
18.11.2021 10:56:47 Gast37845
NotSolved
18.11.2021 18:31:00 xlKing
NotSolved
19.11.2021 10:05:33 Phaona
NotSolved
19.11.2021 13:36:02 Phaona
NotSolved
19.11.2021 18:37:37 xlKing
NotSolved
Blau öffnen einer Datei im Hintergrund, verschiedene Pfade
22.11.2021 11:32:41 Phaona
Solved

Ansicht des Beitrags:
Von:
Phaona
Datum:
22.11.2021 11:32:41
Views:
495
Rating: Antwort:
 Nein
Thema:
öffnen einer Datei im Hintergrund, verschiedene Pfade

Hallo K,

hab mal ein paar Tage Abstand davon genommen und scheinbar war das gut so :)

Der Code läuft und schaut auch nicht mehr ganz so abenteuerlich aus ^^

Vielen lieben Dank!

Hier die Lösung:

Private Sub Workbook_Open()

Dim fso As Object
Dim WBpersonl As Workbook
Dim WBpflanzen As Workbook

Set fso = CreateObject("Scripting.filesystemobject")

If fso.fileexists("S:\Kleingartenbewertungen\PERSONL-7-4-14.xlsm") Then
    Set WBpersonl = GetObject("S:\Kleingartenbewertungen\PERSONL-7-4-14.xlsm")
    Set WBpflanzen = GetObject("S:\Kleingartenbewertungen\Pflanzen2000.xlsx")
    
ElseIf fso.fileexists("C:\_Befundaufnahmen\PERSONL-7-4-14.xlsm") Then
    Set WBpersonl = GetObject("C:\_Befundaufnahmen\PERSONL-7-4-14.xlsm")
    Set WBpflanzen = GetObject("C:\_Befundaufnahmen\Pflanzen2000.xlsx")
    
Else
MsgBox "Personl & Pflanzen 2000 nicht gefunden!"

End If

End Sub

 


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
17.11.2021 12:36:45 Phaona
NotSolved
17.11.2021 14:57:48 Gast53093
NotSolved
18.11.2021 11:00:08 Phaona
NotSolved
17.11.2021 22:47:42 ralf_b
NotSolved
18.11.2021 10:56:47 Gast37845
NotSolved
18.11.2021 18:31:00 xlKing
NotSolved
19.11.2021 10:05:33 Phaona
NotSolved
19.11.2021 13:36:02 Phaona
NotSolved
19.11.2021 18:37:37 xlKing
NotSolved
Blau öffnen einer Datei im Hintergrund, verschiedene Pfade
22.11.2021 11:32:41 Phaona
Solved