Macro selon valeur de cellule
Bonjour à tous,
J'ai mis les explications dans le fichier, voici un petit résumé.
Dans ma feuille 1 j'ai une cellule avec une liste déroulante. Selon la sélection je veux faire une action sauf que je veux faire l'action en question dans le feuille 2 et cela ne marche pas pu importe la commande. Range (a1) dans l'exemple...
À l'Aide,,
https://www.excel-pratique.com/~files/doc2/HlSoFAide.xls
Merci beaucoup de regarder
Bonjour,
ça marchera mieux comme ça :
Private Sub Worksheet_Change(ByVal Target As Range)
If [c4] = "2" Then
Sheets("Feuil2").Select
Sheets("Feuil2").Range("a1").Select
ElseIf [c4] = "3" Then
Sheets("Feuil3").Select
Sheets("Feuil3").Range("a1").Select
End If
End SubUne private Sub agit par défaut sur la feuille "propriétaire du module" à moins de spécifier à chaque fois la feuille cible :
Sheets("Feuil2").Select
Range("a1").Select 'sélectionne la cellule A1 dans la feuille1 (à condition de mettre des guillemets...)
Sheets("Feuil2").Select
Sheets("Feuil2").Range("a1").Select sélectionne bien la cellule prévue...
A+
Merci beaucoup !!!