Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro de transformation de certaines colonnes en ligne

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion tarinz
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
T

tarinz

Guest
Bonjour, je cherche à faire une macro qui pourrait transposer des colonnes en lignes avec une boucle s'adaptant au nombre de colonnes du tableau traité.
Exemple dans le fichier joint dans l'onglet départ: il y a 13 colonnes que je souhaite transformer comme dans l'onglet "arrivée souhaitée"
J'y suis arrivé mais sans boucle, c'est-à-dire en notant en dur tous les noms de colonnes à traiter. Je dois travailler sur un fichier de plus de 100 colonnes prochainement, donc avec une boucle ce serait mieux ;-)
Merci d'avance pour l'aide
+
Laurent
 

Pièces jointes

Trier par date Trier par votes
Bonjour tarinz,

Avec la fonction Transpose pas besoin de boucle, le code de la 2ème feuille :
VB: 
Private Sub Worksheet_Activate()
Application.ScreenUpdating = False
If FilterMode Then ShowAllData 'si la feuille est filtrée
UsedRange = Empty 'RAZ
With Sheets("Départ").UsedRange
    [A1].Resize(.Columns.Count, .Rows.Count) = Application.Transpose(.Value)
End With
Columns.AutoFit 'ajustement largeur
End Sub
La macro se déclenche quand on active la feuille.

A+
 

Pièces jointes

Vote positif 0 Vote négatif
Salut job75, en fait dans l'exemple je dois conserver certaines données de colonnes (colonne 1 à 4) sur chaque ligne. En fait j'aurais dû préciser que de la colonne 1 à 4 je cherche à dupliquer les informations jusqu'à ce qu'il y ai des donnée à transposer après la colonne 4 (pas facile à expliquer 🙂
Dans le nouveau fichier joint, on peut voir dans l'onglet "Arrivée souhaitée" que le nb d'enregistrements pour "Laurent" est équivalent au nombre de colonnes après la colonne 4 (soit 9). C'est pourquoi je recherche une boucle ou tout autre solution
 

Pièces jointes

Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Macro qui enchaine deshoraires Aller-Retour en fonction de critères
Réponses
10
Affichages
185
bsalv
B
M
  • Résolu(e)
XL 2021 Verrouillage de cellules après exécution d'une macro
2
Réponses
23
Affichages
1 K
MATLEA
M
POWERQUERY :: Remplacements multiples dans plusieurs colonnes avec traitements de nettoyage et de conversion de casse
Réponses
0
Affichages
247
oguruma
  • Question Question
Microsoft 365 "concatener" certaines colonnes d'onglets
2
Réponses
15
Affichages
1 K
Phil69970
L
  • Résolu(e)
Power Query Transformation tableau PowerQuery
Réponses
5
Affichages
672
JFL_XLD
J
B
  • Question Question
XL 2016 VBA et valeur cible sur cellules différentes
Réponses
3
Affichages
387
Lolote83
L
F
  • Question Question
XL 2021 sélection de colonne et ordonnancement des colonnes en déclarant en variable les entêtes
Réponses
2
Affichages
547
ftpo69
F
X
  • Question Question
XL 2021 Transformation de données sur une ligne en plusieurs lignes
Réponses
9
Affichages
506
xavieralvaro
X
  • Résolu(e)
Microsoft 365 Extraction d'informations sur différents onglets en partant d'une base de données
Réponses
7
Affichages
806
MBax
P
  • Question Question
XL 2016 Macro VBA remplissage tableau de synthèse % déchet ligne de production
Réponses
4
Affichages
410
vgendron
POWERQUERY :: Combinaison de dossiers multiples non adjacents (non hiérarchiques) - Tables - Feuilles - Puis filtrage à l'issue de la combinaison
Réponses
1
Affichages
261
oguruma
P
  • Question Question
XL 2019 Macro VBA appliquer un filtre lors d'une importation de données
Réponses
1
Affichages
542
fanch55
W
  • Question Question
XL 2019 Transformer des lignes de codes pour pratiquer Tablo à 4 colonnes et 40 lignes
2 3
Réponses
40
Affichages
2 K
Webperegrino
W
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
985
Nel'
N
A
  • Question Question
Microsoft 365 Macro pour récupérer des colonnes qui ne sont pas conjointes
Réponses
4
Affichages
467
Anthony_51
A
C
  • Question Question
XL 2016 Excel Macro permettant de masquer une ligne lorsque les cellules de 2 colonnes contigües sont vides
Réponses
11
Affichages
633
chris63
C
O
  • Question Question
Autres recopie de cellules selon la date
Réponses
3
Affichages
347
olivier Clech
O
  • Question Question
XL 2019 Macro bloque en court de travail
Réponses
4
Affichages
314
fanch55
A
  • Résolu(e)
Microsoft 365 programme VBA pour "importer" les valeurs de certaines cellules d'une autre feuille appartenant à une ligne que j'identifie par un n°
2
Réponses
27
Affichages
1 K
arnomorize
A
  • Question Question
XL 2021 Calcul jours, TCD et outil de pilotage via TCD
Réponses
6
Affichages
581
Raziel abel
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…