Autres automatiser un fichier

sylvanu

XLDnaute Barbatruc

Supporter XLD

• Mardi à 15:43

• #16

J'espère qu'il n'y a pas d'autres pièges du genre.
En Pj j'ai fait :

VB:

En G3 :  =A3
En G4 :  =INDEX(A3:A400;NB.SI(B3:B400;1))

Il suffit de compter les 1 dans la colonne B pour avoir la date de fin en colonne A.

 

Pièces jointes

• toto (V5).xls

  184 KB · Affichages: 6

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• Vendredi à 11:20

• #17

Re,
Sans réponse, je suppose que çà marche.
Dans le cas contraire, persévérons, on trouvera bien une solution.

 

Vote positif 0 Vote négatif

U

un internaute

XLDnaute Impliqué

• Vendredi à 11:44

• #18

sylvanu à dit:

Re,
Sans réponse, je suppose que çà marche.
Dans le cas contraire, persévérons, on trouvera bien une solution.

Cliquez pour agrandir...

Bonjour sylvanu
Je n'osais tout simplement pas t’embêter avec ça
Plus compliqué que ça
Quand je double click sur cellule A3 et que je clique sur durée du traitement exemple 6 mois ça affiche bien 179 cellule D3 MAIS Ça MET toujours durée du traitement 1an
Avant de faire le double click sur cellule A3 il faut aller dans module Posologie et mettre le NB de jours
Après on peut faire ce que tu as fait pour masquer les lignes
Très très compliqué
Merci pour ton implication

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• Vendredi à 14:19

• #19

Re,
Vraiment désolé.
C'est vrai que c'est devenu vraiment complexe. D'autant que je n'avais pas vu la partie droite du tableau ( colonnes I:M)

un internaute à dit:

Très très compliqué

Cliquez pour agrandir...

Oui j'ai bien peur qu'il n'y ait pas de solution, sauf à out reprendre pour avoir un ensemble homogène, ce qui n'est guère raisonnable.
Sorry.

 

Vote positif 0 Vote négatif

U

un internaute

XLDnaute Impliqué

• Hier à 12:58

• #20

Bonjour à tous
Dans la PJ je voudrais remplacer 2 par 3 dans toutes les formules pour ajouter une ou plusieurs années de jours fériés
FMerci pour vos éventuels retoursaire un double click pour afficher les jours féries sur cellule A2
Pour l'instant 2026 est fait.
Je recopie à partir de janvier jusqu'à décembre et met à jour toutes les formules une par une
En occurrence je remplace

VB:

=DATE(An+1;1;1)

par

Code:

=DATE(An+2;1;1)

An+1 par An+2
C'est fastidieux lorsqu'on à 72 fichiers
On ne peut pas le faire avec Edition Remplacer?
Merci pour vos éventuels retours

 

Pièces jointes

• toto_doliprane.xls

  183 KB · Affichages: 2

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• Hier à 14:26

• #21

Bonjour,
Au vu du fichier, il suffit de remplacer K1 de 2025 avec 2026, les formules sont toutes à jour automatiquement puisqu'elles partent sur 2026 dans les formules. ( appelé An )

 

Vote positif 0 Vote négatif

U

un internaute

XLDnaute Impliqué

• Hier à 14:47

• #22

Nous sommes bien d'accord mais moi je veux garder mon 2025 jusqu'à 2030 par exemple
Changer la date en K je connais mais je n'aurais plus 2025 2026 2027 2028 2029 2030 en mémoire
J'ai des traitements de 3 ans voire plus ça peut comme tu dis mais moi j'oublie de modifier alors
Donc je suis obligé de changer les formules une par une ou remplacer => options
Mais je ne sais pas aller plus loin

 

Vote positif 0 Vote négatif

U

un internaute

XLDnaute Impliqué

• Hier à 15:01

• #23

Fait jusqu'à 2028. C'est pas insurmontable mais chiant

 

Pièces jointes

• toto_doliprane.xls

  184 KB · Affichages: 1

Vote positif 0 Vote négatif

U

un internaute

XLDnaute Impliqué

• Hier à 15:03

• #24

Paques3 est mieux placé!!!

 

Pièces jointes

• toto_doliprane.xls

  184 KB · Affichages: 1

Vote positif 0 Vote négatif

U

un internaute

XLDnaute Impliqué

• Hier à 15:07

• #25

Paques3 mal placé et certains pas mis à jour
Quand je dis que c'est fastidieux

 

Pièces jointes

• toto_doliprane.xls

  184 KB · Affichages: 1

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• Hier à 15:30

• #26

Re,
Vous ne pouvez par faire Remplacer 1 par 2, car il remplace tout. Il ne remplace pas qu'un seul.
Par ex pour le 11 novembre :

VB:

=DATE(An+1;11;11)
devient
=DATE(An+2;22;22)

Vous pourriez utiliser un calendrier sur 5 ans comme en PJ.

 

Pièces jointes

• Fériés.xlsx

  10.6 KB · Affichages: 2

Vote positif 0 Vote négatif