Aller au contenu
  • Pas encore inscrit ?

    Pourquoi ne pas vous inscrire ? C'est simple, rapide et gratuit.
    Pour en savoir plus, lisez Les avantages de l'inscription... et la Charte de Zébulon.
    De plus, les messages que vous postez en tant qu'invité restent invisibles tant qu'un modérateur ne les a pas validés. Inscrivez-vous, ce sera un gain de temps pour tout le monde, vous, les helpeurs et les modérateurs ! :wink:

Ouvrir un formulaire depuisle menu


rimbaut

Messages recommandés

Bonsoir à tous,

J'ai créer un bouton destiné à ouvrir le formulaire permettant de saisir une liste de clients. Cependant, je pense que pour activer ce bouton, il faut utiliser vba. J'ai ainsi suivi quelques exemples mais celà ne va pas du tout car je ne connais pas la méthode qui permet de lancer le formulaire.

Cependant voici mon cade archi faux :

 

Option Compare Database

Option Explicit

 

Public Sub LancerFormulaireSaisieClients()

Open As FormulaireSaisieClients

End Sub

 

Mon but est de personnaliser complètement le menu. Y a t'il une autre solution hors vba ?

 

Merci pour votre précieuse aide

Lien vers le commentaire
Partager sur d’autres sites

Bonjour

 

Pour acceder à une autre feuille.

 

Soit par son nom

Private Sub CommandButton1_Click()

Sheets("Feuil2").Activate

End Sub

où "Feuil2" doit être changé par le nom de la feuille voulue.

 

Soit par son index

Private Sub CommandButton1_Click()

Sheets(2).Activate

End Sub

où l'index 1 correspond à la première feuille.

Lien vers le commentaire
Partager sur d’autres sites

Bonjour guyguy59, bonjour à tous,

J'ai oublié de préciser quelque chose d'important. Le formulaire a été réalisé sous access et c'est de cette application dont il s'agit.

Ainsi, je ne sais pas si le code vba transmis par guyguy59 est valable pour access.

Merci de me le préciser .

Bonne journée

Lien vers le commentaire
Partager sur d’autres sites

Bonjour

J'avais mis du code pour Excel et non pour Access, car dans la question ce n'etait pas précisé, et je vous avez déjà répondu pour Excel alors j'avais cru que c'était pour Excel.

 

En ACCESS

Private Sub CommandButton1_Click()

 

' stDocName est le nom du formulaire à ouvrir

Dim stDocName As String

 

stDocName = "rechNOM"

 

DoCmd.OpenForm stDocName

 

End Sub

 

Pour avoir plus de renseignements placer le curseur sur DoCmd et appuyer sur F1, car DoCmd permet de faire beaucoup de choses dans un formulaire.

@+

Modifié par guyguy59
Lien vers le commentaire
Partager sur d’autres sites

Rejoindre la conversation

Vous pouvez publier maintenant et vous inscrire plus tard. Si vous avez un compte, connectez-vous maintenant pour publier avec votre compte.
Remarque : votre message nécessitera l’approbation d’un modérateur avant de pouvoir être visible.

Invité
Répondre à ce sujet…

×   Collé en tant que texte enrichi.   Coller en tant que texte brut à la place

  Seulement 75 émoticônes maximum sont autorisées.

×   Votre lien a été automatiquement intégré.   Afficher plutôt comme un lien

×   Votre contenu précédent a été rétabli.   Vider l’éditeur

×   Vous ne pouvez pas directement coller des images. Envoyez-les depuis votre ordinateur ou insérez-les depuis une URL.

  • En ligne récemment   0 membre est en ligne

    • Aucun utilisateur enregistré regarde cette page.
×
×
  • Créer...