passage excel 2007->2010

[PiK4]

Bonjour

j'utilise un fichier excel 2007 qui fonctionnait trés bien jusqu'a ce que je passe à excel 2010
Dans ce fichier j'ai une vba qui insert une nouvelle ligne en fin de tableau en reprenant la mise en forme et formule de la pécédente

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 And Target.Row > 2 Then
If IsEmpty(Target.Offset(0, 1)) And Not IsEmpty(Target.Offset(-1, 0)) And témoin = False Then
témoin = True
sauv = Target
n = Target.Offset(-1, 0).CurrentRegion.Columns.Count
Target.Offset(-1, 0).Resize(1, n).Copy Target
On Error Resume Next
Target.Resize(1, n).SpecialCells(xlCellTypeConstants, 23).ClearContents
Target = sauv
témoin = False
End If
End If

Maintenant quand je veux ajouter une ligne, vba s'ouvre et me dit que le projet ou la bibliothèque n'existe pas en surlignant Sauv=

si quelqu'un peu se pencher sur le problème ou me dire d'ou cela provient
Merci d'avance

 

[Compte Supprimé 979]

Re : passage excel 2007->2010

Bonsoir Pik4,

Je pense que ton problème vient d'une référence manquante dans ton projet VBA
Dans ton éditeur VBA, va dans le menu -> Outils -> Référence
et vérifie que tu n'en as pas une marquée de la sorte [MANQUANTE] xxxx
Si c'est le cas, décoche la

A+

 

[PiK4]

Re :[Resolu] passage excel 2007->2010

RE

Merci beaucoup BrunoM45, c'était effectivement ça