[VBA Excel] Lien vers une page précise

Lien vers une page précise [VBA Excel] - VB/VBA/VBS - Programmation

Marsh Posté le 29-06-2006 à 16:40:48    

Bonjour,
 
J'ai un classeur de base de donnée de voitures, composé d'une feuille récapitulant toutes les voitures et d'une feuille par voiture avec les détails.
Pour gérer les voitures, j'ai un userform qui a pour fonction d'ajouter, modifier et supprimer les voitures une a une. Ca fonctionne tres bien.
 
Après avoir rempli le formulaire pour ajouter une voiture, on peut cliquer sur un bouton (ayant pour nom bnNouvelleFeuilleVoiture) qui ajoute une nouvelle feuille ayant pour nom celui de la voiture c'est à dire la valeur de ce qu'il y a dans une textbox du formulaire (ici la textbox s'appelle txNomVoiture)
 
Voici le code du bouton :
 

Code :
  1. Private Sub bnNouvelleFeuilleVoiture_Click()
  2. Sheets.Add after:=Sheets(Worksheets.Count)
  3. Sheets(Worksheets.Count).Name = txNomVoiture.Value


 
A cela il doit se créér un lien entre la Voiture sur le tableau principal Récapitulatif et la feuille des détails de la fameuse voiture. Voici la suite de la macro :
 

Code :
  1. NomRéférence = txNomVoiture.Value
  2. Sheets("Récap" ).Select
  3.     Range("????????" ).Select
  4.     ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
  5. NomRéférence & "!B7", TextToDisplay:=NomRéférence


 
Question /// Que mettre en ligne 3 pour dire à la macro tu sélectionne LA cellule du nom de la voiture dans la feuille récap pour faire le lien?
 
D'avance merci


Message édité par Viper7 le 29-06-2006 à 16:41:17
Reply

Marsh Posté le 29-06-2006 à 16:40:48   

Reply

Marsh Posté le 29-06-2006 à 16:56:21    

une boucle for each bourrine avec test de value
sinon tu peux stocker en dur le numéro de la cellule voiture_en_cours dans une cellule fixe et la récupérer dans ton range.select

Reply

Marsh Posté le 29-06-2006 à 21:56:40    

Ba oui jsuis trop bête merci !

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed