Résultats de la recherche

Finalement, j'ai créé un boîte de dialogue pour recueillir les valeurs en entrée et le code que j'avais du mal à faire fonctionner dans la worksheet se comporte comme attendu dans la dialogbox ! Problèmes résolus donc ! Merci beaucoup à tous !

Ça s'arrange en effet en travaillant dans Worksheet_Change ! 😉 En revanche, j'ai un souci curieux : je cherche à connaitre la première cellule vide de la colonne B et j'ai écrit Worksheets("Data").Range("B1").End(xlDown).Activate FirstEmptyCellRow = Worksheets("Data").Range("B1").End(xlDown).Row...

Cela voudrait dire que : 1. je dois créer une Sub et non une Function ? 2. je ne peux pas modifier le contenu d'une cellule dans une fonction appelée par une autre cellule ? Comment invoquer une Sub à partir d'une cellule, aussi simplement que =CreateCode(C2) ? Merci d'avance pour vos conseils !

1 : oui, puisque je parviens à lire la valeur d'une cellule sans problème 2 : la variable vaut 2, soit la première ligne puisque la colonne est vide à part le label "Code" en B1 3 : non, il n'y a aucun format... Comme il n'y a rien de secret, j'attache le fichier directement ! Merci pour ton...

Bonjour à tou(te)s, Je dois passer à côté d'un truc grossier, mais dans une fonction, je tente de stocker une valeur calculée dans une cellule et obtiens une erreur : FirstEmptyCodeRow = Worksheets("Data").Cells(2, 2).End(xlUp).Row + 1 Worksheets("Data").Cells(FirstEmptyCodeRow, 2).Value =...

Tout à fait ! Merci beaucoup ! Moralité : ne pas bricoler de fonction en fin de journée... 😊

Bonjour, Je viens d'écrire une fonction relativement simple : à partir d'un nom de société, je cherche à créer un identifiant unique sur 6 caractères. Je normalise la chaine en entrée en remplaçant tous les caractères accentués, puis je crée l'identifiant : Si la chaine est plus courte que le...