En complément de la mise en forme conditionnelle, limitée à 3 critères j'utilise ce code, malheureusement pas tout à fait au point...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim c As Range
For Each c In Range('V_Scol.')
If c = 1 Then
c.Interior.ColorIndex = 5
Else
c.Interior.ColorIndex = 2
End If
Next
End Sub
Une 'Erreur d'exécution 13' apparait ?
Et aucune modification ne se fait lorsque je change d'année...?
Pouvez-vous m'aider ?
Merci...
Ci-joint le fichier [file name=Copie_Calendrier_20051018224505.zip size=36809]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Copie_Calendrier_20051018224505.zip[/file]
L'erreur provient de cellule qui comtient une formule qui n'as pas de réponse, comme la cellule S36 qui donne une erreur. Ce qui explique le problême de l'erreur d'exécution 13.
PrivateSub Worksheet_SelectionChange(ByVal Target As Range)
Dim c As Range
For Each c In Range('V_Scol.')
With c.Interior
If c = 1 Then
.ColorIndex = 5
Else
.ColorIndex = 2
End If
End With
Next c End Sub
Excuse moi, je ne t'ai pas fournis tout les éléments de réponse nécessaire.
Pour ce que j'ai évoqué de la formule qui ne peut être résolue comme l'exemple de la cellule S36, il y a deux chose que tu peux faire:
1 - Soit que tu efface l'information dans ces cellules.
2 - Soit que tu rajoute une condition a tes formules qui vérifies si la cellules visé pour le retour d'information, n'est pas vide. Ex:
Colonne S
Ligne 36 =SI(N36<>'',INDEX(Num,EQUIV(N36,Date_Année,0)),'')
Merci beaucoup de aide précieuse [file name=Copie_Calendrier_20051020002314.zip size=37270]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Copie_Calendrier_20051020002314.zip[/file]
1- Les formules ne sont pas pareilles
2- Dans l'exemple, la formule en G35 devrait être =SI(B35<>'',INDEX(Num,EQUIV(B35,Date_Année,0)),'')
3- Tu as pensée au années bisextile ?
Merci beaucoup tu m'as éclairé et du coup j'y vois bien plus clair...
Comme tu le dis, pas facile de jongler avec les dates, mais nous sommes et seront toujours plus fort que les machines...
Après remaniement de mes formules, la macro marche bien...
Mais comme je suis un temps soit peu perfectionniste, un détail s'ajoute. Je cite :
La macro se joue uniquement l'orsque je clique dans n'importe quelle cellule, mais si je change la période semestrielle ou bien l'année, rien ne se passe ???
Merci encore de m'aider si le coeur t'en dis...
Et le fichier modifié... [file name=Copie_Calendrier_20051021002815.zip size=35049]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Copie_Calendrier_20051021002815.zip[/file]
Je te joint ton fichier, avec une macro supplémentaire, qui va être appeler par le changement de sélection, trimestre et année.
[file name=copie_calendrier.zip size=35797]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/copie_calendrier.zip[/file]
Enfin, mon Planning est terminé, et ceci grace à toi...ouf
MERCI
Il faut sérieusement que j'apprenne la programmation VBA, pour l'instant je me débrouille un peu sur les formules mais question VBA c'est un autre monde...