Autres Problème #N/A sur formule

fenec

XLDnaute Impliqué
Bonsoir le forum,
Je viens à nouveau vers vous pour un problème #N/A

J’ai essayé avec :
Si(et(formule…
Si(ou(formule…
Si(non(formule…

Mais rien ne fonctionne je rencontre toujours #N/A les week-end
cordialement,
Philippe.
 

Pièces jointes

  • Problème wekk-end.xls
    57.5 KB · Affichages: 32

soan

XLDnaute Barbatruc
Inactif
Bonjour Philippe, le fil,

je propose le fichier ci-joint ; c'est une solution sans utiliser SIERREUR() ;
regarde ta nouvelle formule en E4 ; même « remède » pour les deux
formules en B4 et H4.


soan
 

Pièces jointes

  • Problème week-end.xls
    64 KB · Affichages: 13
Dernière édition:

job75

XLDnaute Barbatruc
Bonjour fenec, M12, soan, le forum,

Voyez le fichier joint et cette formule en B2 à recopier sur E2 et H2 :
Code:
=SOMMEPROD((Tournantes!$B5:$B35=$A3)*(Tournantes!$D5:$G35=GAUCHE(B3))*COLONNE(Tournantes!$A5:$D35))
Format 0;; pour masquer les valeurs zéro.

En B4 et B5 les formules sont évidentes.

Bon dimanche.
 

Pièces jointes

  • Problème wekk-end(1).xls
    55.5 KB · Affichages: 12

fenec

XLDnaute Impliqué
Bonjour le forum,
Déjà merci pour vos réponses

M12
Mon fichier étant utiliser aussi sous excel 2003 je ne peux utiliser SIERREUR()

Soan
Je teste sous 2003 et te tiens au courant

Job75
Ta formule en B2 est génial
En B4 évidente comme tu dis mais en B5 tu supprimes la liste déroulante alors que si je renseigne le remplaçant du chef équipe c'est que le chef est absent
Et comme pour Soan je teste sous 2003 et reviens vers toi

Une petite autre question:
Comment écrire le remplaçant en majuscule j'ai regardé dans format de cellule mais rien ou peut-on mettre la fonction majuscule dans la source de la liste déroulante

Cordialement,
Philippe.
 

job75

XLDnaute Barbatruc
Quand on modifie la date en A3 les noms en B4 E4 H4 ne sont plus valables, il faut les effacer.

Pour cela il faut une macro, placez celle-ci dans le code de la feuille "Planning" :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [A3]) Is Nothing Then [B4,E4,H4] = ""
End Sub
 

fenec

XLDnaute Impliqué
Re,
Dans mon fichier de départ le chef d’équipe était défini par défaut en fonction de la date ; avec votre solution il faut le choisir dans la liste déroulante

Et si plusieurs remplaçant comment modifier la liste, en rajoutant une colonne remplaçant je ne vous suis pas trop là
 

soan

XLDnaute Barbatruc
Inactif
Re,

Image.jpg


et le test de mon fichier avec Excel 2003, il se passe bien ? :p ;)

soan
 

job75

XLDnaute Barbatruc
Dans mon fichier de départ le chef d’équipe était défini par défaut en fonction de la date
Alors au lieu de la macro du post #8 mettez dans le code de la feuille "Planning" :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A3]) Is Nothing Then Exit Sub
[B4] = [D4]
[E4] = [G4]
[H4] = [J4]
End Sub
Vous n'avez peut-être pas compris que la liste de validation en B4 est définie par la plage D4:D5.

Si l'on veut une liste de 3 éléments utilisez la plage D4:D6 (formule à créer en D6).
 

Statistiques des forums

Discussions
312 104
Messages
2 085 330
Membres
102 862
dernier inscrit
Emma35400