메뉴
실무 위키VBA 코드ArrayDimension

ArrayDimension

Function

입력한 배열의 차원 수를 반환하는 VBA 사용자 지정 함수입니다.

ArrayDimension 코드 미리보기
구문 = ArrayDimension ( 배열 )
인수구분 형식 설명
배열 필수 Variant
차원을 확인할 배열입니다.

마스터 코드

복사한 코드는 VBA 편집기(Alt + F11) 새 모듈에 붙여넣어 사용하세요
Module1 · ArrayDimension
'###############################################################
'오빠두엑셀 VBA 사용자지정함수 (https://www.oppadu.com)
'▶ ArrayDimension 함수
'▶ 배열의 차원수를 반환합니다.
'▶ 인수 설명
'_____________vaArray : 차원을 검토할 배열을 입력합니다.
'###############################################################
Function ArrayDimension(vaArray As Variant) As Integer
Dim i As Integer: Dim x As Integer
On Error Resume Next
Do
i = i + 1
x = UBound(vaArray, i)
Loop Until Err.Number <> 0
Err.Clear
ArrayDimension = i - 1
End Function

활용 예제

2차원·3차원 배열의 차원 확인
Sub Test()
Dim vaArray1 As Variant
Dim vaArray2 As Variant
ReDim vaArray1(0 To 3, 0 To 3)
ReDim vaArray2(0 To 3, 0 To 3, 0 To 3)
MsgBox "vaArray1 의 차원은 " & ArrayDimension(vaArray1) & "차원 입니다."
MsgBox "vaArray2 의 차원은 " & ArrayDimension(vaArray2) & "차원 입니다."
End Sub
댓글 9
4.9 (9개 평가)
준아아빠
준아아빠 2020.03.02 19:28
이런 강의 너무 감사합니다~~~~
해봐
해봐 2020.04.01 15:26
너무 좋은 정보 진심으로 감사드립니다.
박 규영
박 규영 2021.10.23 21:24
감사합니다.
kimer****
kimer**** 2021.11.20 14:11
vba 명령문 강의가 있으면 진짜 좋을 것 같습니다. 이걸 이해할수 있으면 참 좋겠는데.. ㅠㅠ
vlvkc****
vlvkc**** 2021.12.31 08:14
좋은 정보 감사합니다
WooBeom
WooBeom 2022.01.06 08:36
간단한 데 중요한 함수, 유용합니다!
skyli****
skyli**** 2022.02.10 22:29
최고입니다.
Jan.J
Jan.J 2023.02.14 17:48
강의 감사합니다.
강민준🤗
강민준🤗 2024.08.11 08:18
좋은 강의 감사합니다🙇‍♂️
스크랩 완료