begin process at 2012 02 16 10:12:36
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

VBA

 > FORMULAIRE DE SÉLECTION DE TYPE ASSISTANT

FORMULAIRE DE SÉLECTION DE TYPE ASSISTANT


 Information sur la source

Note :
Aucune note
Catégorie :VBA Classé sous :formulaire, selection, assistant, sélection Niveau :Initié Date de création :22/03/2006 Vu / téléchargé :5 806 / 461
Auteur : sybacs

Ecrire un message privé
Commentaire sur cette source (4)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
Cette source permet de créer un formulaire de type assistant (selection) en appelant une fonction (1 ligne de code).
Le formulaire "FormSelect" est associé au module "Assistant". Ils ne peuvent pas être utilisés séparément.
L'exemple suivant montre comment l'utiliser avec une mise en garde sur le format de retour des valeurs sélectionnés (texte)

Source

  • ' Le tableau passé en paramètre (dans l'exemple MonTableau)
  • ' ne doit contenir qu'une dimension
  • ' Le tableau retourné par la fonction est type texte
  • Sub exemple
  • MonTableau = array("a","b","c",5)
  • TableauRetour = FormAssistant(MonTableau)
  • 'si l'on sélectionne dans l'ordre c, a, 5 le tableau retourné sera : "c", "a", "5"
  • 'le "5" étant considéré comme du carractère
  • End Sub
' Le tableau passé en paramètre (dans l'exemple MonTableau)
' ne doit contenir qu'une dimension
' Le tableau retourné par la fonction est type texte
Sub exemple
    MonTableau = array("a","b","c",5)
    TableauRetour = FormAssistant(MonTableau)
    'si l'on sélectionne dans l'ordre c, a, 5 le tableau retourné sera : "c", "a", "5"
    'le "5" étant considéré comme du carractère
End Sub


 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source avec une capture MACRO COMPLÉMENTAIRE DE DÉDOUBLONNAGE POUR EXCEL
AJOUT D'UN MENU EXCEL EN VBA (AVEC N ITEMS) EN UNE LIGNE DE ...
Toutes les sources de sybacs

 Sources de la même categorie

Source avec Zip Source avec une capture OUTLOOK ATTACHEMENT SAVER par MoiLafouine
Source avec Zip GESTION PERSONNEL par oudlarbi
Source avec Zip Source avec une capture CALENDRIER EN VBA POUR EXCEL 2010 par nounou94
Source avec Zip Source avec une capture MANIPULER LES FENETRES ENFANT D'EXCEL par bigfish_le vrai
Source avec Zip Source avec une capture COLLECTION ID par Le Pivert
Toutes les sources de la catégorie VBA

 Sources en rapport avec celle ci

Source avec Zip HSCROLLBAR POUR L'ARRIÈRE PLAN par 320C
Source avec Zip BON DE COMMANDE par alpha5
Source avec Zip Source avec une capture ACCESS 2010 GESTION D'UNE BIBLIOTHÉQUE par mondaying
Source avec Zip Source avec une capture BSS14 COUPE_RABOUTAGE CHAINE_TRANSMISSION par groller
Source avec Zip Source avec une capture Source .NET (Dotnet) CRÉATION DYNAMIQUE DE BOUTONS VB.NET 2003 par jcvid2

Commentaires et avis

Commentaire de Renfield le 22/03/2006 11:43:04 administrateur CS

pourquoi utiliser un concepteur ?
tu devrais faire .Show vbModal
ton formulaire n'est pas déchargé (seulement masqué)
le module n'est pas obligatoire ici... tu pourrais juste faire une procédure publique genre 'Launch' dans ton formulaire, qui remplirais les listes, afficherais le formulaire (en Modal) et renverrais le resultat...

Attetion a bien déclarer tes variables, à remplacer Global par Public et a mettre la portée (Private / Public) de tes sub et functions

Commentaire de gogomanu le 11/04/2006 14:29:05

RENFIELD: Comment fais tu pour appeler une fonction dans un form de façon modale ? ça m'intéresse

Commentaire de Renfield le 11/04/2006 14:41:36 administrateur CS

ce genre de choses :

Form 2 :

Public Function Launch ( ... ) as Boolean
     '# Initialisation, etc
Me.Show VbModal
     '# Traitement a effectuer une fois le formulaire validé/fermé
     Unload Me
End Function

Private Sub BtnOK_Click()
    Result = True
    Me.Hide
End Sub


-----------


Form 1 :

   If Form2.Launch ( ... ) Then
       ...
   End If

Commentaire de gogomanu le 11/04/2006 15:47:32

Excellent merci je n'ai jamais pensé à essayer "Me.Show VbModal"

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

problème de selection [ par h_adil ] bonjour,j'ai creer une formulaire. dans cette formulaire il ya trois zones de listes modifiables: catégorie, machine, opérateur.chaque machi pb formulaire en access2000 [ par bob69 ] j'ai crée sous access2000 un formulaire qui contient un sous formulaire. je change la valeur du sous formulaire avec une combo box (boite de sélection supprimer enregistrement dans formulaire? [ par fredieuric ] Salut a tous,Je veux simplememt rajouter un bouton dans un formulaire pour effacer l enregistrement courant. Il y a un truc de l assistant qui permet sélection multiple dans un treeview [ par vanjelis ] Quelqu'un saurait t-il comment faire de la selection multiple dans un treeview, ou existe-t-il un controle treeview "amélioré" qui permette de faire d Comment en access 2000 créer un filtre sur un formulaire avec une sélection "simple" dans une listbox ... peut on l'étendre à un sélection multiple ? [ par bs605124 ] Exemple:Ma listboxID Prenom1 Albert2 René3 JosephJe souhaite par exemple ouvrir un formulaire en cliquant 2 x sur "2 René" (donc avec un fichier vb [ par cyril64 ] bonjour à tous,je recupere un fichier texte non formatée (issu d'un environnement unix) que j'arrange puis que j'integre dans une textbox d'un formula Access VBA Aide pour accéder au code d'un formulaire de Saisie fait avec l'assistant [ par zerailkiller ] Bonjour,Je bosse actuellement sur une bd access, je me débrouille en vb mais la c'est plutot du coté access que ca coince, car ce formulaire je n'ai p Liste à sélection multiples [ par AgriPhilou ] Bonjour, ACCESS 2003 à 2007. Comment écrire le code qui aprés une sélection groupée dans une listeBox actualisera un sous formulaire en renvoyant le récupérer un filtre par sélection sous ACCESS [ par Triton972 ] Bonjour,Voilà mon problème :Je travaille avec ACCESS 2003.J'ai un formulaire avec un affichage en "Feuille de données" que je peux filtrer avec le "fi Selection d'un enregistrement dans un formulaire en feuilles de données [ par nitocris ] J'aimerais simplement savoir comment on peut identifier les enregistrements selectionnés, de ce qui ne le sont pas.J'ai essayer un système qui me renv


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Underwater View of the Ocean With LIght Shining Through the WavePhoto Green Energy Solutions With Light Bulb Morphed Into Landscape
Photo Iguassu Falls is the largest series of waterfalls on the planet, 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 5,382 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)