Selection de cellule par macro

[Jacky]

Bonjour

Comment selectionner et copier une ou plusieurs lignes par macro dans une partie d'un tableau, sachant que leurs nombres peuvent etre variables , pour les copier dans un recapitulatif

 

[Jacky]

Voici enfin mon fichier

 

[Jacky]

Encore un essai

 

[Jacky]

Encore une fois

 

[Jacky]

Desolé je n'arrive pas à joindre mon fichier Zip

 

[Fred]

C'est qu'il est trop gros le forum n'accepte + les fichiers joint au dela d'une certaine limite

 

[Jacky]

Il fait 30k je doit faire une mauvaise manip

 

[Jacky]

Un essai de plus

 

[Fred]

re, la limite est depassée ton fichier est trop gros expose plutot ton probleme

 

[Jacky]

Bonjour
Voila mon probleme

Comment selectionner et copier une ou plusieurs lignes par macro dans une partie d'un tableau, sachant que leurs nombres peuvent etre variables , pour les copier dans un recapitulatif

Sub CopyCurrentRegion()

Sheets("Modele").Select
Range("B8").CurrentRegion.Copy
Sheets("Récapitulatif").Select
Columns("a").End(xlDown).Offset(1).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub

 

[andré]

Voici la méthode que j'emploie :
Activer la ligne de la feuille "recap" à partir de laquelle le collage doit être effectué.
Activer la feuille contenant le tableau.
Selectionner les lignes à copier, en tenant la touche Ctrl enfoncée si elles ne sont pas contiguës.
Puis la macro :
Selection.Copy
Sheets("recap").Select
ActiveSheet.Paste
Il y aurait moyen d'être un peu plus rapide, si les collages se font les uns en-dessous des autres dans la feuille "recap", en recherchant la première ligne vide de la feuille "recap", ce qui éviterait de devoir activer cette ligne au départ.

André.

 

[Jacky]

Merci a André