Aller sur un onglet particulier en fonction de son nom

CISCO

XLDnaute Barbatruc
Bonjour à tous

Dans un fichier, j'ai plusieurs onglets dont plusieurs dont le nom commence par une lettre suivie d'une parenthèse. Ex : L(blabla), M(coucou)...

Dans la première feuille, dans une colonne, j'ai une série de codes de 2 lettres, du style LU, LW, LX, LY, LZ, MD, ME, MJ... J'aimerai qu'après avoir sélectionné n'importe lequel de ces codes, et avec un raccourci clavier, Excel aille se positionner dans B15 de l'onglet commençant par la bonne lettre. EX : Si on a sélectionné LU, ou LW, ou LX... la cellule sélectionnée doit être L(blabla)!B15.

Merci.

@ plus
 

Pièces jointes

  • Déplacer.xlsx
    10.2 KB · Affichages: 49
  • Déplacer.xlsx
    10.2 KB · Affichages: 49
Dernière édition:

Modeste geedee

XLDnaute Barbatruc
Re : Aller sur un onglet particulier en fonction de son nom

Bonsour®
voir utilisation lienHypertexte
Capture.jpg
pièce jointe
 

Pièces jointes

  • déplacer.xlsx
    14.9 KB · Affichages: 47
  • déplacer.xlsx
    14.9 KB · Affichages: 46
  • Capture.jpg
    Capture.jpg
    39.8 KB · Affichages: 55
Dernière édition:

CISCO

XLDnaute Barbatruc
Re : Aller sur un onglet particulier en fonction de son nom

Bonjour

Bonjour Modeste geedee

Je connais le principe du lien hypertexte dans Excel, mais là, je n'y avais pas pensé. Je suis tellement dans cette histoire d'apprendre le VBA que je pensais macro, alors que c'est tellement plus simple avec un lien hypertexte.

Merci donc pour

@plus
 

CISCO

XLDnaute Barbatruc
Re : Aller sur un onglet particulier en fonction de son nom

COUCOU Lone6-Wolf :)

Si il y a beaucoup de codes dans la première feuille, ta macro est, tout compte fait, plus pratique que la méthode avec les liens hypertextes.

Les deux méthodes fonctionnent. A adapter en fonction du besoin, beaucoup ou pas beaucoup de codes.

Merci à vous deux.

@ plus
 

chris

XLDnaute Barbatruc
Re : Aller sur un onglet particulier en fonction de son nom

Bonjour à tous ;)

A noter qu'on peut créer les liens hypertexte par formule à côté des doubles lettres
Code:
=LIEN_HYPERTEXTE("[Déplacer.xlsx]'"&CHOISIR(CODE(GAUCHE(E10;1))-75;"L(blabla)'!B15";"M(coucou)'!B15";"N(A_suivre)'!B15";"P(pourquoi_pas)'!B15");"Accès")
 

DoubleZero

XLDnaute Barbatruc
Re : Aller sur un onglet particulier en fonction de son nom

Bonjour à toutes et à tous, bises à chris :D,

Une autre suggestion, par macro, en pièce jointe.

A bientôt :)
 

Pièces jointes

  • 00 - CISCO - Onglet atteindre.xlsm
    53.2 KB · Affichages: 73

Modeste geedee

XLDnaute Barbatruc
Re : Aller sur un onglet particulier en fonction de son nom

Bonsour®

heu... CISCO avait précisé :
CISCO à dit:
j'ai plusieurs onglets dont plusieurs dont le nom commence par une lettre suivie d'une parenthèse. Ex : L(blabla), M(coucou)...
et non :
Code:
j'ai plusieurs onglets dont plusieurs dont les noms sont :  LU,LV,MA,MC  etc...
la proposition de Si...
me semble la plus réaliste...:eek:
 

Lone-wolf

XLDnaute Barbatruc
Re : Aller sur un onglet particulier en fonction de son nom

Re Modeste,

ça été ma première proposition (différente de Si...) et donnant le même résultat mais simple clic.


Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim ws As Worksheet
If Not Intersect(Target, Range("e5:e40")) Is Nothing Then
For Each ws In Worksheets
If Left(ActiveCell.Value, 1) = Left(ws.Name, 1) And ws.Name <> "Prépa" Then
ws.Activate
ActiveSheet.Range("b15").Activate
End If
Next ws
Else
Exit Sub
End If
End Sub



A+ :cool: