Discussion :

[tomy7]

Bonjour,

Est ce que qu'un commandbutton peut controle deux feuilles?

Exemple:

Pour le moment j ai une feuilles avec plein de boutons,ces boutons masque des lignes sur la feuille deux plus ou moins selon le modele desire donc le bouton cliquer.

apres si j ajoute une autre feuille appele "add..."(les... pour le numero de la feuille) avec un bouton
je voudrai que les boutons "modele" dirige ma nouvelle feuille.

Mon idee est de creer une boite de dialogue avec les deux types de feuille:

-Main
-Add...

si c est main qui est selectionne on dirige main si c est Add on dirige le dernier Add soit la derniere feuille ajoute.

est ce possible?

[ouskel'n'or]

Je résume
Une feuille Main avec plein de boutons qui dirige la feuille Main
Une feuille Add avec un seul bouton
Pour utiliser les mêmes macros dans les deux feuilles, tu dois mettre tes procédures dans un module standard.
Derrière chaque bouton, le code d'appel de ces procédures avec pour paramètre le nom de la feuille active.
Dans le code de la feuile de calculs :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CommandButton1_Click()
      TaMacro Activesheet.name
End Sub

... et dans le module standard, ta macro :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub TaMacro(NomFeuille)
     msgbox "Tu te trouves dans la feuille " & NomFeuille
End sub

Si j'ai bien décripté tes "explications"...

[tomy7]

je reexplique pour que tu comprenne bien mais t est vraiment dans l esprit.

j ai une feuille1 avec plein de boutons " modele"

pour le moment elle ne controle que la feuille 2 "Main"

Mais mon idee est de mettre un forms a l ouverture : pour selectionner le type de feuille qui va etre rempli

si c est Main elle existe deja
si c est Add

la personne clic sur un togglebutton pour ajouter une feuille rempli qui est la copie de main sans ces formules et en meme temps je veux que ma feuille 1 controle la feuille Add (la derniere feuille ajoute mais plus la main)


merci Ouskel'Nor

[ouskel'n'or]

Avant de répondre, explique encore :

Mais mon idee est de mettre un forms a l ouverture : pour selectionner le type de feuille qui va etre rempli

Où sont tes boutons ? Sur la feuille de calculs ou sur un userform ?
J'ai compris qu'ils étaient sur la feuille de calculs.
Pour remplir l'une de tes feuilles, tu veux donc utiliser un userform, c'st bien ça ?
Je réponds à ça mais j'aurai ensuite une suggestion à te faire.
Sur ta feuille Main, un bouton pour ouvrir l'userform avec pour paramètre la feuille Main, et un autre bouton pour ajouter une feuille Add et ouvrir l'userform sur la feuille Add.
Tu fais une seule macro dans un module standard avec appel depuis le bouton "Main" avec le paramètre Main
et derrière le bouton "Add", tu ajoutes la feuille, et appelle la même macro avec le paramètre Add.
La macro pour ouvrir l'userform

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub OuvrirUserform(NomDeLaFeuille)
Worksheets(NomDeLaFeuille).select 'ou activate
Userform1.Show
End sub

Dans l'userform, tu peux alors travailler sur la feuille active (activesheet)
Maintenant, ce que je suggèrerais est une ouverture de l'userform à l'ouverture du fichier (Macro Workbook_Open dans Thisworkbook) avec un bouton autorisant l'ajout d'une feuille qui devient alors la feuille active et éventuellement une liste de tes feuilles afin de pouvoir sélectionner la feuille sur laquelle tu souhaites travailler.
Cette solution permettrait d'empêcher l'utilisateur d'accéder directement à la base de données et l'empêcher ainsi de modifier des cellules sans que tu le désires.
Juste une idée mais qui supprimerait tous tes boutons sur tes feuilles de calculs

[tomy7]

Pièce jointe 26888


Est ce que tu comprends mieu ?

[ouskel'n'or]

Désolé, mais sans me plonger dans ton code, non, ça ne m'éclaire pas sur ce que tu veux faire, tes boutons envoyant systématiquement sur la feuille Main (ceux que j'ai essayés). Et je ne vais avoir le temps de creuser... Désolé.

[tomy7]

ok
tu as les bouton sur la feuille 1 : "Level of project" qui masquent des lignes sur la feuille Main.


tu as le bouton add order quand tu clic sur "Control Table":
celui ci ajoute une feuille

'update' mets a jour un tableau sur les feuilles ajoutees "Add.."

