Weergeven mapinhoud

[wiki]

Ik probeer op de een of andere manier de bestandsnamen en mapnamen uit een specifieke map in excel zichtbaar te maken bij voorkeur met de eigenschappen en wil deze graag automatisch bijwerken en voorzien van een hyperlink. Het betreft een groot aantal bestanden en mappen die verschillende soorten documenten bevatten.

 

[popipipo]

Heb je iets aan dit bestandje?

 

[wiki]

:thumb:Fantastisch, precies wat ik zocht bedankt voor je snelle reactie popipipo:thumb:

 

[Wigi]

Graag nog de vraag op opgelost zetten aub.

 

[wiki]

Ben weer wat verder door andere vragen te bestuderen
met de volgende regel geef ik de locatie van een bestand aan

Range("A1") = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name

en met deze regel pas ik de eigenschap commentaar aan

Range("b7") = ActiveWorkbook.BuiltinDocumentProperties("Comments").Value

Op welke manier kan ik de tekst ActiveWorkbook aanpassen in een verwijzing naar het ongeopende document in A1?

 

[wiki]

De vraag is nog actueel, is dit onmogelijk?

 

[Wigi]

Dus je wil een cel of cellen uitlezen uit een ander, gesloten, bestand?

Dat kan met deze code:

http://j-walk.com/ss//excel/tips/tip82.htm

 

[wiki]

Beste WiGi

Ik wil graag de eigenschappen uitlezen van een gesloten bestand en niet een celwaarde

WiKi

 

[Wigi]

Dat zal niet rechtstreeks gaan volgens mij.

Je zal het bestand (tijdelijk) moeten openen, maar dat kan je met code doen.

Dan uitlezen, en vervolgens weer sluiten.

Als het geen groot bestand is en ScreenUpdating zet je tijdelijk uit, dan ga je daar quasi niets van merken.

Wigi

 

[wiki]

Bedankt

 

[Warme bakkertje]

Het kan ook met gesloten bestanden, op volgende link vind je alle benodigde informatie

http://www.cpearson.com/excel/docprop.aspx

Mvg

Rudi

 

[snb]

Er valt meer te lezen van ongeopende bestanden:

    For Each fl In CreateObject("Scripting.filesystemobject").getfolder("E:\").Files
        v_datecreated = fl.datecreated
        v_dateLastAccessed = fl.dateLastAccessed
        v_DateLastmodified = fl.DateLastmodified
        v_Size = fl.Size
        v_Type = fl.Type
        v_Shortname = fl.Shortname
        v_Shortpath = fl.Shortpath
        v_Path = fl.Path
        v_Parentfolder = fl.Parentfolder
        v_Attributes = fl.Attributes
    Next

 

[wiki]

Beste SNB, Klinkt goed, maar waar plaats ik deze code en heb ik daarbij nog andere functies nodig
Ik heb hem nu in een leeg blad geplaatst en de bestemming gewijzigd, maar dan gebeurt er niets.

 

[Wigi]

Beste SNB, Klinkt goed, maar waar plaats ik deze code en heb ik daarbij nog andere functies nodig
Ik heb hem nu in een leeg blad geplaatst en de bestemming gewijzigd, maar dan gebeurt er niets.

Je haalt alles op en zet het in variabelen. Die moeten nog een bestemming krijgen:

- in cellen op een blad
- in immediate window
- in msgboxes
- luidop gezegd door de PC
- ...

Wigi