Ouverture automatique de fichier

wilfried_42

XLDnaute Barbatruc

• 3 Mai 2007

• #2

Re : Ouverture automatique de fichier

Bonjour Bud.Boundy

à mettre dans le code worksheet de le feuille désirée

Code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    dim nom as string, fichier as string
    Cancel = True
    nom = target.value
    fichier = target.offset(0,1).value
    If Target.Row = 1 Then
        Workbooks.Open (ThisWorkbook.Path & "\" & fichier & ".xls")
        Workbooks(fichier & ".xls").Sheets("FICHE").Range("C1").Value = nom
        Workbooks(fichier & ".xls").Close savechanges:=True
    End If
End Sub

 

Vote positif 0 Vote négatif

B

Bud.boundy

XLDnaute Occasionnel

• 3 Mai 2007

• #3

Re : Ouverture automatique de fichier

Merci Wilfried,

Après le double clic, mon fichier ne s'ouvre malheureusement pas... Sachez que le fichier à ouvrir est dans le même repertoire...

Merci de m'aiguiller...

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 3 Mai 2007

• #4

Re : Ouverture automatique de fichier

re:

le code que j'ai donné,

ouvre le fichier, met à jour la cellule C1 de la feuille Fiche, Ferme le fichier

Quand tu fais un double clique, es tu en edition de cellule, si oui, c'est que le code n'es pas au bon endroit,

il doit se trouver dans Worksheet (Nom de la feuille) pas dans un module

 

Vote positif 0 Vote négatif

B

Bud.boundy

XLDnaute Occasionnel

• 4 Mai 2007

• #5

Re : Ouverture automatique de fichier

Merci Wilfried,

J'avais bien mis le code dans Worksheet comme souhaité... Maintenant vous parlez d'une mise à jour de la cellule C1 de la feuille Fiche... que faut-il faire exactement ???

Ne serait il pas plus simple de me joindre un fichier exemple ???

Encore merci pour votre coup de main...

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 4 Mai 2007

• #6

Re : Ouverture automatique de fichier

re:

je t'envoie deux fichiers :

UNTEL.xls ----> Feuille FICHE ---> Cellule C1 Vide
UNTEL_liste.xls ---> Feuille 1 ---> A1 le nom à transferer, B1 le nom du fichier

un double click en A1, le nom est transférer en C1 du classeur defini en B1

 

Pièces jointes

• untel.zip

  10.9 KB · Affichages: 32
• untel.zip

  10.9 KB · Affichages: 27
• untel.zip

  10.9 KB · Affichages: 29

Vote positif 0 Vote négatif

B

Bud.boundy

XLDnaute Occasionnel

• 7 Mai 2007

• #7

Re : Ouverture automatique de fichier

Merci beaucoup Wilfried,

Désolé pour le retard, j'étais parti en week-end... Votre fichier marche parfaitement, seulement le fichier UNTEL ne s'ouvre pas... Par contre dès que je l'ouvre manuellement je retrouve bien le nom sur lequel j'ai double clicker...
Comment pourrions nous l'ouvrir ??

Merci beaucoup

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 7 Mai 2007

• #8

Re : Ouverture automatique de fichier

re:

j'aime pas laisser un fichier ouvert, lol, je l'avais fermé automatiquement en le sauvegardant.

voici un version qu le laisse ouvert, et pas de sauvegarde

 

Pièces jointes

• untel.zip

  11 KB · Affichages: 35
• untel.zip

  11 KB · Affichages: 35
• untel.zip

  11 KB · Affichages: 33

Vote positif 0 Vote négatif

B

Bud.boundy

XLDnaute Occasionnel

• 7 Mai 2007

• #9

Re : Ouverture automatique de fichier

Merci Wilfried,

Quel formidable travail... Brvao... Sincères remerciements...

Bonne continuation

 

Vote positif 0 Vote négatif

B

Bud.boundy

XLDnaute Occasionnel

• 7 Mai 2007

• #10

Re : Ouverture automatique de fichier

Pardon Wilfried,

Je viens juste de me rendre compte d'un petit manque... Cette macro se doit de fonctionner dans la colonne A avec le nom de fichier correspondant à la même ligne en B...

Merci

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 7 Mai 2007

• #11

Re : Ouverture automatique de fichier

re:

c'est ce qu'il fait, si tu fais un double clique en colonne A, il ouvre le Fichier mis en colonne B et inserre le nom qui est en colonne A

 

Vote positif 0 Vote négatif

B

Bud.boundy

XLDnaute Occasionnel

• 8 Mai 2007

• #12

Re : Ouverture automatique de fichier

Bonjour Wilfried,

Je regrette d'avoir à insister mais vous verrez qu'en mettant des noms de A1:A5 et en gardant UNTEL de B1:B5, le macro ne fonctionne que pour la cellule A1... Du moins chez moi...

Merci

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 8 Mai 2007

• #13

Re : Ouverture automatique de fichier

re:

tu as raison nud.doundy, dans la famille je suis la blonde mais en plus agée😀
et pourtant j'avais relu le code 😱

Mais quelque fois les erreur sont tellement grosse qu'on ne les voit pas 😕

target.row ----> devient target.column

 

Pièces jointes

• untel_liste.xls

  23.5 KB · Affichages: 62
• untel_liste.xls

  23.5 KB · Affichages: 60
• untel_liste.xls

  23.5 KB · Affichages: 56

Vote positif 0 Vote négatif

B

Bud.boundy

XLDnaute Occasionnel

• 9 Mai 2007

• #14

Re : Ouverture automatique de fichier

Merci pour tout Wilfried...

Vous etez formidable

Bonne continuation

 

Vote positif 0 Vote négatif

B

Bud.boundy

XLDnaute Occasionnel

• 16 Mai 2007

• #15

Re : Ouverture automatique de fichier

Bonsoir Wilfried,

Une dernière requèete s'il vous plaît : A l'ouverture du fichier indiqué, serait il possible de rediriger le fichier excel vers la feuille FICHE parce que si le fichier a par excemple été enregistré sous une feuille X le fichier s'ouvre sur cette feuille X et non sur la feuille FICHE...

Merci

 

Vote positif 0 Vote négatif