Lien hypertexte et requete Explorer

tototiti2008

XLDnaute Barbatruc

• 13 Juillet 2010

• #16

Re : Lien hypertexte et requete Explorer

Bonjour seb, Bonjour mromain,

comme je disais, pas énormément le temps en ce moment

En intégrant la fonction de mromain :

 

Pièces jointes

• Classeur1.xls

  30 KB · Affichages: 47
• Classeur1.xls

  30 KB · Affichages: 55
• Classeur1.xls

  30 KB · Affichages: 50

Vote positif 0 Vote négatif

S

seb26000

XLDnaute Occasionnel

• 13 Juillet 2010

• #17

Re : Lien hypertexte et requete Explorer

Re,

Il y a une information qui m'interesse au niveau de la propriété du fichier, onglet résumé, champ "Dernier enregistrement par". Comment faire pour la récupérer ? J'ai remarque que cette info est disponible uniquement pour les fichiers office.

A bientot !!

 

Vote positif 0 Vote négatif

S

seb26000

XLDnaute Occasionnel

• 13 Juillet 2010

• #18

Re : Lien hypertexte et requete Explorer

Je n'avais pas vu ta réponse Tototiti, merci de t'occuper de mon cas toi aussi !!! Mais j'ai un pb avec le dernier fichier que tu m'as envoié, il me fait bugger le pc.... Bizarre !!!!

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 14 Juillet 2010

• #19

Re : Lien hypertexte et requete Explorer

Bonjour à tous,

et avec cette version ?

"Dernier enregistrement par". Comment faire pour la récupérer ? J'ai remarque que cette info est disponible uniquement pour les fichiers office.

Cliquez pour agrandir...

Lire les propriétés des fichiers Office est trés simple s'ils sont ouverts, mais s'ils sont fermés ça se complique pas mal....

The Dsofile.dll files lets you edit Office document properties when you do not have Office installed

 

Pièces jointes

• Classeur1.xls

  32 KB · Affichages: 54
• Classeur1.xls

  32 KB · Affichages: 47
• Classeur1.xls

  32 KB · Affichages: 49

Vote positif 0 Vote négatif

S

seb26000

XLDnaute Occasionnel

• 14 Juillet 2010

• #20

Re : Lien hypertexte et requete Explorer

tototiti2008 à dit:

Bonjour à tous,

et avec cette version ?



Lire les propriétés des fichiers Office est trés simple s'ils sont ouverts, mais s'ils sont fermés ça se complique pas mal....

The Dsofile.dll files lets you edit Office document properties when you do not have Office installed

Cliquez pour agrandir...

Merci pour ton travail Tototiti,
Le principe est très bon, par contre j'ai remarqué qu'Excel ne me rappatrie pas tous les fichiers issus du repertoire pointé... Je mets en fichier joint 2 copies d'écrans illustrant le problème. Dans cet exemple, Excel ne rappatrie un fichier (COMPTE 2004.XLS) provenant du repertoire "E:\Mes documents\01 Mes Comptes" alors qu'il y en a 10, et chose plus étrange, il m'affiche un fichier qui est présent dans le reportoire sous-jacent (E:\Mes documents\01 Mes Comptes\SAUVEGRD) (fichier : COMPTE1.HCX).

Peux tu m'aider sur ce point ? Bonne journée !!!

Seb

 

Pièces jointes

• xls.jpg

  33.5 KB · Affichages: 39
• xls.jpg

  33.5 KB · Affichages: 39
• xls.jpg

  33.5 KB · Affichages: 35
• expl.jpg

  22.4 KB · Affichages: 39
• expl.jpg

  22.4 KB · Affichages: 55
• expl2.jpg

  31 KB · Affichages: 33
• expl.jpg

  22.4 KB · Affichages: 39

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 14 Juillet 2010

• #21

Re : Lien hypertexte et requete Explorer

Re,

es-tu allé dans le code du Module1, pour modifier le dossier de départ des recherches ?

Code:

Sub ChercheTout()
Dim Chemin As String, i As Long
    Range("A2:E65536").Clear
    'Endroit où modifier le chemin :
    Chemin = [COLOR=red]"E:\Mes Documents\01 Mes Comptes\"[/COLOR]
    LanceListe Chemin
    For i = 1 To UBound(ListeDoss)
        ChercheDoss ListeDoss(i)
    Next i
End Sub

