Code om (netwerk)schijf uit te lezen

Status
Niet open voor verdere reacties.
R

Ron001

Gebruiker
Lid geworden
4 dec 2017
Berichten
384
Beste

Kan iemand mij helpen met een code om een schijf uit te lezen?
Zodat ik alle files in een Excel file krijg te zien met extensies (en eventueel nog wat extra gegevens) en met de mappenstructuur...
Kan hier ook een hyperlink bij zodat ik bij het klikken rechtstreeks in de map/file uitkom?

Alvast bedankt!
 
Een schijf.... Daarmee bedoel je alle mappen, ongeacht de diepte van de mappenstructuur?
 
Sorry...Misschien niet duidelijk...

Dat ik inderdaad alle mappen met bijhorende bestanden te zien krijg...
 
Code: 
Sub M_snb()
   Application.filedialog(1).show
End Sub
 
@ snb

Het is niet de bedoeling dat ik enkel het venster krijg te zien...
Ik zou alle files die onder bepaalde mappen staan met een boomstructuur in Excel willen...
Dus ergens een directory ingeven waar de code in gaat zoeken.

Mvg
 
Dat is exact wat het scherm doet. Efficiënter kun je het niet krijgen.
Ga niet bouwen wat in Excel al ingebakken is.
 
Het is niet mijn code.
En "blijft hangen" is niet echt een technische term die aangeeft wat er precies gebeurt.
 
Die code werkt hier wel zonder enige aanpassing...
 
blijft hangen = blijft draaien zonder resultaat = Excel reageert niet
 
Het werkt hier prima en kennelijk bij route99 ook
Plaats hier eens je document waarin je die code hebt gezet.
 
Ik kan/geef hier wel nergens een pad in...
 

Bijlagen

  • edmoor.xlsm
    29,7 KB · Weergaven: 31
Werkt hier prima.
Na een druk op je knop wordt er gevraagd een map te kiezen en zet dan keurig alles in Excel.
 
Die bijlage werkt ook bij mij.
Heb je (TS) soms ergens een beveiliging heel erg hoog staan zodat een xlsm bestand via de VBA de macro ListAllFilesInAllFolders niet mag uitvoeren?

Via het menu:
Bestand->Opties->Vertrouwenscentrum->Instellingen voor Vertrouwenscentrum met oa Macros.
Snuffel iig bij de Macro settings en kijk ook nog ff verder rond.
 
Als dit over een map gaat met beperkt aantal files, werkt deze zonder probleem.
Als ik deze echt op een ganse schijf los laat komt er op ‘Excel reageert niet’ en lijkt mij deze niets meer te doen?

Ps: Is er ook zo iets maar dan nog met een boomstructuur?
Ps2: Eerst het voorstel ivm macro's van route99 proberen.

Mvg
 
Als 'ie de hele schijf moet doen dan is het logisch dat het meer tijd kost.
Hij is dan gewoon druk bezig.
 
Na een tijdje kreeg ik ook deze foutmelding...
 

Bijlagen

  • fout.jpg
    fout.jpg
    12,5 KB · Weergaven: 33
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan