remplir automatiquement une feuille

[zesuila]

Bonjour à tous
voici mon problème que je suis sûr vous allez résoudre.

(Je pense que mon fichier joint est plus explicite que ce que je vais écrire ci dessous, alors n'hésirez pas à l'ouvrir).

J'ai une 1ere feuille (feuille 1) dans laquelle je choisis un fournisseur dans une ligne et selon le cas je remplis manuellement les cellules ou alors par le biais de recherchv les cellules se remplissent automatiquement . Et cela pour chaque ligne.
Ce que je voudrais pouvoir faire c'est d'avoir le choix de cliquer sur un lien qui ouvrirait la feuille 3 (en fait un fax que j'envoie au transporteur concerné et qui remplirait automatiquement dans cette feuille 3 les champs qui m'interesse. pour pouvoir l'imprimer.

Franchement je crois que mon fichier joint est plus explicite !!!!

Merci de votre aide

Zesuila

 

[Hervé]

Bonjour

Regarde en pièce jointe.

salut
Hervé

 

[zesuila]

OUAH !!!
merci beaucoup
Exactement ce que je cherchais.
Je vais maintenant essayer de comprendre ta méthode pour pouvoir l'appliquer comme bon me semble.
Si je n'y arrive pas, je me permettrai peut être de te solliciter une nouvelle fois.

Encore merci
Zesuila

 

[zesuila]

hum !
Mes capacités de compréhension ne sont pas au top !!!
Je n'arrive pas à "comprendre" le fonctionnement
Si tu as le temps évidemment peux tu me préciser à quoi servent ces lignes

1/ Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

2/ If Target.Count = 1 And Target.Hyperlinks.Count Then
DoEvents

que veut dire If Target.Count = 1

3/ With Sheets("FAX TRANSPORTEUR")
.Range("b5").Value = Target.Offset(0, -6).Value
.Range("a15").Value = Target.Offset(0, -4).Value
.Range("b15").Value = Target.Offset(0, -5).Value
.Range("C15").Value = Target.Offset(0, -2).Value
.Range("d15").Value = Target.Offset(0, -1).Value

que veut dire Target.Offset(0, -6).Value

4/ 'Application.Goto ActiveCell, True


Je suis désolé de t'embêter mais j'aime bien comprendre ce que je fais, et non pas utiliser les compétences des autres sans y réfléchir.

Encore merci de ton aide

 

[Hervé]

re

regarde en pièce jointes j'ai annoté la macro.

Si je ne suis pas très pégago dans mes explications ne m'en veut pas (c'est un métier que d'expliquer aux autres).

Salut
Hervé

 

[Christophe]

Salut Hervé et Zesuila!

une question supplémentaire par rapport à cette application: est-il possible d'extraire les données de la 1ère feuille de la même façon mais de remplir un document Word?

Merci d'avance pour votre aide.

A bientot,

Christophe.

 

[Hervé]

re

Je n'y connait rien en Word (déjà qu'en excel...) mais ça doit être possible.

Utilise le moteur de recherche du forum pour voir les posts traitant de passerelle entre word et excel.

Désolé de pas pouvoir t'en dire plus.

Salut
Hervé

 

[Christophe]

Merci qd mm!

@+

christophe

 

[zesuila]

Merci merci beaucoup Hervé
Ce qui est quand même génial avec ce forum, c'est l'entraide. Et dans ce bas monde, cela devient rare.
J'espère qu'un jour prochain je pourrais moi aussi donner des infos aux autres "exceliens"
Bon week end
Zesuila