Macro pour modifier cellule feuil 1 et Feuil 2 ou Feuil 2 et Feuil 1

Bonsoir

je voudrais pouvoir modifier indifferement la valeur d'une cellule de deux feuilles différentes par un menu déroulant.

Ci joint mon fichier test.

Merci pour l'aide

Jave

Bonjour

Votre fichier en retour pour test

Cordialement

Bonjour

Merci pour le retour, ç'est exactement ça , je l'intègre dans mon projet ....

Bonnes fêtes

Ja

Bonjour

J'ai une petite erreur qui se met en place lorsque je veux effacer mes cellules depuis que j'ai intégrer le nouveau code fourni

"erreur d'exécution 13"

"incomptabilté de type"

Mon code pour tout effacer est :

Sub TOUTEFFACER()

Range("E3:E1481").Select

Selection.ClearContents

Range("G3:G1481").Select

Selection.ClearContents

Range("I3:I1481").Select

Selection.ClearContents

Range("k3:k1481").Select

Selection.ClearContents

Range("E3").Select

End Sub

Mais je ne vois pas d'ou viens ce bug .....

Une idée .

Merci

Cdlt

le fichier avec le bug

Le bouton 1 pour tout effacer ....et le bug apparait ...

Re:

Dans le code que je vous ai placé dans votre fichier (dans thisworkbook) mettez cette ligne juste en dessous de la ligne IF OK....

If Target.Count > 1 Then Exit Sub

Votre code pour tout EFFACER modifié :

Sub TOUTEFFACER2()
Range("a3:c14").ClearContents
Range("a2").Select
End Sub

Cordialement

Bonsoir Dan

Je viens d'intégrer les modifications et tout fonctionne à merveille......

Un grand merci encore

Bonne soirée

Ja