XL 2019 Ecrire/modifier des cellules à partir du code d'une fonction? (erreur 1004)

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 19 Mai 2021

• #2

Bonsoir p vieux,
En B2 ou C2 écrire :

VB:

=Addition(A1;A2)

Si en a1 et A2 se trouvent les nombres à additionner.
Les fonctions doivent être utiliser exactement comme des fonction XL, sauf qu'elles sont personnelles.
Un pti tuto sur les fonctions perso :

Fonctions personnelles : Utilité, Simplicité et Méthode

Pour ceux qui ne connaissent pas les fonctions personnelles et pour ceux qui appréhendent le VBA, voici un petit tuto pour montrer à quel point des fonctions personnelles peuvent être utiles et surtout à quel point c'est simple, même si on n'a...

www.excel-downloads.com

 

Vote positif 0 Vote négatif

S

soan

XLDnaute Barbatruc

Inactif

• 19 Mai 2021

• #3

Bonsoir p vieux, sylvanu,

bienvenue sur le site XLD !

je te propose le fichier ci-dessous ; charge-le, puis fais Ctrl e

VB:

Option Explicit

Sub Addition(nb1%, nb2%)
  [B2] = nb1: [C2] = nb2: [D2] = nb1 + nb2
End Sub

Sub Essai()
  Addition 10, 5
End Sub

soan

 

Pièces jointes

• Exo p vieux.xlsm

  14 KB · Affichages: 8

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 19 Mai 2021

• #4

@soan,
Mais là vous ne parlez plus de fonctions.

 

Vote positif 0 Vote négatif

S

soan

XLDnaute Barbatruc

Inactif

• 19 Mai 2021

• #5

@sylvanu

oui, bien sûr, puisqu'une fonction ne peut pas écrire dans des cellules !

donc c'est bien obligé de passer par une sub !

soan

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 19 Mai 2021

• #6

Ou utiliser une fonction ... comme une fonction. Cf post #2.

 

Vote positif 0 Vote négatif

S

soan

XLDnaute Barbatruc

Inactif

• 19 Mai 2021

• #7

@sylvanu

oui, j'ai bien vu ton post #2 ; mais pour moi, ça revient plus à une fonction personnalisée (même si elle est faite en VBA), qu'à une solution purement VBA indépendante de la feuille (pour ce qui est de l'envoi des 2 nombres à additionner) ; et il me semble bien que le demandeur p vieux aimerait mieux ce genre de solution ; mais après tout, pourquoi pas ? c'est lui qui pourra choisir selon ses préférences. ​

soan

 

Vote positif 0 Vote négatif

p'tit vieux

XLDnaute Occasionnel

• 19 Mai 2021

• #8

Merci à tous pour vos réponses et pour votre accueil.
@sylvanu Merci. Mais non merci pour votre post #5. J'aime utiliser un F() comme telle . Surtout lorsque l'on a besoin d'un résultat en retour .
@soan Vous avez raison il s'agit bien d'un Add-In. Et je ne savais pas que l'on ne peut pas écrire dans une cellule. Je vous ai répondu ICI.

BON J'AVOUE !!
J'ai écris 2 questions qui se rejoignent.

Mon problème est résumé par @danielco.
J'ai écris une fonction Add-In qui fait des "trucs et des machins" et qui en plus de retourner un résultat dans la cellule qui l'appelle DEVRAIT pouvoir écrire dans des cellules, en cas de réponses multiples,
A priori c'est impossible dans une fonction personnalisée?
Peut-être en l'écrivant avec Visual Studio?

Cliquez pour agrandir...

Allez je vais y arriver … Enfin si c'est possible.
Encore merci de m'aider.

NB: Peut-être que je fais une confusion technique entre Add-In et Fonctions Personnalisées?

 

Vote positif 0 Vote négatif

p'tit vieux

XLDnaute Occasionnel

• 21 Mai 2021

• #9

Ce lien devrait sur mon autre question devrait vous fournir une réponse.
Ecore merci à tous.

 

Vote positif 0 Vote négatif

Solution