Macro pour transposer des données - à corriger SVP
Fermé
borisparis
Messages postés
79
Date d'inscription
vendredi 21 août 2015
Statut
Membre
Dernière intervention
9 août 2023
-
12 mars 2018 à 20:35
ccm81 Messages postés 10877 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 23 août 2024 - 12 mars 2018 à 21:33
ccm81 Messages postés 10877 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 23 août 2024 - 12 mars 2018 à 21:33
A voir également:
- Macro pour transposer des données - à corriger SVP
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro word - Guide
- Comment corriger l'erreur 0x80070643 ? - Guide
- Macro logiciel - Télécharger - Organisation
- Excel validation des données liste - Guide
1 réponse
ccm81
Messages postés
10877
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
23 août 2024
2 414
Modifié le 12 mars 2018 à 21:35
Modifié le 12 mars 2018 à 21:35
Bonjour
Je pense qu'il y a juste une modif.
' on commence à la colonne 2 au lieu de la colonne 6
je te joins le fichier, avec la macro indentée (lisibilité)
https://www.cjoint.com/c/HCmuGhHPCcB
Cdlmnt
Je pense qu'il y a juste une modif.
' on commence à la colonne 2 au lieu de la colonne 6
For t = 2 To derncol i = i + 1 Sheets(2).Cells(Ligne2, derncol2 + i) = Sheets(1).Cells(n, t) Sheets(2).Cells(1, derncol2 + i) = Sheets(1).Cells(1, t) Next t
je te joins le fichier, avec la macro indentée (lisibilité)
https://www.cjoint.com/c/HCmuGhHPCcB
Cdlmnt