Déplacement de la cellule active vers le bas [Résolu]

cs_delma 8 Messages postés jeudi 16 juin 2005Date d'inscription 28 août 2006 Dernière intervention - 7 juil. 2005 à 09:26 - Dernière réponse : cs_delma 8 Messages postés jeudi 16 juin 2005Date d'inscription 28 août 2006 Dernière intervention
- 7 juil. 2005 à 11:05
Bonjour tout le monde!



Je souhaite effectuer une copie d'une ligne et la coller dans une autre
feuille de mon classeur excel. Ca ca marche (encore heureux ;-) mais je
veux ensuite déplacer la cellule active à la ligne suivante. C'est a
dire que lors de la prochaine copie, ce déplacement ce fasse a la
cellule d'en dessous et ainsi de suite. Pour pouvoir avoir ensuite
l'ensemble des ligne que j'ai copiée dans ma feuille excel. J'ai
essayer simplement en appuyant sur la touche down, mais ne marche pas,
il me met la commande suivante: Range("A2").Select ce qui fé que lors
de la prochaine copie, elle est effectuée à cette ligne. J'ai essayer
en utilisant la commande SendKeys "{DOWN}, ou encore SendKeys
"{ENTER}", mais cela ne fonctionne pas. Existe il une metode, propriété
permettant de simplement dire de descendre d'une ligne la cellule
active à la feuille active???



la commande que j'ai besoin c'est de pouvoir dire en VB de descendre d'une cellule. Un truc du style moveDown.

Déroulement de ce que je veux faire:

Je selectionne une ligne dans une feuille excel, j'utilise mon macro, je reselectionne une ligne et je réutilise mon macro.

Le marco va faire.

Debut macro

copier la ligne que j'ai selectionner, changer de feuille excel,
coller la ligne, descendre d'une ligne et revenir a l'autre feuille
excel

Fin macro



Ensuite je selectionne une autre ligne, j'utilise mon macro et là la
ligne selectionnée sera coller dans l'autre feuille excel à la ligne 2

Je recommence, copie à la ligne 3, etc....



ainsi je peux avoir la liste des lignes que j'ai selectionner dans une feuille excel.



Please help...
Afficher la suite 

1 réponse

cs_delma 8 Messages postés jeudi 16 juin 2005Date d'inscription 28 août 2006 Dernière intervention - 7 juil. 2005 à 11:05
+3
Utile
Voila la solution:



ActiveCell.Offset(1, 0).Activate
Cette réponse vous a-t-elle aidé ?  

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.