Copie et collage multiple d'une feuille dans le même onglet

Fermé
ragias96 Messages postés 2 Date d'inscription mercredi 12 octobre 2016 Statut Membre Dernière intervention 13 octobre 2016 - Modifié par crapoulou le 12/10/2016 à 22:05
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 - 13 oct. 2016 à 19:48
Bonjour
La premiere feuille comporte un tableau et voudrais la copier et la coller plusieurs fois à la suite en fonction d'un nombre.
Si quelqu'un peut m'aider je l'en remercie par avance
A voir également:

1 réponse

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
13 oct. 2016 à 09:25
Bonjour,

Voici un exemple de code pour copier n fois la Feuil1, n étant le nombre contenu dans la cellule A1.
Sub Copier_Feuille()
Dim N
Dim i As Integer
With Worksheets("Feuil1")
N = .Range("A1").Value
If IsNumeric(N) Then
If N > 0 Then
For i = 1 To N
.Copy After:=Sheets(Sheets.Count)
Next i
End If
End If
End With
End Sub

A+
0
ragias96 Messages postés 2 Date d'inscription mercredi 12 octobre 2016 Statut Membre Dernière intervention 13 octobre 2016
13 oct. 2016 à 19:25
Merci pour votre aide mais malheureusement cela ne fonctionne pas
0
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523 > ragias96 Messages postés 2 Date d'inscription mercredi 12 octobre 2016 Statut Membre Dernière intervention 13 octobre 2016
13 oct. 2016 à 19:48
Mais si, cela fonctionne !
Par contre, cela ne correspond peut-être pas à ce que tu cherches à faire.
Si tu te contentes d'un commentaire laconique sans autre explication, c'est sûr que le voyage va être long.

Pour participer activement à une recherche de solution, tu peux joindre un fichier avec un exemple du résultat attendu.
1)	Tu vas dans https://www.cjoint.com/ 
2) Tu cliques sur [Parcourir] pour sélectionner ton fichier
3) Tu descends en bas de la page pour cliquer sur [Créer le lien Cjoint]
4) Au bout de quelques secondes la deuxième page s'affiche, avec le lien
en bleu souligné ; clic droit dessus et "Copier l’adresse du lien"
5) Tu reviens dans ta discussion sur commencamarche , et dans ton message de réponse tu fais "Coller".

A+
0