Salut tout le monde!
Voilà j'ai un petit problème dans mon code VBA.
Je souhaite créer une fonction qui en entrée prend un Range de cellule ainsi que d'autres paramètres et en sortie, la fonction écrit juste à droite de la première colonne les résultats. En entrée j'ai par exemple:
25
26
27
28
30
et la fonction devra faire
25 Achete
26 Vends
27 Achete
28 Achete
30 Vends
Donc pour cela, je me place sur la première cellule et j'appelle ma fonction. Dans mon code, je fais un:
For Each Cell In selection
...CODE...
NEXT
Pour afficher les ordres "Achete", "Vends", je fais un :
cell.offset(0,1).FORMULAR1C1="Achete"
ou
cell.offset(0,1).FORMULAR1C1="Vends"
Le problème c'est que ça ne marche pas...
J'ai mis des points d'arrêts et j'ai debbugé et je me suis apperçu que dès que le programme arrive à cette ligne:
cell.offset(0,1).FORMULAR1C1="Achete"
ça bug!! Quelqu'un sait pourquoi?
Si je ne peux pas écrire le résultat dans ma cellule comment traiter ce problème??
Merci pour votre aide,