VBA : Copier/Coller des Lignes dans de Nouvelles Feuilles

Résolu/Fermé

Oowi - 5 août 2016 à 12:45
Oowi - 5 août 2016 à 13:28

Bonjour à tous,

Après des heures de recherches infructueuses, même au sein de ce forum je ne trouve pas mon bonheur donc je vous expose mon problème qui parait simple.
Je veux grâce à une macro VBA selectionner mes lignes une par une et les recopier automatiquement dans de nouvelles feuilles créées automatiquement (Même si possible la première cellule recopiée puisse être le nom du nouvel onglet mais pas obligé)

A voir également:

VBA : Copier/Coller des Lignes dans de Nouvelles Feuilles
Incompatibilité de type vba ✓ - Forum Programmation
Vba attendre 1 seconde ✓ - Forum VB / VBA
Vba dernière colonne non vide ✓ - Forum VB / VBA
Vba récupérer valeur cellule ✓ - Forum VB / VBA
Mkdir vba ✓ - Forum VB / VBA

1 réponse

Réponse 1 / 1

Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 22
5 août 2016 à 13:06

Bonjour,


Sub Bouton1_Cliquer()

Sheets("Feuil1").Activate
Cells(1, 1).Select
Do While Not (IsEmpty(ActiveCell))
     Var1 = ActiveCell.Value
     Rows(ActiveCell.Row).Select
     Selection.Copy
     Sheets.Add
     ActiveSheet.Name = Var1
     ActiveSheet.Paste
     Sheets("Feuil1").Activate
     Selection.Offset(1, 0).Select
Loop
Sheets("Feuil1").Move Before:=Sheets(1)
Cells(1, 1).Select

End Sub

Oowi
5 août 2016 à 13:21

Salut Ant049,

Franchement solide ! Merci énormément ça marche grave et j'aurais pas pu y arriver quand je vois à ce à quoi tu es arrivé !

Si tu es sur Paris je te paye ma bière ! :D

Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 22
5 août 2016 à 13:23

Merci pour ton retour, le principal est que tu es compris le code que je t'ai passé.

Je ne suis pas à Paris mais je ne dis jamais non à une bière ;)

A+

Oowi > Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016
5 août 2016 à 13:28

Le code est top tu l'as pris d'un angle différent et c'est vraiment cool A+ !

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

VBA : Range avec références variables..

VBA erreur 1004

ouverture d'un fichier excel à partir d'un code VBA

Méthode find dans VBA - Recherche de données sous Excel

Discussions similaires

Newsletters