WEEK END variable

[Ilino]

Bonsoir Forum
J’ai trouvé cette formule

=NB.JOURS.OUVRES.INTL(Date départ ; Date fin ; 1 ; Fériés)

Excel 2010 : Nombre de jours ouvrés compris entre deux dates en identifiant les jours du week-end
les jours de week-end que l'on veut:
1=samedi et dimanche, 2=dimanche et lundi, ...., 17=samedi uniquement
Est-ce que il y a une fonction équivalente sur 2007 a cette formule en tenant compte de changement des WEEK END
GRAZIE

 

[job75]

Re : WEEK END variable

Bonjour le fil, le forum,

Pour rester dans la course, je paramètre les week-ends comme l'a fait CHALET53 (que je salue).

Voir ce fichier (5).

Je suis étonné que ça n'intéresse plus Ilino car tout ce qui se trouve dans ce fichier correspond à des demandes de sa part sur différents fils.

Je lui avais même mis un Like à l'origine pour l'originalité du problème...

A+

 

[job75]

Re : WEEK END variable

Re,

Dans ce fichier (6) on choisit les jours chômés par des cases à cocher en ligne 1.

Leurs cellules liées sont en L1:R1 et cette macro leur est affectée :

Sub Cases()
'il faut au moins un jour non chômé
If Application.CountIf([L1:R1], True) = 7 Then [L1] = False
[S:S].Copy [S1] 'lance Worksheet_Change
End Sub

A+

 

[CHALET53]

Re : WEEK END variable

Bonjour tout le monde et Job75

Magnifique
J'admire ta persévérance

a+

 

[Ilino]

Re : WEEK END variable

Bonjour le fil, le forum,

Pour rester dans la course, je paramètre les week-ends comme l'a fait CHALET53 (que je salue).

Voir ce fichier (5).

Je suis étonné que ça n'intéresse plus Ilino car tout ce qui se trouve dans ce fichier correspond à des demandes de sa part sur différents fils.

Je lui avais même mis un Like à l'origine pour l'originalité du problème...

A+

Bonjour Forum , bonjour Maitre
je te remercie et je t'avais dis que ce n'est pas le mémé soucis😱 mais je te remercie encore pour la énième fois😱, et je te rappelle que toutes tes propositions sont exploitables et je l'ai déjà utilisées dans d'autre Programme🙄, un grand merci Maitre pour toi 🙂et les bénévoles de ce fameux forum;
A+

 

[R@chid]

Re : WEEK END variable

Bonjour @ tous,
Salut Job75,
@ Job75,
Du fait que je ne connais rien en VBA, si c'est ça ce que tu as fait en VBA...
@ + +

 

[job75]

Re : WEEK END variable

Bonjour Ilino, le forum,

Sur un autre fil j'ai compris que c'est mon fichier (5) qui vous intéresse.

Je pense qu'il faut le compléter.

En effet si l'on modifie le week-end en M1, toute la colonne S et éventuellement la colonne R sont modifiées.

Il faut donc repérer les cellules qui ne doivent pas être modifiées.

Cela peut se faire par un double-clic en colonne S qui mémorise le week-end :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'ajoute ou efface le commentaire mémorisant le week-end
If Not Intersect(Target, Range("S3:S" & Rows.Count)) Is Nothing Then
  Cancel = True
  If Target.Comment Is Nothing Then
    Target.AddComment "Week-end " & [M1]
    Target.Comment.Shape.TextFrame.AutoSize = True
  Else
    Target.ClearComments
  End If
End If
End Sub

Et bien sûr il y a quelques modifications dans la macro Worksheet_Change.

Fichier (5 bis).

A+

 

[Ilino]

Re : WEEK END variable

Bonjour Forum, Salut Maitre JOB
Merci pour la réponse , mais j'ai trouvé des difficultés a l'adapter a mon fichier
ci joint mon fichier adapter a ton code.

EDIT: je retire le fil https://www.excel-downloads.com/threads/erruer-dexecution-13-help.200605/

 

[Ilino]

Re : WEEK END variable

Re
est ce que c'est le format date des colonnes O&K qui pose ce bug?? (malgré que j'ai verifié )
what should I do???
A+

 

[Ilino]

Re : WEEK END variable

Re
Problème résolut
problem is resolved by MAITRE JOB
A+

 

[job75]

Re : WEEK END variable

Re Ilino,

Je poste quand même ton fichier avec le nom Fériés défini correctement, ça pourra servir...

A+