Selection de lignes vba-excel

Résolu
Nate -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

Voila mon problème, je débute avec vba, et je patauge pas mal.
J'ai un fichier excel qui possède des données sur 60000 lignes, ce qui prend bcp de places.
Ce que je voudrais faire, c'est copier une ligne toute les 60-100 lignes et les coller sur une autre feuille.
Mon problème est que j'arrive pas à trouver comment poser ma variable pour incrementer tout ca.

Merci

2 réponses

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Bonjour,
    Même si je n'en voit pas l'intérêt...
    Dim Lig As Long
    With Sheets("Feuil1") 'à adapter, nom de la feuille à 60000 lignes
    For Lig = 1 to 60000 Step 60 'ou 100 selon
        .Rows(Lig).Copy Sheets("Feuil2").Range("A" & Rows.Count).End(xlUp).Offset(1, 0) 'à adapter : Feuil2 = feuille de destination des données
    Next
    End With
    1
    1. Nate
       
      Juste une petite question, comment je lance la macro, si elle commence pas par un "Sub nom()" ?
      0
    2. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      Alors juste une petite réponse...
      Ajoute un Sub Nom() au début et un End Sub à la fin du code...

      Salut Michel_m. Nos réponses sont tombées en même temps... ou presque!
      0
    3. Nate
       
      Merci
      je viens d'ajouter un Sub et End Sub
      et ca marche parfaitement !!! :)
      0
    4. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      ouais... Je ne suis pas persuadé que ton fichier soit moins lourd...
      De plus, maintenant tu va trainer une ligne vide toutes les 60...
      D'où mon début de réponse par : Même si je n'en voit pas l'intérêt...
      0
    5. Nate
       
      Effectivement il n'est pas plus lourd vu que je garde la feuille ac toutes les données.
      Et est ce que c'est possible de sélectionner comme tu viens de faire 1 ligne toute les 60 mais en enregistrant sur la meme feuille ?
      Si je remplace le "feuil2" par le nom de la feuille de départ ?
      0
  2. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    bonjour

    Combien de colonnes ?

    Tu es sûr(e) du paquet 100 lignes par feuille car cela fait 600 feuilles? ....

    je verrai plutôt 1000 lignes mais tout dépend de ce que yu veux faire...

    nota:normalement si + de 15000 lignes ==> access
    http://office.microsoft.com/fr-ch/excel-help/utilisation-d-access-ou-d-excel-pour-gerer-vos-donnees-HA001042918.aspx

    Michel
    0
    1. Nate
       
      Sur une feuille, j'ai 8 colonnes et 60000 lignes, et je veux copier seulement 1 ligne toute les 60 lignes sur ma feuille 2, ainsi je n'aurais plus que 8 colonnes et 1000 lignes sur la feuille 2
      0