envoie automatique sur page 2

[skalex]

bonjour a tous
voila j cherche a faire une macro et je débute. J'ai pas mal cherché mais tout ce que je trouve ne va pas.

Voila mon problème:
j'ai 2 feuilles: PIECES et UTILISATION et STOCK et COMMANDES
dans la première, colonne A à partir de A3 j'ai des noms de pièces qui se répète parfois
dans la seconde, toujours colonne A à partir de A3, j'ai les même noms (exactement, c'est du copié collé) que dans la 1ère feuille mais une seul fois.

Je cherche à faire une macro qui lorsque je clique sur une cellule A... de la feuille 1 m'envoie sur la cellule A.. de la feuille 2 correspondante
Si quelqu'un peut m'aider ca serais sympa car ca fait 2 jours que je suis la dessus.
merci
alex

 

[natorp]

Re : envoie automatique sur page 2

Bjr skalex,

sans un petit bout de fichier c'est pas simple...
y a-t-il beaucoup de nom de pièces ? sinon tu peux faire ce que tu souhaites par un lien hypertexte...
cordialement, Gérard

 

[Papou-net]

Re : envoie automatique sur page 2

Bonjour skalex,

Ce fichier exemple te convient-il ?

Cordialement.

 

[skalex]

Re : envoie automatique sur page 2

c'est rapide!
oui j'ai un peux plus de 1500 lignes, et avec un hypertexte si je rajoute une ligne entre 2, le liens ne sera plus bon. J'avais commencé puis abandonné cette idée.
J'ai fait un tout petit morceau de fichier avec 2 ref pour exemple si ca peut aider.
Ca ne concerne que la colonne A de chaque page
merci
alex

 

[skalex]

Re : envoie automatique sur page 2

c'est exactement ca papou-net.
Je vais essayé sur mon fichier

 

[skalex]

Re : envoie automatique sur page 2

oups par contre je n'arrive pas à recupérer la macro dans l'exemple que tu as mis

 

[Papou-net]

Re : envoie automatique sur page 2

Qu'à celà ne tienne, j'ai fait la modif sur ton fichier et ça fonctionne.

Cordialement.

 

[skalex]

Re : envoie automatique sur page 2

oui ca marche nikel
par contre pour récupérer la macro, je doi faire comment?
si je fais outil/ macro je n'ai pas de macro dans la liste!
merci pour vos réponses
alex

 

[skalex]

Re : envoie automatique sur page 2

quelqu'un peut m'expliquer?
merci

 

[Papou-net]

Re : envoie automatique sur page 2

oui ca marche nikel
par contre pour récupérer la macro, je doi faire comment?
si je fais outil/ macro je n'ai pas de macro dans la liste!
merci pour vos réponses
alex

Tu dois ouvrir l'éditeur VBA (appui sur [ALT] et F11), puis doublecliquer sur Feuil1 dans l'explorateur de projets, et là tu trouveras la macro événementielle dont copie ci-après.

Cordialement.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not ActiveCell.Column = 1 Or ActiveCell = "" Then Exit Sub
Piece = ActiveCell.Value
With Feuil2.Range("A1:A" & Range("A65536").End(xlUp).Row)
  Set trouve = .Find(Piece, LookIn:=xlValues)
  If Not trouve Is Nothing Then
    lg = trouve.Row
    Feuil2.Activate
    ActiveSheet.Cells(lg, 1).Select
  End If
End With

End Sub

 

[skalex]

Re : envoie automatique sur page 2

impeccable
merci pour les infos et pour la rapidité!
à bientot
alex

 

[skalex]

Re : envoie automatique sur page 2

j'ai une toute dernière question: peut on mette en option double clique plutôt que simple click?
merci

 

[Papou-net]

Re : envoie automatique sur page 2

j'ai une toute dernière question: peut on mette en option double clique plutôt que simple click?
merci

Bien sûr, et tu peux aussi le faire avec un doubleclick.

Sur le fichier ci-joint, tu as les deux possibilités.

Cordialement.

 

[skalex]

Re : envoie automatique sur page 2

merci papou-net.
je me lance dans la macro c'est pas toujours facile (en fait pas dutout!)
ici vous êtes rapide et balèze, chapeau!

 

[skalex]

Re : envoie automatique sur page 2

j'ai une petite modif a réalisé, a la place de cliquer sur la case avec le nom, il faudrait que je click sur la case stock, la 1ere que j'ai rajouté? quelqu'un peut il m'aider?
merci
alex