Affichage d'une cellule d'une feuille particulière après test condition
Bonjour à tous
Je ne connais rien à VBA et je voulais savoir si il était possible après une condition si, de faire afficher, si la condition est remplie, une cellule sur une feuille bien précise.
Je m'explique :
J'ai une liste déroulante de 10 Noms, qui correspond à 10 feuilles distinctes.
Quand l'utilisateur sélectionne son nom dans la liste " MonNom2" il est automatiquement routé sur son Onglet de feuille "MonNom2"
Quand l'utilisateur sélectionne son nom dans la liste " MonNom3" il est automatiquement routé sur son Onglet de feuille "MonNom3"...
Merci pour votre réponse
Bonne journée
Jean-Luc
Bonjour et bienvenue
Ce sera plus simple car il faudrait déjà savoir quel type de tableau vous avez (structuré ou pas) et dans quelle colonne se trouve la liste des noms
On peut toujours vous donner un code mais il est presque certain que ce sera à refaire.
Cordialement
re
Je pensais que c'était clair.
Je n'ai pas dit le contraire. Mais si vous faites appel à la programmation le mieux est de voir comment est structuré le fichier.
Voici une proposition
Option Explicit
Option Compare Text
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Byte
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("D7")) Is Nothing Then
If Target.Value <> vbNullString Then
'verifier si feuille existe
For i = 1 To Sheets.Count
If Sheets(i).Name = Target.Value Then
Sheets(i).Select 'selection feuille
Exit Sub
End If
Next i
MsgBox "feuille non trouvée", vbCritical, "Feuille inexistante": Exit Sub
End If
End If
End SubPour placer le code,
- faite un clic droite sur le nom de l'onglet ACCUEIL
- choisir l'option "Visualiser le code"
- coller le code dans la fenêtre
Ensuite enregistrez votre fichier avec l'extension XLSM (pour accepter l'utilisation des macros)
Si ok et terminé pensez à cloturer le fil
Crdlt
Merci pour votre réponse rapide et votre efficacité.
Cela fonctionne très bien.
Bonne journée
Jean-Luc