J'ai mis des chiffres pour exemple au PIF !! suffit de remettre tes chiffres et il ne peut pas y avoir d'erreur puisque c'est juste une copie de données des colonnes
Bonsoir
Un truc basique en VBA simple , pour le moment juste adapté à l'exemple joint donc limité pour la variable de 1 à 4 et donc aux colonnes de D à G
Bonsoir ; Slt hasco
Oui aussi , mais le Pb et encore par expérience récente sur un gros fichier la personne a fait une selection comme par exemple ici : D3:G13 > sup pour remettre ses données et ZUT ça marche plus
Je suis d'accord avec les formules lorsque la cellule est vouée à un résultat ; Là c'est pour une donnée
Après c'est selon utilisation , mais avec un VBA ultra simple pas d'erreur de manip possible dans la feuille
Bonsoir
Un truc basique en VBA simple , pour le moment juste adapté à l'exemple joint donc limité pour la variable de 1 à 4 et donc aux colonnes de D à G
Bonjour , Slt xls62
Rien est bloquant , suffit d'étendre la plage
Je viens de l'améliorer un peu , effacement col B avant de relancer
Juste possible d'entrer un chiffre en C1 sinon message
Les lignes s'ajustent selon la colonne
On peut encore faire
Bonjour , Slt xls62
Rien est bloquant , suffit d'étendre la plage
Je viens de l'améliorer un peu , effacement col B avant de relancer
Juste possible d'entrer un chiffre en C1 sinon message
Les lignes s'ajustent selon la colonne
On peut encore faire
J'ai mis des chiffres pour exemple au PIF !! suffit de remettre tes chiffres et il ne peut pas y avoir d'erreur puisque c'est juste une copie de données des colonnes
J'ai mis des chiffres pour exemple au PIF !! suffit de remettre tes chiffres et il ne peut pas y avoir d'erreur puisque c'est juste une copie de données des colonnes
Bonjour Herve62,
je comprends mieux le code maintenant c'est une solution aussi
puis je spécifier une feuille dans le code ? pour :
dl1 = Range("D10000").End(xlUp).Row
dl2 = Range("E10000").End(xlUp).Row
dl3 = Range("F10000").End(xlUp).Row
dl4 = Range("G10000").End(xlUp).Row
Bonjour
Oui on fait ce qu'on veut , feuille , même autre classeur (si ouvert)
dl1 = sheets("Mapage"). Range("D10000").End(xlUp).Row
dl1=workbooks("C:\data\rep1\monfic.xlsx").sheets("sdfdsf"). Range("D10000").End(xlUp).Row
Bonjour
Oui on fait ce qu'on veut , feuille , même autre classeur (si ouvert)
dl1 = sheets("Mapage"). Range("D10000").End(xlUp).Row
dl1=workbooks("C:\data\rep1\monfic.xlsx").sheets("sdfdsf"). Range("D10000").End(xlUp).Row