Chuyển đổi một vectơ hàng đơn thành ma trận - Ví dụ về mã VBA

  • Bước 1Xem Hướng dẫn VBA Tương tác Miễn phí
  • Bước 2Phần bổ trợ VBA của chúng tôi giúp tải xuống dễ dàng mã hóa
  • Bước 3Tham khảo Mã mẫu VBA của chúng tôi
  • Thuê Chúng TÔIYêu cầu VBA phức tạp? Thuê các chuyên gia của chúng tôi.

Học VBA

Chuyển đổi vectơ hàng đơn thành ma trận

Đây là hướng dẫn ngược lại với hướng dẫn Chuyển đổi Ma trận sang Vectơ.

Hàm sau nhận một vectơ hàng đơn và chuyển thành ma trận:

123456789101112131415161718 Hàm Create_Matrix (Vector_Range As Range, No_Of_Cols_in_output As Integer, No_of_Rows_in_output As Integer) Dưới dạng biến thểReDim Temp_Array (No_Of_Cols_in_output, No_of_Rows_in_output)Dim No_Of_Elements_In_Vector thành số nguyênDim Col_Count dưới dạng số nguyên, Row_Count dưới dạng số nguyênLàm mờ ôNo_Of_Elements_In_Vector = Vector_Range.Rows.Count'Loại bỏ điều kiện NULLNếu Vector_Range không có gì thì hãy thoát khỏi chức năngIf No_Of_Cols_in_output = 0 Then Exit FunctionIf No_of_Rows_in_output = 0 Then Exit FunctionIf No_Of_Elements_In_Vector = 0 Then Exit FunctionĐối với Col_Count = 1 Tới No_Of_Cols_in_outputĐối với Row_Count = 1 Tới 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 tiếp theoCol_Count tiếp theoCreate_Matrix = Temp_ArrayChức năng kết thúc

Hàm nhận 3 đối số:
• Phạm vi của vectơ ban đầu
• Số hàng được yêu cầu trong ma trận
• Số lượng cột cần thiết trong ma trận

Vì vậy, nếu chúng ta có:

Sau đó, chúng ta có thể gọi hàm của mình:

Convert_to_matrix (c7: c16,2,5)

Ở đâu:

1. c7: c16 là phạm vi ma trận
2. 2 là số hàng được yêu cầu trong ma trận
3. 5 là số cột được yêu cầu

Và chúng tôi nhận được:

Để tải xuống tệp .XLSM từ chức năng này, hãy nhấp vào đây.

Bạn sẽ giúp sự phát triển của trang web, chia sẻ trang web với bạn bè

wave wave wave wave wave