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

Microsoft 365 transposer en colonne

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion kenny
  • 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
K

kenny

XLDnaute Occasionnel
Bonjour,

J'aimerais transposer les données de ma feuille 1 en colonne comme dans l'onglet 2 (je le fais avec collage spécial transposé). dans mon onglet remplissage tableau reporter les données transposées car chaque semaine de l'année j'aurais ce fichier.

En sachant que dans ma feuille 1 je peux avoir plus de nom donc pas limité à Dupont 33.
Pourrait -on le faire par VBA Excel.

Merci d'avance (fichier test joint)
 

Pièces jointes

Trier par date Trier par votes
RE

Feuil1 suffisait...

VB: 
let MaFonction=(FolderPath,SheetName)=>

let
    Source = Excel.Workbook(File.Contents(FolderPath), null, true),
    appels_Sheet = Source{[Item=SheetName,Kind="Sheet"]}[Data],
    #"En-têtes promus" = Table.PromoteHeaders(appels_Sheet, [PromoteAllScalars=true]),
    #"Table transposée" = Table.Transpose(#"En-têtes promus"),
    #"En-têtes promus1" = Table.PromoteHeaders(#"Table transposée", [PromoteAllScalars=true]),
    #"Colonnes supprimées" = Table.RemoveColumns(#"En-têtes promus1",{"Nombre de SMS envoyés"}),
    #"Type modifié" = Table.TransformColumnTypes(#"Colonnes supprimées",{{"Durée totale sortant", type time}})
in
    #"Type modifié"
in MaFonction
 
Vote positif 0 Vote négatif
Merci Chris de ta patience.
Les fichiers originaux sont de la sorte (pas tjrs le même nombre de colonnes.
A moins que par une macro c'est plus simple je sais pas
 

Pièces jointes

Vote positif 0 Vote négatif
RE

Tu ne lis pas attentivement mes réponses et tu ne dit pas la réalité
kenny à dit:
oui c'est ça j'ai renommé les onglets de chaque classeur en appels
Cliquez pour agrandir...

chris à dit:
de toute évidence le nom de l'onglet des tes fichiers n'est pas celui attendu
Cliquez pour agrandir...
Tu postes des fichiers dont le nom de l'onglet n'est pas appels mais Appels sortants

A toi de corriger la fonction en conséquence et en respectant la casse...
 
Dernière édition:
Vote positif 0 Vote négatif
chris à dit:
RE

Tu ne lit pas attentivement mes réponses et tu ne dit pas la réalité



Tu postes des fichiers dont le nom de l'onglet n'est pas appels mais Appels sortants

A toi de corriger la fonction en conséquence et en respectant la casse...
Cliquez pour agrandir...
Chris j'ai bien essayé avec le bon nom d'onglet, mais j'ai toujours le même message d'erreur. C'est la même qui j'ai posté plus haut. c'est quand même bizarre
 
Vote positif 0 Vote négatif
kenny à dit:
Chris j'ai bien essayé avec le bon nom d'onglet, mais j'ai toujours le même message d'erreur. C'est la même qui j'ai posté plus haut. c'est quand même bizarre
Cliquez pour agrandir...
Voici mon code modifié je me suis dit que le fait d'avoir un nom d'onglet en deux mots ca le fait planté puis j'ai changé en appels tout court j'ai eu la même erreur, je remets Appels sortants c'est encore la même erreur.


let MaFonction=(FolderPath,SheetName)=>

let
Source = Excel.Workbook(File.Contents(FolderPath), null, true),
Appels_sortants_Sheet = Source{[Item=SheetName,Kind="Sheet"]}[Data],
#"En-têtes promus" = Table.PromoteHeaders(Appels_sortants_Sheet, [PromoteAllScalars=true]),
#"Table transposée" = Table.Transpose(#"En-têtes promus"),
#"En-têtes promus1" = Table.PromoteHeaders(#"Table transposée", [PromoteAllScalars=true]),
#"Colonnes supprimées" = Table.RemoveColumns(#"En-têtes promus1",{"Nombre de SMS envoyés"}),
#"Type modifié" = Table.TransformColumnTypes(#"Colonnes supprimées",{{"Durée totale sortant", type time}})
in
#"Type modifié"
in MaFonction
 
Vote positif 0 Vote négatif
Bonsoir kenny, chris,

vraiment à tout hasard : peut-être que le nom de l'onglet "Appels sortants" est correct, mais que ce qui gêne, c'est l'espace qui est dans le nom du fichier, juste à droite de "Appels" :

"Appels _Sortants_2021-01-04_1"​

soan
 
Vote positif 0 Vote négatif
J'avoue j'ai pas été attentif car je me rappelle au tout début l'éditeur m'a dit qu'une incompatibilité pourrait exister, mais j'ai pas fais attention au message. En tout cas suis content enfin j'ai le résultat attendu. Vraiment un grand merci à Chris ;o)) pour sa patience c'est pas évident quand on débute.
Je connaissais pas PQ j'ai découvert c'est génial ;o)) merci à toi Soan et Stapple 1600 de m'avoir mis sur la voie je vous adore.
👍👍👍
 
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

