Thema Datum  Von Nutzer Rating
Antwort
03.12.2015 16:32:49 alexroehrich
NotSolved
03.12.2015 17:15:48 Gast95025
NotSolved
04.12.2015 12:01:29 Gast40889
NotSolved
04.12.2015 20:24:11 Gast55767
NotSolved
07.12.2015 09:26:00 Gast31627
NotSolved
07.12.2015 10:34:56 Gast27621
NotSolved
07.12.2015 11:27:15 Gast78016
NotSolved
Blau Excel VBA - Inhalt aktuelles Verzeichnis inkl. Unterordner lesen
07.12.2015 11:59:52 Gast14080
NotSolved
07.12.2015 13:28:35 alexroehrich
Solved

Ansicht des Beitrags:
Von:
Gast14080
Datum:
07.12.2015 11:59:52
Views:
1782
Rating: Antwort:
  Ja
Thema:
Excel VBA - Inhalt aktuelles Verzeichnis inkl. Unterordner lesen

Ändere im letzten der drei Prozeduren ( Private Sub MWReadSubFolder(ByVal sPath As String) ) die for each Schleife wie folgt ab.

For Each oFile In oSubFolder.Files
                 .Cells(lRowCounter, 1) = oSubFolder.Path
                 .Cells(lRowCounter, 2) = oFile.Name
                 .Hyperlinks.Add .Cells(lRowCounter, 3), oSubFolder.Path, , "Link zu " & oSubFolder.Path, "LINK"
                 lRowCounter = lRowCounter + 1
             Next oFile

 

Der Link hat dann den Namen LINK. Wenn du mit der Maus darübergehst, zeigt er dann an "Link zu Pfadname".

Gruß


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
03.12.2015 16:32:49 alexroehrich
NotSolved
03.12.2015 17:15:48 Gast95025
NotSolved
04.12.2015 12:01:29 Gast40889
NotSolved
04.12.2015 20:24:11 Gast55767
NotSolved
07.12.2015 09:26:00 Gast31627
NotSolved
07.12.2015 10:34:56 Gast27621
NotSolved
07.12.2015 11:27:15 Gast78016
NotSolved
Blau Excel VBA - Inhalt aktuelles Verzeichnis inkl. Unterordner lesen
07.12.2015 11:59:52 Gast14080
NotSolved
07.12.2015 13:28:35 alexroehrich
Solved