MON OBJECTIFS est de controler avec les memes boutons sur Feuille 1"level of project" soit la feuille Main si l utilisateur a choisis Main ou Add si l utilisateur a choisis Add.

et je pensais faire sa avec un forms ds le sub : workbook open


tu comprends mieu?

[ouskel'n'or]

C'est bien ce que j'ai compris (en gros).
Je persiste donc, je mettrais tous mes boutons dans un userform ouvert à l'ouverture du projet pour gérer tes différentes feuilles. Je n'utilise jamais une feuille de calculs pour gérer un projet. Un userform sécurise le projet en empêchant l'utilisateur d'accéder aux feuilles de calculs, et permet d'améliorer considérablement la présentation. En outre ça te libère d'avoir à retourner sur la bonne feuille pour retrouver le bon bouton qui fait la bonne action
Pour tout dire, je ne mets jamais de boutons dans une feuille de calculs et leur préfère un bouton dans une barre d'outils personnalisée quand cela se révèle nécessaire (pour des tâches spécifiques et ponctuelles...)
Ceci dit, la méthode que je t'ai indiquée te permet de faire... ce que je ne fais jamais...
Bon courage, bonne chance, bonne journée. (là, je dois vraiment "y aller")

[tomy7]

pas de probleme : je vais tenter ton idee de forms avec tous les boutons dedans.

juste une question peux tu dessiner un tableau dans un forms ?

il me semble pas...



merci pour tout ouskel'nor

[ucfoutu]

pas de probleme : je vais tenter ton idee de forms avec tous les boutons dedans.
juste une question peux tu dessiner un tableau dans un forms ?

Qu'entends-tu exactement par "dessiner" et par un "forms"

Certaines choses sont (dur dur, mais oui...) possibles en se servant de l'Api de Windows...

Mais réponds d'abord avec précision.

[tomy7]

forms = userforms

dessiner = lorsque tu cree un forms tu peux faire un cadre, ajouter un combobox , textbox,..., mais il me semble que tu n ' as pas la possibilite de faire un tableau ou tu mets les boutons dedans comme celui qu il y a sur ma piece jointe plus haut feuille level of project

[ucfoutu]

Tu n'y "fais" pas un cadre ... tu insères un cadre (un contrôle Frame)

Les autres "choses" dont tu parles ici (combobox, textbox, etcc...) ne sont en rien des dessins eux non plus, mais des contrôles insérés....

Si maintenant, ce que tu veux dire est : "existe-t-il un contrôle revêtant l'aspect d'un tableau et que je pourrais insérer sur mon userform ?" , la réponse est oui ! Il en existe quelques-uns, parmi lesquels une ListView, une MsFlexGrid, etc...

Rien de celà ne correspond à du "dessin"...

[tomy7]

ok je me suis mal exprime avec le terme dessin ...
Donc comment fais tu une msgflexgrid ou une listview?

[ucfoutu]

Je répète donc (et répèterai à l'infini ... question essentielle de terminologie) :
Ce n'es pas toi qui "fais" .... C'est toi qui insères un contrôle ou un composant.

Tu veux quoi ? Insérer une ListView ?

Bon... ouvre enfin ton aide en ligne sur ce mot (ListView)...

Tu y découvriras à quelle insertion d'OCX elle correspond...

Ensuite : Clic droit dans ta boîte à outils ===>>> Contrôles supplémentaires ===>>> tu coches Microsoft Listview ...===>> tu acceptes ===>> tu l'insères ===>> tu retournes dans ton aide en ligne et tu bûches comment l'utiliser (toutes ses propriétés, ses évènements, ses méthodes, les exemples fournis ...) ===>> tu t'en sers...

Tu reviens ici exposer (avec ton code d'essai) une difficulté éventuelle ponctuelle d'application...

C'est ainsi que l'on apprend VB, pas autrement ...

[ouskel'n'or]

Tu peux insérer un contrôle (cf - ucfoutu) ou une image de fond pour ton userform ( Tableau dans userform.zip ) image dans laquelle tu peux disposer toutes tes affaires

[tomy7]

ouai bonne idee mais j ai envie d evoluer au niveau des listview et Msflexgrid car je ne connais pas du tout donc je veux voir quand on peut inserer cela et les developper

merci ouskel'nor

simple question pour toi ouskel'nor

Comment fais tu pour mettre ton image en fond du Userform?

j ai compris avec propritete> picture



merci a tous