Readdy Write  
0,00 €
Your View Money
Views: Count
Self 20% 0
Your Content 60% 0

Users by Links 0
u1*(Content+Views) 10% 0
Follow-Follower 0
s2*(Income) 5% 0

Count
Followers 0
Login Register as User

Excel vba : Öffnen des Windows Explorers

16.01.2019 (👁211)

Excel vba : Öffnen des Windows Explorers

 

Öffnen des Windows Explorers aus Excel

 

Betrifft: Office, Access, Word, Outlook, vba

Public Sub Y_Laufwerk_anbinden()

    '----------< Y_Laufwerk_anbinden() >-------------

    Dim objNet As Object

    Set objNet = CreateObject("WScript.Network")

    On Error Resume Next

    objNet.MapNetworkDrive "y:", "\\CodeDocu.com@SSL\DavWWWRoot\\Verwaltung \Reporting\Reporting\"

   

    Shell "explorer.exe /e, Y:\", VbAppWinStyle.vbMaximizedFocus

    '----------</ Y_Laufwerk_anbinden() >-------------

End Sub