Excel : Selectionner des lignes précises

Namab Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   -  
Namab Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

La question a surement déja été posée, mais les mots clés étant assez vastes, je ne trouve pas de réponse .

Je dois, pour mon travail, copier une par une des lignes excel dont j'ai le numéro (pour des centaines de références). Or, je me doute bien qu'il existe une formule (ou éventuellement un VBA) qui pourrait me faire gagner énormément de temps.
J'ai déja utilisé une formule qui me retourne les numéros de lignes que je dois copier (et c'est pour cela que je sais que j'en ai plusieurs centaines, et j'ai encore d'autres documents tout aussi massifs pour lesquels je dois faire de même).

Ma question est donc : existe t-il une formule, ou un programme VBA, qui me permetterait de sélectionner toutes les lignes?

J'ai par exemple une colonne ou sur chaque ligne figure le numéro de ligne que je dois copier. Puis-je l'utiliser pour importer directement ces lignes?

Je précise que je suis sous Excel 2003 et que je ne peux vous envoyer ces fichiers (confidentiels).


Je vous remercie d'avance,
Cordialement

A voir également:

3 réponses

tyranausor Messages postés 3545 Date d'inscription   Statut Membre Dernière intervention   2 039
 
Bonjour, plusieurs solutions uniquement en vba

sélection de la plage à copier :
Range("A1:A" & derlign).select
ou
Range(Cells(1,1),Cells(1,derligne)).select


où derligne est la dernière ligne de la plage à copier (ici dernière ligne en A)
0
JvDo Messages postés 1978 Date d'inscription   Statut Membre Dernière intervention   859
 
Bonjour,

En supposant que tu as tes n° de lignes dans un tableau voici une macro qui les sélectionne.
A toi ensuite d'en faire bon usage (copier/coller ou autre...).
Pour tester la macro, j'ai rempli le tableau avec les nombres impairs dans une boucle de 1 à nb (constante définie en tête de macro).
Option Base 1
Const nb = 200

Sub select_lignes()
'Sélection des lignes contenues dans le tableau montablo(nb)

Dim montablo(nb)
'création du tableau des lignes à sélectionner
For i = 1 To nb
    montablo(i) = 2 * i - 1 & ":" & 2 * i - 1
Next i
'initialisation de la sélection
Range(montablo(1)).Select
'sélection des lignes suivantes
For i = 2 To nb
    Union(Selection, Range(montablo(i))).Select
Next i

End Sub

Cordialement
0
Namab Messages postés 673 Date d'inscription   Statut Membre Dernière intervention   24
 
Merci pour vos réponses !

Petite question bonus : Savez vous pourquoi, au lieu de m'afficher des cellules vides, excel m'affiche toujours le signe ' dans celles-ci, m'empechant de pouvoir les supprimer d'un coup?
0