Chaine à éxécuter | ||
---|---|---|
Inscription: 23/12/2013
De 23290 st pierre de fursac
Messages:
23
Système d'exploitation: pc Version Excel utilisée: 2010 |
Posté le : 25-03-2014 14h42
Bonjour le forum, J'ai de nouveau besoin de votre aide sur le code suivant, j'aurai souhaité, plutôt que de tout rentrer à la main qu'il y ai une chaîne automatique, c'est à dire que la macro me copie et colle toutes les cellules de A1:A1000 par exemple avec un pas de 14, (to step ?) Sheets("Sheet0").Range("A1,A15,A29,A43,A57,A71,A85,A99").Copy Destination:=Sheets("FEVRIER").Range("B3")
Sur son "grand frère" avec collage spécial, j'aurai souhaité la même chose :Sheets("Sheet0").Range("B6:B8").Select pas de 14 égalementmais collage pas de 1 ce qui copier en B6:B8 va en D3, ce qui est copié en B20:B22 va en D4 Je ne pense pas que ce soit irréalisable mais je galère un peu ! En vous remerciant |
|
|
Re: Chaine à éxécuter | ||
---|---|---|
Inscription: 23/12/2013
De 23290 st pierre de fursac
Messages:
23
Système d'exploitation: pc Version Excel utilisée: 2010 |
Posté le : 30-03-2014 23h47
j'ai trouvé tout seul comme un grand avec l'aide de forums question 1 : For h = 1 To 1000
question 2 : For i = 6 To 1001 Step 14
à bientôt |
|
|