Creation de d'onglet autant que de ligne
Résolu
cedric0715
Messages postés
210
Date d'inscription
Statut
Membre
Dernière intervention
-
cs_Le Pivert Messages postés 7904 Date d'inscription Statut Contributeur Dernière intervention -
cs_Le Pivert Messages postés 7904 Date d'inscription Statut Contributeur Dernière intervention -
bonjour
pouvez vous m'aidez a crée une macro que lorsque je l' actionne
chaque ligne rempli dans la colonne A me créé un onglet.
j ai actuellement 81 ligne soit 81 onglet a créé
merci d'avance
pouvez vous m'aidez a crée une macro que lorsque je l' actionne
chaque ligne rempli dans la colonne A me créé un onglet.
j ai actuellement 81 ligne soit 81 onglet a créé
merci d'avance
A voir également:
- Creation de d'onglet autant que de ligne
- Partage de photos en ligne - Guide
- Creation de compte google - Guide
- Creation de site web - Guide
- Création de compte gmail - Guide
- Media creation tool - Télécharger - Systèmes d'exploitation
3 réponses
Bonjour,
Voir ceci:
https://www.sfr.fr/fermeture-des-pages-perso.html
Voir ceci:
https://www.sfr.fr/fermeture-des-pages-perso.html
cedric0715
Messages postés
210
Date d'inscription
Statut
Membre
Dernière intervention
je suis désolé je n'arrive pas a combiné les éléments avez vous des éléments supplémentaire a me fournir
je joint mon fichier https://www.cjoint.com/?3CfpD23GkyB
car après je voudrais que chaque élément dans mes colonnes rentre dans chaque fiche de ma liste (colonne A)
car après je voudrais que chaque élément dans mes colonnes rentre dans chaque fiche de ma liste (colonne A)
Voilà pour répondre à la question initiale qui était la création d'onglets:
Pour le reste faire un nouveau post
Cdlt
Sub For_X_to_Next_Ligne() Dim FL1 As Worksheet, NoCol As Integer Dim NoLig As Long, Var As Variant Set FL1 = Worksheets("tableau") NoCol = 1 'lecture de la colonne 1 For NoLig = 7 To Split(FL1.UsedRange.Address, "$")(4) Sheets.Add.Name = FL1.Cells(NoLig, NoCol).Value Next Set FL1 = Nothing End Sub
Pour le reste faire un nouveau post
Cdlt