recherche VBA

[eduraiss]

Bonjour le forum

il me manque un morceau de code voici mon besoin

sur une feuille nommée planning en colonne F j'ai des codes 6a3 6a41 etc
et sur une feuille nommée rupture en colonne B des codes identiques

il me faudrait a l'aide d'un bouton macro lorsque je suis sur la feuille planning colonne F sur une cellule quelquonque me positionner sur la feuille rupure sur le même code en colonne B

Je ne sais pas si je suis assez clair

merci de votre aide

a+

 

[pascal21]

Re : recherche VBA

bonjour
déja 7 messages à ton actif sur ce forum des spécialistes excel

Je ne sais pas si je suis assez clair

la seule phrase claire de ce post est celle çi

les animateurs et contributeurs de ce forum n'ont pas, pour autant que je sache le don merveilleux de la divination .
pour cela aller sur le site de "charmed" et demander une prémonission à phoebe
lol!!!!
bon aller sans plaisanter tu devrais préciser ta question et l'agrémenter d'une partie de ton fichier, parceque là , en tout cas pour ma part c'est incompréhensible
à tout de suite

 

[eduraiss]

Re : recherche VBA

re

désolé je retiens la leçon

voici un fichier joint

a+ et merci

 

[eduraiss]

Re : recherche VBA

je ne sais pas si le fichier est passé je recommence

 

[nat54]

Re : recherche VBA

Bonjour,

J'avais récupéré ca sur le forum.. ca peut peut-être t'aider

• Macro 15 : lien hypertexte dynamique

Par exemple, en C28 j'aimerai que HCS-003 m'envoie directement sur la ligne correspondante du feuillet 2.


Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Dim c As Range

With ActiveSheet
Set c = .Columns(1).Find(Target.TextToDisplay)
If Not c Is Nothing Then
c.Select
Else
MsgBox "référence non trouvée"
End If
End With

End Sub


_FollowHyperlink le code ne se déclenche que si il s'agit d'un lien hypertext

Target renvoi la cellule ayant lancée le déclenchement du code

Target.TextToDisplay = renvoi le texte affiché par le lien

il suffit ensuite de rechercher (.find) dans la colonne 1 (.Columns(1)) le texte du lien

et de le stocker dans une variable nommée c (set c=)

si c n'est pas vide (if not c is nothing) alors on sélectionne la cellule (c.select), sinon on renvoi un msgbox (msgbox...)

 

[eduraiss]

Re : recherche VBA

bonjour Nath

je n'arrive pas a mettre ce code

pourrait-tu s'il te plait me renvoyer le fichier


Merci

a+

 

[nat54]

Re : recherche VBA

Euh je n'ai pas le fichier, car c'est un code que je trouvais intéressant que j'ai récupéré

ALT F11
Tu te places sur la feuille où sont tes liens
Tu copies le code

 

[eduraiss]

Re : recherche VBA

re
désolé mais je n'ai pas de lien Hypertexte.

peut tu renvoyer mon fichier (eric)avec ce code car j'avoue que je suis perdu

merci encore