이 페이지에서
구문
= ArrayDimension ( 배열 )
인수구분
형식 설명
배열
필수
Variant
차원을 확인할 배열입니다.
마스터 코드
복사한 코드는 VBA 편집기(Alt + F11) 새 모듈에 붙여넣어 사용하세요'###############################################################
'오빠두엑셀 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
로그인 후 댓글을 작성할 수 있습니다.
준아아빠
2020.03.02 19:28
이런 강의 너무 감사합니다~~~~
해봐
2020.04.01 15:26
너무 좋은 정보 진심으로 감사드립니다.
박 규영
2021.10.23 21:24
감사합니다.
kimer****
2021.11.20 14:11
vba 명령문 강의가 있으면 진짜 좋을 것 같습니다. 이걸 이해할수 있으면 참 좋겠는데.. ㅠㅠ
vlvkc****
2021.12.31 08:14
좋은 정보 감사합니다
WooBeom
2022.01.06 08:36
간단한 데 중요한 함수, 유용합니다!
skyli****
2022.02.10 22:29
최고입니다.
Jan.J
2023.02.14 17:48
강의 감사합니다.
강민준🤗
2024.08.11 08:18
좋은 강의 감사합니다🙇♂️