Worksheet_Change secondaire privé (cible de ByVal comme gamme)
Faible targ comme gamme
Régler montre la « A1 » de targ = de gamme ( ) 'cette cellule (ou cellules)
Placer le targ = intersectent (targ, cible)
Si le targ n'est rien puis sortir le sous-marin
Choisir le cas LCase (targ. Cellules (1))
Cas « pomme »
frmApple.Show
Cas « banane »
frmBanana.Show
Cas « orange »
frmOrange.Show
Extrémité choisie
Sous-marin d'extrémité
|