Discussion :

[Wiilf]

Bonjour,

Je suis nouveau en VBA et j'ai pas réussi à à résoudre un petit problème.
Est ce que quelqu'un peut m'aider pour résoudre le problème suivant:
Écrire un programme en VBA qui peut extraire un vecteur colonne d'une matrice de n'importe quelle dimension.

Merci d'avance,
Wiilf

[joe.levrai]

Bonjour,

qu'entends-tu par "n'importe quelle dimension" ?

Pour 2D, application.index est très pratique pour sortir une ligne ou une colonne, mais qu'est-ce qu'une colonne dans un tableau 3D ou plus pour toi ?

[Wiilf]

Bonjour Joe dsl je pense que je me suis mal exprimé ... c'est pour une matrice 2d.

[joe.levrai]

Exemple pour la colonne 2

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub MaColonneDeux()
Dim Tabl(), ColonneDeux()
 
' un tableau 2D
Tabl = Range("A1:Z24").Value
 
' la colonne 2 du tableau (= colonne B de la feuille)
ColonneDeux = Application.Transpose(Application.Index(Tabl, 0, 2))
 
' on affiche le contenu de la colonne en la concaténant
MsgBox Join(ColonneDeux, "$")
End Sub

Si on doit extraire une ligne, on enlève le Application.Transpose, on remplace 0 par le numéro de ligne, et on remplace la colonne 2 par 0

[Wiilf]

salut Joe merci beaucoup pour le programme, est ce que c'est possible d'ajouter une partie pour demander à l'utilisateur de choisir la taille de la matrice (mxn), mettre les valeurs, mais surtt lui permettre d'afficher n'importe quelle colonne ?

[joe.levrai]

Bonjour,

la question du fil de discussion portait sur l'extraction d'une colonne d'un tableau 2D, nous y avons répondu et tu semble (mais ne l'indique pas) avoir compris la mécanique.

tu peux marquer ce sujet en résolu
si tu as d'autres problématiques, n'hésite pas à ouvrir un nouveau sujet dédié.

Attention cependant, il devient impératif de tenter des choses, de nous apporter du code VBA que tu as écris, tenté, qui te bloque, qui plante, ce que tu veux.
Mais de la matière issue de ce que tu viens d'apprendre, pour continuer à complexifier le traitement.