Discussions similaires

  • Résolu(e)
Microsoft 365 Transposé des nombres
2 3 4
Réponses
48
Affichages
844
Electron24
Z
  • Question Question
Autres Analyser les Ij avancées des IJ remboursées
2
Réponses
25
Affichages
419
cathodique
L
  • Question Question
XL 2021 Transformer des données verticales en horizontales et mettre à jour un graphique automatiquement
Réponses
11
Affichages
295
Leina
L
E
  • Question Question
Microsoft 365 Analyse de données temps de prod
Réponses
4
Affichages
117
ejik85
E
  • Question Question
Microsoft 365 créer des feuilles automatiques et une formule avec condition de remplissage
Réponses
2
Affichages
265
luno123
R
  • Question Question
Microsoft 365 aide recherche multiple entrées d'une cellule dans colonne
2
Réponses
16
Affichages
835
richard31
R
S
  • Question Question
Microsoft 365 Extraire dans une nouvelle feuille les cellules non vide d'une colonne
2
Réponses
15
Affichages
299
Gégé-45550
N
  • Question Question
Microsoft 365 appliquer la formule en changeant de ligne et de colonne
Réponses
2
Affichages
78
ndranghettino
N
S
  • Résolu(e)
Microsoft 365 PowerQuery : Table.addColumns en erreur
Réponses
2
Affichages
60
Sissou71
S
S
  • Résolu(e)
Microsoft 365 Afficher la référence de colonne d'un entête
Réponses
3
Affichages
177
Cousinhub
D
  • Résolu(e)
Microsoft 365 Remplissage colonne automatique dépendant d'un tableau
Réponses
7
Affichages
685
fanfan38
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
679
Nel'
N
M
  • Question Question
Microsoft 365 Aide à une formule sur un calendrier semainier
Réponses
4
Affichages
235
GALOUGALOU
B
  • Question Question
XL 2013 valeur d'une cellule se déplace suivant autre cellule
Réponses
5
Affichages
273
CHRIS1945
C
  • Question Question
XL 2016 colonnes automatique
Réponses
0
Affichages
296
richardlion
  • Question Question
XL 2016 rajouter une colonne en macro
Réponses
0
Affichages
173
richardlion
R
  • Question Question
XL 2010 Copie de plusieurs plages de cellules spécifiques dans le presse-papier
2
Réponses
20
Affichages
472
Dranreb
S
  • Résolu(e)
Microsoft 365 Reporter le contenu d'une plage dans une cellule selon un ordre précis
Réponses
4
Affichages
299
sebastien176
S
  • Résolu(e)
Microsoft 365 référence feuille en fonction du nom d'une cellule
Réponses
4
Affichages
213
tristan05
A
  • Résolu(e)
Microsoft 365 Demande d'aide sur des extractions de lignes
Réponses
7
Affichages
182
agayet
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…