attribut barré (suite!)

[b177h]

merci pour la promptitude des réponses
n'ayant sans doute pas été très clair dans mon premier message, et n'étant franchement pas (encore!) un VBaiste, je joins un exemplaire du
document sur lequel je "coince"
encore merci

 

[wilfried_42]

Re : attribut barré (suite!)

bonjour b177h

Voici une formule

=SOMMEPROD((B7:AF7=AH5)*(((B6:AF6="S")+(B6:AF6="D"))=0)*1)

il est neanmoins mieux de gerer des dates dans les differents format jjjj, mmmm, mmm, jjj, apres tu voudras les jours feries et ca compliquera tout

Janvier : 01/01/2007 Format mmm
1 à 31 01/01/2001 : C2 = B2 + 1...........sur 30 jours : Format jj

Jour = gauche(TEXTE(C2;"JJJJ");1)

Ce sont des exemples menfin c'est plus simple à gerer les periodes par la suite

 

[BOISGONTIER]

Re : attribut barré (suite!)

J'ai barré avec Format/Police/Attributs Barré

Function NBSI(champ As Range, mot)
  Application.Volatile
  For Each c In champ
    If Not c.Font.Strikethrough And c = mot Then temp = temp + 1
  Next c
  NBSI = temp
End Function

JB

 

[b177h]

Re : attribut barré (suite!)

merci pour vos réponses
mais ça ne fonctionne pas à 100%😕😕

 

[wilfried_42]

Re : attribut barré (suite!)

re:

Chez moi la formule fonctionne mais je n'ai pas 'peut etre' touytes les données ....

J'ai fait un copier coller de le formule apres les tests

 

[Banzai64]

Re : attribut barré (suite!)

Bonsoir

mais ça ne fonctionne pas à 100%

Je pense que c'est dans le cas ou tu modifies une case
La fonction n'est pas (RE) calculée


Une solution (la moins pire)

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Calculate

End Sub

Des que tu quittes la cellule la fonction est relancée

PS: Si c'est une MFC qui 'strike' la case est considérée comme non barrée

 

[news]

Re : attribut barré (suite!)

Bonsoir à tous du forum,

je vois, le sujet posté de nouveau,

autrement dit aulieu de choisir texte barré dans l'exemple mis,
il s'agit de ne pas compter/de ne pas inclure le samedi et le dimanche dans Range("AH:AL")
ou c'est au moins ce que j'ai pu comprendre,

comme Wilfried42 a déjà mis et la formule sommeprod le résoud
=SOMMEPROD((B7:AF7=AH5)*(((B6:AF6="S")+(B6:AF6="D" ))=0)*1)

 

[b177h]

Re : attribut barré (suite!)

mille mercis
ça marche à 100% cette fois (même s'il va me falloir un peu de tps pour maîtriser la touche F4 pour gérer la poignée de recopie)
je découvre le site et ne regrette pas!
b177h