Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
Vieux 12/03/2010, 14h28   #1
Membre à l'essai
 
Inscription : mai 2008
Messages : 79
Détails du profil
Informations forums :
Inscription : mai 2008
Messages : 79
Points : 22
Points : 22
Par défaut Macro pour se déplacer sur une feuille excel

Bonjour,

Je ne me rapelle plus des codes pour se déplacer sur une feuille excel. Mon objectif est de créer une macro me permettant de sélectionner la cellule suivante pour relancer la macro sur cette dernière, etc...
Vous avez une idée ?

Merci d'avance.
arkorrigan est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 12/03/2010, 15h14   #2
Membre confirmé
 
Inscription : décembre 2008
Messages : 264
Détails du profil
Informations forums :
Inscription : décembre 2008
Messages : 264
Points : 264
Points : 264
Cellule suivante, oui mais sur la même ligne ou la même colonne?

Code :
1
2
3
4
5
 
ActiveCell.Offset(1).Select
ActiveCell.Offset(-1).Select
ActiveCell.Offset(0, 1).Select
ActiveCell.Offset(0, -1).Select
On évite toutefois les sélections il y a surement une autre façon de faire, mais comme on ne sait pas grand chose, à toi de faire
JPierreM est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 12/03/2010, 16h08   #3
Membre à l'essai
 
Inscription : mai 2008
Messages : 79
Détails du profil
Informations forums :
Inscription : mai 2008
Messages : 79
Points : 22
Points : 22
Ok merci pour l'info.
Ceci dit, je me retrouve avec un autre problème :
La macro que je veux faire doit me permettre d'activer un lien hypertexte, issu d'une formule excel :
http://www.118012.fr/reponses.asp?RN="&K3&"&PAGE=1&RECHERCHE=EXACTE&LANGUE=FRFR-XXXXX#0
Seulement, lorsque je fais un simple range ("").select, il ne se passe rien du tout.
Je ne comprendds pas le truc...
Quelqu'un peut m'aider ?
arkorrigan est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 15/03/2010, 12h32   #4
Membre confirmé
 
Inscription : décembre 2008
Messages : 264
Détails du profil
Informations forums :
Inscription : décembre 2008
Messages : 264
Points : 264
Points : 264
Avec l'enregistreur de macro

Code :
1
2
3
 
    Range("B1").Select
    Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
JPierreM est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 15/03/2010, 16h16   #5
Membre à l'essai
 
Inscription : mai 2008
Messages : 79
Détails du profil
Informations forums :
Inscription : mai 2008
Messages : 79
Points : 22
Points : 22
Lorsque j'utilise ton code, un message d'erreur me dit que l'indice n'appartient pas à la sélection... et là je sèche...
arkorrigan est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 15/03/2010, 20h41   #6
Membre confirmé
 
Inscription : décembre 2008
Messages : 264
Détails du profil
Informations forums :
Inscription : décembre 2008
Messages : 264
Points : 264
Points : 264
Dans l'exemple proposé Range("B1") c'est la cellule où se trouve le lien, il faut donc l'adapter en fonction de ton cas personnel
JPierreM est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +1. Il est actuellement 00h23.


 
 
 
 
Partenaires

Hébergement Web