Discussion :

[tototiti2008]

Bonjour à tous,

J'ai créé une fonction en VBA (Function sur Excel initialement et elle fonctionne, elle n'utilise aucune spécificité du VBA Excel et donc devrait fonctionner sur Word)
En Excel, facile, on appelle directement la fonction dans la feuille de calcul
Et en Word ? J'ai essayé des champs de plusieurs types, des champs de formulaires... sans succès
y a t-il une recette miracle ou dois-je faire une macro qui remplit un signet avec le résultat de ma fonction (ou toute autre astuce alambiquée qui ne me serait pas venue à l'esprit...)

Merci de m'avoir lu

[Heureux-oli]

Salut,

Tu peux l'utiliser partout.
Pour remplir un champ de formulaire, un signet, une cellule de tableau, directement dans le texte.

Si tu pouvais nous dire comme tu fais, on pourrait peut-être mieux te guider.

[tototiti2008]

Salut ,

Merci de ta réponse
prenons une fonction simple, la fonction en elle-même n'a pas d'impact je pense

Dans un module du document : (est-ce le bon endroit ?)

Code :

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

1
2
3
Function tiptop(a As Double) As Double
tiptop = a * 2
End Function

Si je fais un tableau avec des nombres
Onglet Insertion - Quickpart - Champ
Formule
=tiptop(A1)
=> Erreur de syntaxe

Même problème avec des champs de formulaire (ancienne version) et un champ Texte de type Calcul avec la même formule

Qu'ai-je loupé ?

[Heureux-oli]

Salut,

Contrairement à Excel, les fonctions ne sont pas directement utilisables en Word.

Code :

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

1
2
3
Sub Document_Open()
ActiveDocument.FormFields(1).Result = tiptop(1,45)
End Sub

[tototiti2008]

Bonjour à tous,

Merci de ta réponse, j'aurais aimé que ce soit plus simple^^

Bon, je me suis débrouillé en écrivant le résultat dans un signet

Je joins mon exemple si ça peut intéresser quelqu'un