Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel UserForm vers Feuil3

UserForm vers Feuil3

4 réponses
Avatar
Bonjour,

J'aimerais que quand on clique sur OK, on acc=E8de =E0 la=20
Feuil1 (appel=E9e Liste dans mon cas) =E0 la place de la MsgBox

Private Sub CommandButton1_Click()
If CheckBox1 And controlnom(TextBox1.Value) =3D True And=20
controlpass(TextBox2.Value) =3D True Then
MsgBox "J'aimerais que quand on clique sur OK, on acc=E8de =E0=20
la Feuil1 (appel=E9e liste dans mon cas)."
End If
End Sub

Merci d'avance de votre aide
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Rekam
Salut

Je crois que quelque chose comme ça pourrait fonctionner :

Sheets("Le nom de la feuil1").Activate
Unload Me

A+

"" wrote:

Bonjour,

J'aimerais que quand on clique sur OK, on accède à la
Feuil1 (appelée Liste dans mon cas) à la place de la MsgBox

Private Sub CommandButton1_Click()
If CheckBox1 And controlnom(TextBox1.Value) = True And
controlpass(TextBox2.Value) = True Then
MsgBox "J'aimerais que quand on clique sur OK, on accède à
la Feuil1 (appelée liste dans mon cas)."
End If
End Sub

Merci d'avance de votre aide



Avatar
Daniel
Bonjour.
Private Sub CommandButton1_Click()
If CheckBox1 And controlnom(TextBox1.Value) = True And
controlpass(TextBox2.Value) = True Then
MsgBox "J'aimerais que quand on clique sur OK, on accède à
la Feuil1 (appelée liste dans mon cas)."
Worksheets("liste").activate
End If
End Sub
a écrit dans le message de news:
0a0a01c4f882$42847370$
Bonjour,

J'aimerais que quand on clique sur OK, on accède à la
Feuil1 (appelée Liste dans mon cas) à la place de la MsgBox

Private Sub CommandButton1_Click()
If CheckBox1 And controlnom(TextBox1.Value) = True And
controlpass(TextBox2.Value) = True Then
MsgBox "J'aimerais que quand on clique sur OK, on accède à
la Feuil1 (appelée liste dans mon cas)."
End If
End Sub

Merci d'avance de votre aide
Avatar
Gilles
Bonjour,
J'aimerais que quand on clique sur OK, on accède à la
Feuil1 (appelée Liste dans mon cas) à la place de la MsgBox
Private Sub CommandButton1_Click()
If CheckBox1 And controlnom(TextBox1.Value) = True And
controlpass(TextBox2.Value) = True Then
MsgBox "J'aimerais que quand on clique sur OK, on accède à
la Feuil1 (appelée liste dans mon cas)."
End If
End Sub
Merci d'avance de votre aide


Bonjour

Essaye de remplacer l'instruction MsgBox par: Sheets("liste").Select

Bonne continuation

Avatar
non, ca ne marche pas, mais merci quand meme


-----Message d'origine-----
Salut

Je crois que quelque chose comme ça pourrait
fonctionner :


Sheets("Le nom de la feuil1").Activate
Unload Me

A+

"" wrote:

Bonjour,

J'aimerais que quand on clique sur OK, on accède à la
Feuil1 (appelée Liste dans mon cas) à la place de la
MsgBox



Private Sub CommandButton1_Click()
If CheckBox1 And controlnom(TextBox1.Value) = True And
controlpass(TextBox2.Value) = True Then
MsgBox "J'aimerais que quand on clique sur OK, on
accède Ã


la Feuil1 (appelée liste dans mon cas)."
End If
End Sub

Merci d'avance de votre aide

.