XL 2016 modifications code vba succursales

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 18 Octobre 2023

• #2

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

 

Pièces jointes

• Test (1).xlsm

  18.1 KB · Affichages: 2

Vote positif 0 Vote négatif

Z

ZZ59264

XLDnaute Occasionnel

• 19 Octobre 2023

• #3

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

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 19 Octobre 2023

• #4

Bonjour ZZ,

ZZ59264 à dit:

c'est que je peux avoir 50 succursales

Cliquez pour agrandir...

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

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 19 Octobre 2023

• #5

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

 

Pièces jointes

• Test (V2).xlsm

  19.5 KB · Affichages: 2

Vote positif 0 Vote négatif

Z

ZZ59264

XLDnaute Occasionnel

• 19 Octobre 2023

• #6

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 :

VB:

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,

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 19 Octobre 2023

• #7

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.

 

Pièces jointes

• Test (V3).xlsm

  20.8 KB · Affichages: 2

Vote positif 0 Vote négatif

Solution

Z

ZZ59264

XLDnaute Occasionnel

• 19 Octobre 2023

• #8

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,

 

Vote positif 0 Vote négatif