Formules VBA

[Claude17430]

Je cherche la formule VBA équivalent à la formule Excel 4 :
=FORMULE(ENTRER("xxxxx"))
Merci d'avance

 

[JBARBE]

Re : Formules VBA

Bonjour,

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

 

[Hervé]

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

 

[Dormeur74]

Re : Formules VBA

Regarde Formula, Formular1c1 et FormulaLocal.

 

[Claude17430]

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

 

[JBARBE]

Re : Formules VBA

Exemple !

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)

 

[Claude17430]

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.

 

[Victor21]

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)

 

[JBARBE]

Re : Formules VBA

Je t'envoie un fichier d'exemple !

 

[Claude17430]

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

 

[JBARBE]

Re : Formules VBA

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

 

[Claude17430]

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

 

[JBARBE]

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")