Discussion :

[newsinfos]

Bonjour à tous de ce forum,

J'ai ajouté sous VBA dans la feuil5 une procédure qui fait directement le total
de couleurs de fond mis dans une plage de données,
le total fonctionne bien.

Mais dès qu je veux changer les bordures, ou aligner à droite ou au milieu
ou ajouter un commentaire dans cette plage de données, ou copier et coller dans cette plage de données.
Excell se referme, crash,
je ne sais pas comment résoudre ce bug,

peut-être vous avec des astuces afin de résoudre ceci,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
'Pour que la mise à jour des fonctions soit automatique lorsque l'on modifie la couleur
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
If Not Intersect(Target, [B5:K26]) Is Nothing Then
If Not IsEmpty(celluleAvant) Then
If Not Intersect(Range(celluleAvant), [A1:K26]) Is Nothing Then Calculate
End If
celluleAvant = Target.Address
If Not Intersect(Target, [B5:K26]) Is Nothing Then
If Application.WorksheetFunction.Max([B29:K29]) <> 0 Then
Message1 = _
MsgBox("trop de personnes en congé, sont absentes pour certains jours !" + (CH13) + (CH13), vbExclamation, _
" Limite dépassée de demande de congé par jour")
End If
End If
End If
 
End Sub

[jfontaine]

2 questions

- as tu installés toutes les mises a jour office ? (on ne sait jamais des fois que ca corrigerait ton problème)
- Que dit Observateur D'évenements?

[newsinfos]

Bonjour à tous du forum,

j'utilise Office 2003 et toutes les mises à jour sont installées,

de même on ne peut pas copier et coller dans cette plage de données,
ci-joint fichier explicite,

[jfontaine]

Au premier lancement ca a planté avec un fichier ouvert en arriere plan
Par contre, maintenant ca fonctionne bien, plus de plantage meme si j ouvre d autres fichiers.

[newsinfos]

Bonjour à tous du forum,

merci jfontaine pour réponse,

f'ai fait différent tests, avec un classeur ouvert ou plusieurs classeurs ouverts, cela fonctionne,
mais lorsque j'ai mis des bordures gras, ca plante de nouveau,

je pense que dans le code mis dans l'évènement,
il y a qch. qui fait planter Excell,

essayer de mettre des bordures gras dans plusieurs Ranges,
le fichier Excel plante,