Appeler l'interface utilisateur ..

M

macpoy

Guest

• 5 Février 2005

• #2

bonsoir le forum, bonsoir david,
pour une plus grande efficacité, joint ton classeur à ta demande , tous les excelliens de ce site pourrons travailler sur du concret.
merci d'avance.
bon excel @ +

 

Vote positif 0 Vote négatif

D

David

Guest

• 5 Février 2005

• #3

Voici mon fichier.
ne vous formalisez pas en le visualisant il n'est pas terminé.

merci

 

Pièces jointes

• essaiInterface.zip

  7 KB · Affichages: 22
• essaiInterface.zip

  7 KB · Affichages: 20
• essaiInterface.zip

  7 KB · Affichages: 19

Vote positif 0 Vote négatif

G

Gérard DEZAMIS

Guest

• 5 Février 2005

• #4

Bonsoir David

Qu'entends-tu exactement par interface ?
1 - Une feuille qui ne te sert qu'à la saisie des données retranscrites ensuite dans une autre feuille ?
2 - Un Userform (Formulaire) qui apparait à l'ouverture de la feuille, à l'ouverture du classeur ?, en réaction à un click de la souris ?

Un simple exemple du fichier joint , la simple sélection de la feuille essai déclenche la mise en place d'un Userform.
Si c'est ce Type de solution que tu recherches Il y en a un stock sur ce Forum...
Dans "Chercher" tu fais simplement USF DEMO et tu verras que le super @+Thierry le spécialiste de ce type de procédure à réalisé des démonstrations fort didactiques et surtout tres claires, nettes, précises.
Je te conseille notamment :
USF-Rudiments-Basic.zip
USF-Rudiments-Basic-OptionButton.zip

Pour un début : c'est de l'indispensable, de l'incontournable.

j'ai goûté, j'ai aimé, j'en redemande ...

@+ GD

 

Pièces jointes

• david.zip

  6.8 KB · Affichages: 28
• david.zip

  6.8 KB · Affichages: 26
• david.zip

  6.8 KB · Affichages: 30

Vote positif 0 Vote négatif

G

Gérard DEZAMIS

Guest

• 5 Février 2005

• #5

Bonsoir Macpoy et David

1000 excuses je n'ai pas pensé à "rafraîchir" et mon message télescope tout.

@+ GD

 

Vote positif 0 Vote négatif

M

macpoy

Guest

• 5 Février 2005

• #6

Re tout le monde,
voici ton fichier légerement modifié.
j'espère qu'il te conviendra.
au besoin n'hesite pas à demander un peu plus.
bon excel @ +

 

Pièces jointes

• essaiInterface.zip

  11.9 KB · Affichages: 38
• essaiInterface.zip

  11.9 KB · Affichages: 36
• essaiInterface.zip

  11.9 KB · Affichages: 34

Vote positif 0 Vote négatif

G

Gérard DEZAMIS

Guest

• 5 Février 2005

• #7

Re David
Désolé mais ton fichier n'explique pas du tout ce que tu attends
Tes pommes, Tes cerises, tu les achetes, tu les vends, tu les stockes ?
C'est une gestion de stock, une facture ?
Les données sont à archiver ? à imprimer ? a trier ?

Bcp de questions et bien peu de pistes pour t'aider.

@+ Gd

 

Vote positif 0 Vote négatif

M

macpoy

Guest

• 5 Février 2005

• #8

Re à tous,
bonsoir gerard,
moi non plus je n'avais pas rafraichi, mais j'ai une petite excuse, je suis chez maman et elle n'a pas l'adsl dur dur de vous suivre!!!
bon excel @ +

 

Vote positif 0 Vote négatif

D

David

Guest

• 5 Février 2005

• #9

Macpoy t'es génial, c'est exactement ce dont j'ai besoin comme exemple.

Bon vous l'aurez compris, il s'agit d'un exemple qui n'a pas pas grand intéret !
c'est pour m'aider pour que je comprenne le principe et puisse l'adapter au mien.(ok gérard ! excuse pour cette ex sans trop d'explication!!)

macpoy stp,
1/ avec quoi as tu créer ce bouton, c'est un lien hypertexte, ou bien simplement un cmdbutton ?
2/ peux t'on avoir simplement visible à l'écran une grande interface sans avoir les valeurs visibles de la feuille sur laquelle elles sont attendues ?

Merci de vos réponses !
David.

 

Vote positif 0 Vote négatif

M

macpoy

Guest

• 5 Février 2005

• #10

Re à tous,

le bouton provient de la barre outil dessin/forme automatique/plaque. clique droit et après mise en forme, tu affecte une macro.

pour ne voir la feuille, tu mettre :

Sub Affiche_Usf()
Application.Visible = False
UserForm1.Show
End Sub

et surtout pour quelle réapparraisse:

Private Sub CommandButton1_Click()
Feuil1.Range("c5").Value = ComboBox1.Value
Feuil1.Range("c7").Value = ComboBox2.Value
Feuil1.Range("c9").Value = ComboBox3.Value
Unload Me
Application.Visible = True <----------- tres important
End Sub


bon excel @ +

 

Vote positif 0 Vote négatif

D

David

Guest

• 5 Février 2005

• #11

bien merci macpoy et gérard de s'être penché sur mon probléme.
Merci aussi pour vos exempls.
Il me reste plus qu'à travailler et à revenir demain si je n'ai pas tout compris !

Merci encore et bonne soirée à tous deux,
david.

 

Vote positif 0 Vote négatif