Formules VBA

JBARBE

XLDnaute Barbatruc

• 19 Octobre 2012

• #2

Re : Formules VBA

Bonjour,

d'abord Un bonjour aurait été bien compris ! Ensuite Excel 4 est vraiment dans la poubelle des utilisateurs depuis longtemps !

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 19 Octobre 2012

• #3

Re : Formules VBA

salut 🙂

je ne connais pas l'instruction FORMULE en excel4 par contre ENTRER dois correspondre à INPUT en vba, tu peux donc essayer :

dim texte as string
texte=inputbox("titre")
msgbox texte 'pour test

a plus

 

Vote positif 0 Vote négatif

Dormeur74

XLDnaute Occasionnel

• 19 Octobre 2012

• #4

Re : Formules VBA

Regarde Formula, Formular1c1 et FormulaLocal.

 

Vote positif 0 Vote négatif

C

Claude17430

Guest

• 19 Octobre 2012

• #5

Re : Formules VBA

Bonjour Hervé,

Je te remercie, mais ce n'est pas exactement ce que je recherche.
Je souhaite que le texte ou la valeur que je tappe dans la boite de dialogue soit copier dans la cellule sélectionnée.
Merci d'avance de ton aide

 

Vote positif 0 Vote négatif

JBARBE

XLDnaute Barbatruc

• 19 Octobre 2012

• #6

Re : Formules VBA

Exemple !

Code:

Range("A1").value = Cdate(FrmEncoder,TxtDate)  ''''' FrmEncoder est la boite de dialogue '''''' TxtDate est la zone de Texte(ici une date)

Range("A2").value = CDb1(FrmEncoder,TxtMontant) '''''''TxtMontant est la zone de Texte(ici une somme)

 

Vote positif 0 Vote négatif

C

Claude17430

Guest

• 19 Octobre 2012

• #7

Re : Formules VBA

Merci, de ta réponse, mais je suis nouveau sur VBA, et je galère un peu.
Pourrais-tu m'écrire la formule pour.
Selectionner par exemple la cellule D5,
Ouvrir une boite de dialogue me demandant d'entrer une valeur.
Afin que lorsque je rentre la valeur dans la boite de dialogue et que je valide, la valeur que j'ai entré, soit inscrite dans la celleule D5.

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

Supporter XLD

• 19 Octobre 2012

• #8

Re : Formules VBA

Bonjour à tous 🙂

A toutes fins utile (Extrait de l'aide XL4)

FORMULE : Entre une formule dans la cellule active ou dans une référence [...]
Syntaxe 1 (Feuille de calcul et feuille macro) : FORMULE(formule_texte;réf)

ENTRER : Affiche une boîte de dialogue pour les entrées de l'utilisateur [...]
Syntaxe : ENTRER(texte_message;no-type;titre_texte;par_défaut;pos_x;pos_y;réf_aide)

 

Vote positif 0 Vote négatif

JBARBE

XLDnaute Barbatruc

• 19 Octobre 2012

• #9

Re : Formules VBA

Je t'envoie un fichier d'exemple !

 

Pièces jointes

• Exemple_Boite_de_Dialogue.xls

  62 KB · Affichages: 22
• Exemple_Boite_de_Dialogue.xls

  62 KB · Affichages: 24
• Exemple_Boite_de_Dialogue.xls

  62 KB · Affichages: 25

Vote positif 0 Vote négatif

C

Claude17430

Guest

• 19 Octobre 2012

• #10

Re : Formules VBA

Bonjour à tous encore une fois,

En fait voilà comment j'écris la macro.

Sub EntrerMontant()
'
' EntrerMontant Macro
'

'
Range("B3").Select
InputBox ("Montant")

End Sub
La boite de dialogue me demande un montant, mais lorsque je valide, le montant n'est pas entré dans la cellule B3

 

Vote positif 0 Vote négatif

JBARBE

XLDnaute Barbatruc

• 19 Octobre 2012

• #11

Re : Formules VBA

Range("B3").Value = InputBox ("Montant")

 

Vote positif 0 Vote négatif

C

Claude17430

Guest

• 19 Octobre 2012

• #12

Re : Formules VBA

Merci 1000 fois.
Effectivement c'est super simple, mais je n'arrivais pas à trouver.
J'en profite pour te demander la même chose, mais plutôt que d'entrer un montant, je souhaiterais entrer une formule dans laquelle par exemple je demanderai quel est le produit de la celulle A5 et de la Cellule D10.
Merci d'avance

 

Vote positif 0 Vote négatif

JBARBE

XLDnaute Barbatruc

• 19 Octobre 2012

• #13

Re : Formules VBA

Un exemple avec un MsgBox

Sheets("Feuil1").Select
MsgBox "Valeur de la cellule A5 " & Range("A5") & "Valeur de la cellule D10 " & Range("D10")

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif