1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6

[VB6 -> VBA] Dupliquer tableau Excel en fonction valeur cellule

Signaler
Messages postés
39
Date d'inscription
vendredi 30 avril 2004
Statut
Membre
Dernière intervention
7 juin 2013
 -
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
23 août 2018
 -
Bonjour,

J'ai un fichier Excel dans lequel j'ai 2 feuilles.
Sur la première j'ai une cellule qui contient le résultat d'une somme de cellules. ce résultat est donc un nombre entier.

Sur la deuxième feuille j'ai un tableau entre les lignes 11 et 31.

Je souhaiterai répéter autant de fois ce tableau(vers le bas : ligne suivante du tableau) que le resultat présent dans la cellule de la feuille 1.

Par avance merci


Vinsus (b)

2 réponses

Réponse 1 / 2

Bonjour,
ce que tu demandes est très clair, mais il manque juste les lignes de code que tu as commencé à écrire pour que l'on puisse t'aider


Fabien
Réponse 2 / 2
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
23 août 2018
 18
Bonjour,
Ceci devrait ressembler à ce que tu cherches à faire. 

    Dim I As Long, Valeur As Long
    
    Valeur = Range("A1")  'Prendre la valeur là où elle est
    
    '32 est la 1ere ligne vide
    '21 est la longueur de la plage à copier et le pas à chaque copie
    For I = 32 To 21 * Valeur Step 21
        Rows("11:31").Copy Range("A" & I)
    Next


MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI
Répondre Posez votre question