Contenu récent par decolit

J'ai oublié de joindre un fichier à titre d'exemple

Bonjour à tous, Je cherche à élaborer un outil de préparation de commandes qui fonctionnerait comme suit : A - une liste des commandes est matérialisée par la feuille 2 d'un classeur Excel. En colonne A (par exemple) de cette feuille 2, se trouvent les références clients, en colonne B, le nom...

@soan Je te félicité, pardon pour la faute.... Sujet clos pour moi.

@soan, Oui il s'agit bien du dernier code que tu as posté en #16. C'est parfait. Je te félicité et te remercie, ainsi que Dranreb pour l'efficacité de votre contribution !

@soan, Nos messages se sont croisés. Le nouveau code fonctionne très bien et résout le problème posé. Bravo et merci.

@soan, longueur chaine : dans l'énoncé de mon besoin je décris "calculer un checksum xor d'une chaine alphanumérique de longueur X (=X caractères)", je n'ai pas limité la longueur de la chaine. - si je lance la macro "essai()" par le menu macro de l'onglet développeur : pas de problème le...

@soan Merci beaucoup pour ton message. Chkxor : je voulais dire que l'utilisateur pas d'action à faire sur cette fonction, juste à lancer la macro. En effet, le sub fait appel à chkxor qui est présente dans un module de la feuille. J'ai bien compris que ton code intègre le calcul du checksum...

En déclarant la fonction Chkxor de dranreb, ce code très efficace de Phuocam (que je remercie) correspond à ce que je veux sans avoir à appeler Chkxor : Sub CHAINXOR() Dim Arr As Variant, i As Long, lastRow As Long lastRow = Range("A" & Rows.Count).End(xlUp).Row Arr = Range("A2:A" &...

Bonjour Soan, Merci pour ton retour efficace. La routine est très rapide en effet. Mais le résultat "écrase" les chaines sources, et j'ai besoin de les conserver dans leur colonne d'origine, ici la colonne A. A partir du code que tu as écrit, je ne sais pas comment spécifier que chaque chaine...

Merci à Dranreb, Je considère que la question est résolue.

Merci Dranreb, pour les explications sur la syntaxe et la fonction Mid$ (désolé, je suis incapable d'utiliser VBA et je ne suis pas familier de VABA). Pas de problème, ma dernière question porte simplement sur la situation courante : une série de 20000 ou 100000 chaines à xoriser comme votre...

Merci Dranreb, Le calcul du chk est parfait, merci encore. J'essaie de comprendre ce que représente Mid$, je me doute que P est la position du caractère dans la chaine à xoriser, mais Mid$ ? st-il possible d'étendre la fonction à toute la colonne et de concaténer chaine et chk, pour éviter de...

Bonsoir Dranreb, Je vous remercie pour votre rapidité. Je recopie le code dans un module du classeur test et vous fais un retour dans la foulée. Encore merci.

Bonjour à tous, Tout d'abord, je souhaite santé et réussite à tous pour 2021 ! J'ai essayé d'utiliser des fonctions d'excel type BITOUEXCLUSIF() pour calculer un checksum xor d'une chaine alphanumérique de longueur X (=X caractères), après avoir calculé la valeur ascii de chaque caractère au...

Bonjour Sylvanu, Merci pour votre aide. Je vais essayer de tester Asc pour alléger la présentation (ne pas recourir au valeurs caractère et code Ascii correspondant), et comprendre la structure du code qui est très opaque pour moi, notamment en ce qui concerne les loops et les types de...