vba pour envoyer sur un onglet

[yoyopasnet]

salut le forum

encore moi le nul voila
J'ai bouton associer a une vba qui m'envoie d'un onglet nommé menu à un onglet "detail 01"

Sub détail01()
Sheets("1D").Select
Range("H9").Select
End Sub

Je voudrai si cela est possible créer un autre onglet nommé "detail01' " et que mon bouton existant m'envoye soit sur "detail01" ou sur "detail01' " selon une condition "1" ou "2" qui se trouve sur l'onglet "data"

merci

 

[SergiO]

Re : vba pour envoyer sur un onglet

Bonsoir yoyopasnet

Je voudrai si cela est possible créer un autre onglet nommé "detail01" et que mon bouton existant m'envoye soit sur "detail01" ou sur "detail01" selon une condition "1" ou "2" qui se trouve sur l'onglet "data"

merci

Désolé, je n'ai pas tout compris...

 

[yoyopasnet]

Re : vba pour envoyer sur un onglet

j'ai un bouton qui m envoie sur un onglet je voudrai lui mettre une condition pour l'envoyer sur un autre onglet
voila la vba lier au bouton

Sub détail01()
Sheets("1D").Select
Range("H9").Select
End Sub

 

[SergiO]

Re : vba pour envoyer sur un onglet

Re,

Voici un code permettant de sélectionner soit la feuille Detail01 si la cellule A1 de la feuille Data = 1 soit la feuille Detail02 si la cellule A1 de la feuille Data = 2.

En espérant que cet exemple pourra te faire avancer...

Sub Onglet()
Dim Choix
Choix = Sheets("Data").Cells(1, 1)
Select Case Choix
Case 1
Sheets("Detail01").Activate
Case 2
Sheets("Detail02").Activate
Case Else
End Select
End Sub

@+

 

[yoyopasnet]

Re : vba pour envoyer sur un onglet

La cellule sur data est "w20" que dois je mettre pour cette cellule

 

[SergiO]

Re : vba pour envoyer sur un onglet

Tu mets soit :

Choix = Sheets("Data").Cells(20, 23)

ou

Choix = Sheets("Data").Range("W20")

 

[yoyopasnet]

Re : vba pour envoyer sur un onglet

Genial ça marche !!!!!!!!!!!!!!

merci et merci

 

[yoyopasnet]

Re : vba pour envoyer sur un onglet

peux jeter un oeil a la discution dur dur je suis bloque car la aussi je bloque
merci