Table des matières
☰
- Étape 1Sortez le didacticiel interactif VBA gratuit
- Étape 2Notre complément VBA rend le codage facile à télécharger
- Étape 3Reportez-vous à notre exemple de code VBA
- Embauchez nousExigence VBA complexe ? Engagez nos experts.
Convertir un vecteur à une seule ligne en une matrice
Il s'agit du didacticiel inverse du didacticiel Convert Matrix to Vector.
La fonction suivante prend un vecteur de ligne unique et le convertit en une matrice :
123456789101112131415161718 | Fonction Create_Matrix (Vector_Range As Range, No_Of_Cols_in_output As Integer, No_of_Rows_in_output As Integer) As VariantReDim Temp_Array(No_Of_Cols_in_output, No_of_Rows_in_output)Dim No_Of_Elements_In_Vector en tant qu'entierDim Col_Count en tant qu'entier, Row_Count en tant qu'entierCellule faibleNo_Of_Elements_In_Vector = Vector_Range.Rows.Count'Élimine les conditions NULLSi Vector_Range n'est rien, alors quitter la fonctionSi No_Of_Cols_in_output = 0 alors quitter la fonctionSi No_of_Rows_in_output = 0 alors quitter la fonctionSi No_Of_Elements_In_Vector = 0, alors quitter la fonctionPour Col_Count = 1 à No_Of_Cols_in_outputPour Row_Count = 1 à No_of_Rows_in_outputTemp_Array(Col_Count, Row_Count) = Vector_Range.Cells(((No_of_Rows_in_output) * (Col_Count - 1) + Row_Count), 1)Row_Count suivantCol_Count suivantCreate_Matrix = Temp_ArrayFonction de fin |
La fonction prend 3 arguments :
• La portée du vecteur initial
• Le nombre de lignes requises dans la matrice
• Le nombre de colonnes requises dans la matrice
Donc si on a :
Ensuite, nous pouvons appeler notre fonction :
Convert_to_matrix(c7:c16,2,5)
Où:
1. c7:c16 est la plage de la matrice
2. 2 est le nombre de lignes requises dans la matrice
3. 5 est le nombre de colonnes requis
Et on obtient :
Pour télécharger le fichier .XLSM à partir de cette fonction, cliquez ici.