OVH Cloud OVH Cloud

pb de macro

2 réponses
Avatar
dd
bonjour,

j'ai la macro suivante :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(0, 0) =3D "E1" Then
Application.EnableEvents =3D False
Range("laplage").ClearContents
Target.Offset(7, -2).Select
Application.EnableEvents =3D True
End If
End Sub

qui, lorsque je tape une valeur en E1 (lasaisie), doit=20
normalement vider le contenu de "laplage", et mettre le=20
curseur en C8 (7, -2). Cette macro fonctionnait tr=E8s=20
bien, mais depuis qq jours, rien ne se passe, quand je=20
tape une valeur en E1 et que j'actionne la touche entr=E9e,=20
mon curseur va simplement en E2...=20
y a t-il un pb avec la macro, cela peut-il venir du fait=20
le fichier soit partag=E9?

merci de vos pr=E9cisions.

dd

2 réponses

Avatar
papou
Bonjour dd
cela peut-il venir du fait le fichier soit partagé?
Il me semble bien que oui, regarde dans l'aide sur "Classeurs partagés"

Cordialement
Pascal

"dd" a écrit dans le message de
news:10f601c3fb80$5af00190$
bonjour,

j'ai la macro suivante :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(0, 0) = "E1" Then
Application.EnableEvents = False
Range("laplage").ClearContents
Target.Offset(7, -2).Select
Application.EnableEvents = True
End If
End Sub

qui, lorsque je tape une valeur en E1 (lasaisie), doit
normalement vider le contenu de "laplage", et mettre le
curseur en C8 (7, -2). Cette macro fonctionnait très
bien, mais depuis qq jours, rien ne se passe, quand je
tape une valeur en E1 et que j'actionne la touche entrée,
mon curseur va simplement en E2...
y a t-il un pb avec la macro, cela peut-il venir du fait
le fichier soit partagé?

merci de vos précisions.

dd

Avatar
michdenis
Bonjour Papou,

essaie ceci : Exécute cette macro une fois. Est-ce que cela corrige la situation ?

'---------------------------
Sub Correctif()

Application.EnableEvents = True

end sub
'---------------------------


Salutations!


"papou >" <<DesolePasDeMail> a écrit dans le message de news:O$gBtN4%
Bonjour dd
cela peut-il venir du fait le fichier soit partagé?
Il me semble bien que oui, regarde dans l'aide sur "Classeurs partagés"

Cordialement
Pascal

"dd" a écrit dans le message de
news:10f601c3fb80$5af00190$
bonjour,

j'ai la macro suivante :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(0, 0) = "E1" Then
Application.EnableEvents = False
Range("laplage").ClearContents
Target.Offset(7, -2).Select
Application.EnableEvents = True
End If
End Sub

qui, lorsque je tape une valeur en E1 (lasaisie), doit
normalement vider le contenu de "laplage", et mettre le
curseur en C8 (7, -2). Cette macro fonctionnait très
bien, mais depuis qq jours, rien ne se passe, quand je
tape une valeur en E1 et que j'actionne la touche entrée,
mon curseur va simplement en E2...
y a t-il un pb avec la macro, cela peut-il venir du fait
le fichier soit partagé?

merci de vos précisions.

dd