Konwersja wektora jednowierszowego na macierz - przykłady kodu VBA

☰

• Krok 1Wyjmij interaktywny samouczek VBA za darmo
• Krok 2Nasz dodatek VBA sprawia, że ​​kodowanie jest łatwe do pobrania
• Krok 3Zapoznaj się z naszym przykładowym kodem VBA
• Zatrudnić nasZłożone wymaganie VBA? Zatrudnij naszych ekspertów.

Naucz się VBA

Konwertuj wektor jednorzędowy na macierz

Jest to samouczek znajdujący się naprzeciwko samouczka Konwertuj macierz na wektor.

Poniższa funkcja przyjmuje wektor jednowierszowy i konwertuje na macierz:

123456789101112131415161718

Funkcja Create_Matrix (Vector_Range jako zakres, No_Of_Cols_in_output jako liczba całkowita, liczba_of_Rows_in_output jako liczba całkowita) jako wariantReDim Tablica_temp (liczba_kolumn_na_wyjściu, liczba_rzędów_na_wyjściu)Dim No_Of_Elements_In_Vector jako liczba całkowitaDim Col_Count jako liczba całkowita, Row_Count jako liczba całkowitaPrzyciemnij komórkęNo_Of_Elements_In_Vector = Zasięg_wektora.Liczba wierszy„Wyeliminuj warunki NULL”Jeśli zakres_wektora jest niczym, wyjdź z funkcjiJeśli No_Of_Cols_in_output = 0 to wyjdź z funkcjiJeśli liczba_rzędów_w_wyjściu = 0, to wyjdź z funkcjiJeśli No_Of_Elements_In_Vector = 0 to zakończ funkcjęDla Col_Count = 1 do No_Of_Cols_in_outputDla licznika_wierszy = 1 do liczby rzędów w_wyjściuTablica_temp(Liczba_kolumn, Liczba_wierszów) = Zasięg_wektora.Komórki(((Liczba_rzędów_w_wyjściu) * (Liczba_kolumn - 1) + Liczba_wierszów), 1)Liczba_następnych wierszyNastępny Col_CountUtwórz_Macierz = Temp_ArrayKoniec funkcji

Funkcja przyjmuje 3 argumenty:
• Zakres wektora początkowego
• Liczba wierszy wymaganych w macierzy
• Liczba kolumn wymaganych w macierzy

Więc jeśli mamy:

Następnie możemy wywołać naszą funkcję:

Konwertuj_na_macierz(c7:c16,2,5)

Gdzie:

1. c7:c16 to zakres macierzy
2. 2 to liczba wierszy wymaganych w macierzy
3. 5 to wymagana liczba kolumn

I otrzymujemy:

Aby pobrać plik .XLSM z tej funkcji, kliknij tutaj.