<p><strong>Nouvelle réponse :</strong></p>
<p>Les nouvelles fonctions de mise en forme de tableaux de Ms365 seront utiles :</p>
<pre><code class="lang-auto">=UNIQUE(TOCOL(A2:C7,3,1))
</code></pre>
<p><a href="https://support.microsoft.com/en-us/office/tocol-function-22839d9b-0b55-4fc1-b4e6-2761f8f122ed"><code>TOCOL()</code></a> retournerait un vecteur de toutes les valeurs autres que les valeurs d’erreur ou vides (3) par colonne (1).</p>
<p><strong>Ancienne réponse :</strong></p>
<p>En utilisant Microsoft365 avec accès à <code>LET()</code>, vous pourriez utiliser :</p>
<p><a href="https://i.sstatic.net/ZD4OM.png"></a></p>
<p>Formule dans <code>E2</code> :</p>
<pre><code class="lang-auto">=LET(X,A2:C7,Y,SEQUENCE(ROWS(X)*COLUMNS(X)),Z,INDEX(IF(X="","",X),1+MOD(Y,ROWS(X)),ROUNDUP(Y/ROWS(X),0)),SORT(UNIQUE(FILTER(Z,Z<>""))))
</code></pre>
<p>De cette façon, la formule devient facilement réutilisable puisque le seul paramètre à modifier est la référence à « X ».</p>
<p>Pour information, cela pourrait aussi être fait via PowerQuery alias Get&Transform, disponible depuis Excel 2013 ou en tant que complément gratuit pour Excel 2010.</p>
<ul>
<li>
<p>Sélectionnez vos données (y compris les en-têtes). Allez dans Ruban > Données > « À partir d’un tableau/d’une plage ».</p>
</li>
<li>
<p>Confirmez que vos données ont des en-têtes et PowerQuery devrait s’ouvrir.</p>
</li>
<li>
<p>Dans PowerQuery, sélectionnez toutes les colonnes. Allez dans Transformer > « Transposer ».</p>
</li>
<li>
<p>Sélectionnez à nouveau toutes les colonnes. Allez dans Transformer > « Supprimer le croisement dynamique des colonnes ».</p>
</li>
</ul>
<p>Cela prendra en charge les valeurs vides également. Maintenant :</p>
<ul>
<li>
<p>Sélectionnez la colonne d’attributs et supprimez-la.</p>
</li>
<li>
<p>Triez la colonne restante et supprimez les doublons (clic droit sur l’en-tête > « Supprimer les doublons »).</p>
</li>
<li>
<p>Fermez PowerQuery et enregistrez les modifications.</p>
</li>
</ul>
<p>Tableau résultant :</p>
<p><a href="https://i.sstatic.net/nHCwi.png"></a></p>
<pre><code class="lang-auto">M-Code:
let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Changed Type" = Table.TransformColumnTypes(Source,{{"A Values", Int64.Type}, {"B Values", Int64.Type}, {"C Values", Int64.Type}}),
#"Transposed Table" = Table.Transpose(#"Changed Type"),
#"Unpivoted Columns" = Table.UnpivotOtherColumns(#"Transposed Table", {}, "Attribute", "Value"),
#"Removed Columns" = Table.RemoveColumns(#"Unpivoted Columns",{"Attribute"}),
#"Sorted Rows" = Table.Sort(#"Removed Columns",{{"Value", Order.Ascending}}),
#"Removed Duplicates" = Table.Distinct(#"Sor
(Réponse tronquée)</code></pre>
