Excel se ferme suite à une formule de calcul !

ultra_v · 18 Décembre 2013

bonjour ,

je n'arrive pas travailler avec une application excel , dés que je remplis le champs "année" sur excel "B1" excel se ferme et m'affiche un message d'erreur

je ne comprends pas pourquoi , pourriez vous m'aider s'il vous plait ?

j'ai essayé sur plusieurs ordinateurs ça donne la méme chose

fichier en pièce joint

Guest · 18 Décembre 2013

Re : Excel se ferme suite à une formule de calcul !

Bonjour,

Dans les évènements change il faut faire attention à ne pas provoquer de changement en chaine....

De plus tes lignes de codes sont lancées sur chaque changement de n'importe quelle cellule de la feuille.
S'il n'y a que le changement de B1 qui t'interresse, il faut tester si Target est B1

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address <> "$B$1" Then Exit Sub
    Application.EnableEvents = False 'empêcher la gestion des évènements
    Dim C As Range
    Set C = Feuil1.Cells.Find(What:=[b1])
    If C Is Nothing Then [C3] = Feuil1.[B2] Else [C3] = C.Offset(, 1) * 1
    Application.EnableEvents = True 'rétablir la gestion des évènements
End Sub

A+

ultra_v · 18 Décembre 2013

Re : Excel se ferme suite à une formule de calcul !

merci beaucoup Jean-Marcel , Hasco
vous m'avez sauver

Excel se ferme suite à une formule de calcul !

ultra_v

XLDnaute Occasionnel

Guest

Guest

ultra_v

XLDnaute Occasionnel

Discussions similaires

Excel se ferme suite à une formule de calcul !

ultra_v

XLDnaute Occasionnel

Guest

Guest

ultra_v

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency