Autres Message box pour remplir une fiche

[abdernino1985]

Bonjour le forum ,
je veux sur l'onglet base mettre des messages box pour remplir ma fiche
un bouton commencer decompte
message box 1 : montant dommage et le copié sur F8
message box 2 : montant Main D'œuvre et le copié sur F9
message box 3 : montant Peinture et le copié sur F10
message box 4 : montant BDG D'œuvre et le copié sur F11
message box 5 : montant Montant pneu et le copié sur F12
message box 6 : taux Vetusté et le copié sur E15 la valeur peut etre egal a zéro
message box 5 : taux Vetusté Pneumatique et le copié sur E16 la valeur peut etre egal a zéro
aprés demandé si il y lieux d'appliqué une REG Prp si non je veux F19:F21 n'affiche rien j'ai n'ai pas dans la mesure du possible
idem pour F24:F26.
si oui demadé quelle REG Prp appliqué
REG Prp AGE si oui demandé la valeur RC Payée quand doit copié dans F18 ,si non on passe a l'autre question REG Prp Permis si oui demandé la valeur RC Payée quand doit copié dans F19.si non on passe a REG Prp Capitaux on demande si oui on demande Valeur Assuré quand copie sur F13 puis Valeur venale quand copie sur F14.
si non pout tout ne rien affiché sur F19 a F21 et de F24 a F29
message box dernier : taux Franchise et le copié sur E22 qui parfois etre un montant fixe alors donner le choix entre taux ou franchise fixe

 

[Staple1600]

Bonsoir le fil,

Les MsgBox sont fait pour afficher des messages.
(*)Pour envoyer des valeurs vers des cellules, il faut passer par des contrôles TextBox disposés sur un Userform.
Ou plus "rudimentaire" passer par N InputBox

(*) Mais cela, tu le savais déjà (je viens juste de m'en apercevoir)

Autres - automatisé dans userform

Bonjour le forum, je voudrais avec la userform automatisée mon fichier en premier lieu il faut renseigné la partie supérieure de la fiche la fourniture sans glace pneumatique main d'ouvre peinture après ça on a le montant en TTC qui en k24 c'est la somme, pour la cellule k25 c'est la somme de F...

www.excel-downloads.com

 

[abdernino1985]

non je pensais que c'est faisable avec des messages box, je maitrise pas très bien les macros alors impossibles de faire ça avec userform c'est trop complexe pour moi

 

[Staple1600]

Re

Pour préciser mon propos sur les MsgBox et les InputBox, testes ce petit exemple.

Sub exemple()
Dim Valeur_z
Valeur_z = InputBox("Saisir une valeur", "Test", Application.UserName)
MsgBox "La valeur saisie était: " & Valeur_z, vbInformation
Range("A1") = Valeur_z
End Sub

 

[abdernino1985]

merci beaucoup mais comment faire pour toute ma fiche

 

[JBARBE]

Bonsoir à tous, Staple ,
Un exemple de bouton d'option dans une boite de dialogue ! HT et TTC !

 

[JBARBE]

Re,
Un autre exemple un peu plus complet !
Bonne nuit !

 

[JBARBE]

Re,
Allez un dernier un peu plus complet !
Bonne nuit !

 

[JBARBE]

Re,
Petites modifs !
Bonne journée !