Bonjour à tous,
J'utilise un fichier qui s'enregistre automatiquement si des cellules sont renseignées.
Ces cellules vont de A1 à A10.
Je cherche en vain a faire la même chose, mais seulement en renseignent une ou deux cellules.
Par exemple A1 ou A10.
Mon code est le suivant:
[CODEPrivate Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, [A1 : A10]) Is Nothing Then
Application.OnTime Now + TimeValue("00:00:03"), "EnregistrerFichier"
End If
End Sub][/CODE]
Est-ce seulement un problème de ponctuation, ou dois-je changer la ligne de code.
Merci à ceux qui pourront m'aider.
J'utilise un fichier qui s'enregistre automatiquement si des cellules sont renseignées.
Ces cellules vont de A1 à A10.
Je cherche en vain a faire la même chose, mais seulement en renseignent une ou deux cellules.
Par exemple A1 ou A10.
Mon code est le suivant:
[CODEPrivate Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, [A1 : A10]) Is Nothing Then
Application.OnTime Now + TimeValue("00:00:03"), "EnregistrerFichier"
End If
End Sub][/CODE]
Est-ce seulement un problème de ponctuation, ou dois-je changer la ligne de code.
Merci à ceux qui pourront m'aider.
Dernière édition: