If target.address [Résolu]

thibaultanguy 45 Messages postés jeudi 3 juillet 2008Date d'inscription 16 novembre 2012 Dernière intervention - 16 juil. 2008 à 15:30 - Dernière réponse : mortalino 6812 Messages postés vendredi 16 décembre 2005Date d'inscription 21 décembre 2011 Dernière intervention
- 16 juil. 2008 à 15:41
Bonjour le forum,
Question trop simple pour vous certainement !!


Voilà, je souhaiterais,  lorsque que je sélectionne la cellule C2 par exemple, une macro qui me renvoie à la cellule A1. Le code ci-dessous fonctionne. Simplement, si j'ai plusieurs cellules que je veux renvoyer à la cellule A1, il faut que je retape tout le code... Y a t-il possibilité de tout mettre sur la même ligne de code ?


if target.address = "$C$2" then


Range ("A1").select


End if
Merci pour votre aide
Afficher la suite 

Votre réponse

1 réponse

Meilleure réponse
mortalino 6812 Messages postés vendredi 16 décembre 2005Date d'inscription 21 décembre 2011 Dernière intervention - 16 juil. 2008 à 15:41
3
Merci
salut,

on va dire que t'es un peu obligé de mettre toutes tes cellules sur la igne de code. Plus simple sinon :

Select Case Target.Address
    Case "$C$2", "$C$4", "$C$6", "$F$2", "$H$11", "$R$22", "$AC$26", etc..
       Range("A1").Select
End Select

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

Merci mortalino 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 86 internautes ce mois-ci

Commenter la réponse de mortalino

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.