XL 2016 modifications code vba succursales

[ZZ59264]

Bonsoir à tous,

J'ai un code de ce site qui fonctionne, mais je souhaiterai que celui décompose la création des CSV par succursales ?, serait il possible également de rendre variable le chemin défini en M1?,

Je joins un fichier pour mieux appréhender ma demande,

Merci d'avance,

Cordialement,

 

[sylvanu]

Bonsoir ZZ,
Un essai simple en PJ en dupliquant une partie de la macro pour chaque succursale.

 

[ZZ59264]

Bonjour Sylvanu,

Tout d'abord merci pour votre retour et cela fonctionne parfaitement, le hic c'est que je peux avoir 50 succursales, et cela supposerai que je duplique chaque cas, pourriez vous me proposer une version plus courte à partir du code de départ ?,

Merci d'avance,

Cordialement

 

[sylvanu]

Bonjour ZZ,

c'est que je peux avoir 50 succursales

Cette hypothèse m'avait effleurée l'esprit. Je regarde ça.

 

[sylvanu]

Re,
Un essai en PJ.
J'ai utilisé la colonne P pour les succursales, modifiable dans le code.

 

[ZZ59264]

Bonjour sylvanu,

C'est parfait le résultat est vraiment top, j'ai un petit hic c'est au cas ou je n'ai qu'une succursale, j'ai généré avec plusieurs succursales, puis j'ai voulu refaire le code avec une seule succursale et j'ai eu un message d'erreur sur cette ligne :

Range("P1:P" & UBound(Succursales)).Borders.Weight = xlThin                 ' Encadrement liste succursales

"erreur d’exécution 13"

Est ce du au fait qu'il y en ai qu'une ?,peut on envisager ce cas?,

Merci d'avance,

Cordialement,

 

[sylvanu]

Quand on fait une évol pour gérer toutes les succursales, on en oublie qu'il pourrait n'y en avoir qu'une seule.
Rectifié en PJ.

 

[ZZ59264]

Bonjour Sylvanu,

Merci beaucoup pour ta solution qui est top top

Tout est parfait, je passe le post en résolu.

Passez une bonne après midi,

Cordialement,