Edit : non, en effet, ça ne marche pas bien, je regarde en profondeur...

 

Dernière édition: 14 Juillet 2010

Vote positif 0 Vote négatif

S

seb26000

XLDnaute Occasionnel

• 14 Juillet 2010

• #22

Re : Lien hypertexte et requete Explorer

Merci !!!!

J'attends de tes news !! Bonne journée !!!

tototiti2008 à dit:

Re,

es-tu allé dans le code du Module1, pour modifier le dossier de départ des recherches ?

Code:

Sub ChercheTout()
Dim Chemin As String, i As Long
    Range("A2:E65536").Clear
    'Endroit où modifier le chemin :
    Chemin = [COLOR=red]"E:\Mes Documents\01 Mes Comptes\"[/COLOR]
    LanceListe Chemin
    For i = 1 To UBound(ListeDoss)
        ChercheDoss ListeDoss(i)
    Next i
End Sub

Edit : non, en effet, ça ne marche pas bien, je regarde en profondeur...

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 14 Juillet 2010

• #23

Re : Lien hypertexte et requete Explorer

Re,

ça y est, j'ai trouvé ce qui posait problème

 

Pièces jointes

• Classeur1.xls

  23.5 KB · Affichages: 44
• Classeur1.xls

  23.5 KB · Affichages: 43
• Classeur1.xls

  23.5 KB · Affichages: 45

Vote positif 0 Vote négatif

S

seb26000

XLDnaute Occasionnel

• 14 Juillet 2010

• #24

Re : Lien hypertexte et requete Explorer

Presque nickel ;-)

Ta requete reccupere tous les fichiers mais ... Elle recupere aussi les fichiers présents dans les sous répertoires... Dans le cas actuel, elle me recupere les fichiers de c:\essai\ (repertoire pointé dans vba) et ceux issus de c:\essai\toto\
Est il possible que la requete n'aille pas voir les fichiers dans les sous répertoires ???
Merci encore pour ton travail !!!!

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 14 Juillet 2010

• #25

Re : Lien hypertexte et requete Explorer

Re,

ben ça c'était voulu 😉

une version simplifiée sans sous-dossiers :

 

Pièces jointes

• Classeur1.xls

  29 KB · Affichages: 38
• Classeur1.xls

  29 KB · Affichages: 45
• Classeur1.xls

  29 KB · Affichages: 38

Vote positif 0 Vote négatif

S

seb26000

XLDnaute Occasionnel

• 16 Juillet 2010

• #26

Re : Lien hypertexte et requete Explorer

Merci beaucoup !!! Cela fonctionne parfaitement !!! Encore merci Tototiti !!!!!

Je sais que ce site n'est pas fait pour Word, mais j'ai une petite question à ce sujet et peut être que tu pourrais m'y répondre :
Je souhaite une trame au format word. J'aimerais qu'au lancement du fichier, une fenetre apparaisse permettant de saisir :
- le nom sous lequel on souhaite enregistrer le fichier (éviter de faire "enregistrer sous" puis "selection du repertoire" (par defaut le repertoire sera celui du fichier "trame")
- une synthese rapide sur l'objectif du fichier qui sera insérée dans la propriété du fichier item "commentaire"
- Le nom du rédacteur du fichier qui sera inséré dans la propriété du fichier item "auteur"

Lorsque cette saisie sera finie, il suffirait d'appuyer sur un bouton type "Continuer" pour commencer à travailler sur le fichier. Lorsque l'utilisateur aura fini ses modif, il suffira juste de cliquer sur la disquette "enregistrer" puis de quitter Word.

Dans tous les cas merci encore et bonne journée !!!!

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 16 Juillet 2010

• #27

Re : Lien hypertexte et requete Explorer

Bonjour seb

Il y a un forum spécifique autres applications Office, ici :

Autres applications Microsoft Office - Excel Downloads Forums

Ta nouvelle question n'ayant pas de lien direct avec l'ancienne, le mieux serait de créer une nouvelle discussion là bas.

Je pense que c'est faisable dans l'ensemble, peut-être peaufiner ta demande en précisant à quoi tu veux que ressemble ton Userform à l'ouverture de ton document Word

 

Vote positif 0 Vote négatif

S

seb26000

XLDnaute Occasionnel

• 16 Juillet 2010

• #28

Re : Lien hypertexte et requete Explorer

Ok merci encore Tototiti et bonne journée !!!

 

Vote positif 0 Vote négatif