Bonjour tout le monde,
Je veux attribuer une valeur à une cellule mais les lignes suivantes ne fonctionnent pas.
Range("A(LongeurDeListe + 1)") = NouvelItem
[$A$(LongeurDeListe+1)] = NouvelItem
Workbooks("Menu").Sheets("FormuleBuffer").Range("A(LongeurDeListe + 1)").Value = NouvelItem
Range("A20)") = NouvelItem
Aussi j’ai essayé de passer par une variable (Colonne Integer), mais sans plus de résultat.
Les lignes essayées semblent rien faire et ne causent pas d'erreur.Ells sont basées sur lignes trouvées sur des forums.
J’ai aussi vérifier par la ligne suivante et elle fonctionne, mais puisque la donnée doit-être écrite à des lignes différentes, il me faut une variable, je n’est pas le choix..
Range("A20)") = NouvelItem
Voir le fichier en attachement, feuille FormuleBuffer…..
Tester en changeant la valeur de la cellule B2.
Il faut mettre un point d’arrêt à la première ligne de code : On Error GoTo Erreurs
MERCI en attendant !!!