[macro]Sélection d'une feuille Résolu/Fermé

Question

Bonjour des Karpates à tous les menbres
Je bute sur un petit  problème concernant une macro.
J'ai un fichier Exel avec des feuilles dont certaines sont numérotées de façon très simples ( de 6 à 22)
Sur la première feuille "Données minimales" j'ai une cellule "D18" dans laquelle s'inscrivent  les nombres de 6 à 22 de façon automatique suivant des configurations techniques.
Je ne veux créer qu'une macro  et je n'ai pas trouvé la solution pour que la macro m'ouvre la feuille correspondant au numéro inscrit dans "D18".
Si quelqu'un piouvait gentiment m'aider à résoudre ce cas de figure
ce serait macro sympa
Merci d'avance 
Bine ati venit la Dracula land
Multumesc foarte mult si la multi ani

lami20j · Accepted Answer

Salut,Option Explicit

Sub affiche()
    Dim iNbAs Integer
    
    With Sheets("a")
        iNb = InputBox("Affiche Feuille N° " & _
               .Range("b1"), , .Range("b1").Value)
    End With
    Sheets(CStr(iNb)).Select
End Sub

lami20j · Answer

Re,
Mos cracuim 

Attention à l'orthographe :-))
Mo&#351; Cr&#259;ciun

 Nu uita sa adaptezi codul la cazul tau :-))

Deci InputBox citeste continutul celulei B1 de pe foaia a
La tine este celula D18 de pe foia Données minimales

La Multi Ani &#351;i tie!!!

lami20j · Answer

Oups, la charte :-DDD

 Nu uita sa adaptezi codul la cazul tau :-))

Deci InputBox citeste continutul celulei B1 de pe foaia a
La tine este celula D18 de pe foia Données minimales

ça veut dire

A ne pas oublier d'adapter le code à ton cas.

Donc InputBox lit le contenu de la cellule B1 de la feuille a
Chez toi c'est la cellule D18 de la feuille....

[macro]Sélection d'une feuille

3 réponses

Discussions similaires