엑셀 VBA에서 Dictionary나 Collection 객체 참조 오류 처리 방법

본 글의 목적은 엑셀 VBA 환경에서 Dictionary 및 Collection 객체를 활용하는 실무 사용자들이 참조 오류 문제를 보다 명확하게 이해하고, 발생 원인 및 다양한 상황별 해결 방안을 단계별로 습득할 수 있도록 돕는 데 있다. 다양한 오류 발생 상황과 실전에서 적용할 수 있는 코드 예시를 통해 오류 예방 및 처리법을 제시하며, 업무 효율성을 극대화하는 데 필요한 팁과 예제들을 구체적으로 안내한다.

1.원인

엑셀 VBA에서 Dictionary와 Collection 객체를 사용할 때 자주 발생하는 참조 오류는 여러 가지 원인에 기인한다. 주된 원인은 객체 초기화를 누락하거나, 중복된 키 값의 삽입, 존재하지 않는 키 참조, 그리고 잘못된 객체 참조 방식 등이 있다. 각각의 원인에 대해 정리하면 다음과 같다.

구분	원인 설명	예시
객체 초기화 미실시	변수를 선언한 후 명시적으로 객체를 생성 또는 초기화하지 않고 사용하면 참조 오류가 발생할 수 있다.	예) Dim dict As Dictionary ' Set dict = New Dictionary 구문 누락
중복된 키 값 입력	Dictionary 객체는 각 키 값의 유일함을 보장해야 하므로, 이미 존재하는 키에 새로운 값을 추가하는 경우 오류가 발생한다.	예) dict.Add "Key1", "데이터" dict.Add "Key1", "새로운 데이터"
존재하지 않는 키 참조	Dictionary나 Collection에 존재하지 않는 키를 참조하거나 삭제하는 경우 오류가 발생한다.	예) dict.Remove "없는키"
잘못된 객체 참조 방식	객체가 아닌 일반 변수나, 잘못된 데이터 유형에 대해 객체 메서드를 호출할 경우 참조 오류가 나타난다.	예) Dim str As String str.Add "데이터" 시도

이러한 원인들은 코드 작성 시 주의해야 할 부분이며, 특히 대용량 데이터 또는 복잡한 데이터 처리를 진행할 경우 조금의 실수로도 전체 업무 흐름에 치명적인 영향을 미칠 수 있다.

2.발생예시

실제 업무에서 발생한 오류 사례들을 살펴보면, 다음과 같은 예시들을 확인할 수 있다.

예시 1: 객체 초기화 누락
VBA 코드에서 Dictionary 객체를 선언만 하고 new 키워드나 CreateObject 함수를 통해 초기화를 하지 않은 경우, 해당 객체를 호출 시 "Object variable or With block variable not set"와 같은 오류 메시지가 발생한다.

' 초기화 누락 예제
Sub TestDictionaryInitialization()
    Dim dict As Object
    ' 아래 Set 구문이 없으면 오류 발생
    ' Set dict = CreateObject("Scripting.Dictionary")
    dict.Add "A", 1  ' 이 시점에서 오류 발생
End Sub
    

예시 2: 중복된 키 입력
Dictionary 객체에 동일한 키("Item1")를 두 번 이상 추가하는 경우 오류가 발생하며, 이는 데이터를 중복 처리할 여지를 없애기 위한 VBA 내부 검증 과정이다.

Sub TestDuplicateKey()
    Dim dict As Object
    Set dict = CreateObject("Scripting.Dictionary")
    
    dict.Add "Item1", "데이터1"
    ' 동일한 키를 추가할 경우 오류 발생
    dict.Add "Item1", "데이터2"
End Sub
    

예시 3: 존재하지 않는 키 참조
Collection 객체나 Dictionary 객체에서 존재하지 않는 키에 대해 접근하거나 삭제를 시도하면, "Subscript out of range"와 같은 오류가 발생한다.

Sub TestNonExistentKey()
    Dim col As New Collection
    col.Add "데이터1", "Key1"
    
    ' 존재하지 않는 키에 접근하려 시도하면 오류가 발생한다.
    On Error Resume Next
    col.Remove "Key2"
    If Err.Number <> 0 Then
        MsgBox "해당 키는 존재하지 않습니다."
        Err.Clear
    End If
    On Error GoTo 0
End Sub
    

예시 4: 잘못된 객체 참조
변수를 선언할 때 기대하는 객체와 다른 데이터 유형으로 인해 객체 메서드 호출 시 오류가 발생할 수 있다. 예를 들어, String 변수에 Dictionary 관련 메서드를 호출하는 경우이다.

Sub TestWrongReference()
    Dim someVar As String
    someVar = "테스트 데이터"
    
    ' String 변수에는 Dictionary 메서드를 사용할 수 없으므로 오류 발생
    ' someVar.Add "Key", "Value"  
End Sub
    

이처럼 다양한 상황에서 발생하는 오류 사례들은 개발자가 사전에 이러한 문제에 대비하여 코드를 작성해야 함을 시사한다.

3.해법

Dictionary와 Collection 객체의 참조 오류를 해결하고 미연에 예방하기 위해서는 다음과 같은 방법들을 체계적으로 적용해야 한다. 아래에서는 각 문제 상황에 맞는 해결법을 자세히 안내한다.

방법 1: Dictionary 객체의 키 존재 여부 미리 확인
Dictionary 객체에 데이터를 추가하기 전에 반드시 해당 키가 이미 존재하는지 Exists 메서드를 통해 확인한다. 이를 통해 중복된 키로 인한 오류를 예방할 수 있다.

Sub AddToDictionary()
    Dim dict As Object
    Set dict = CreateObject("Scripting.Dictionary")
    
    If Not dict.Exists("Key1") Then
        dict.Add "Key1", "데이터1"
    Else
        MsgBox "이미 존재하는 키입니다."
    End If
End Sub
    

방법 2: Collection 객체 에러 처리 활용
Collection 객체는 Exists 메서드가 없으므로, On Error 문을 통해 존재하지 않는 키 참조나 삭제 시에 발생하는 오류를 처리한다.

Sub RemoveFromCollection()
    Dim col As New Collection
    col.Add "데이터1", "Key1"
    
    On Error Resume Next
    col.Remove "NonExistentKey"
    If Err.Number <> 0 Then
        MsgBox "해당 키는 존재하지 않습니다."
        Err.Clear
    End If
    On Error GoTo 0
End Sub
    

방법 3: 객체 초기화 명확히 수행
객체를 사용하기 전에 반드시 New 키워드나 CreateObject 함수를 통해 명확하게 초기화해야 한다. 또한, 일관된 객체 생성 방식을 채택하는 것이 중요하다.

Sub InitializeDictionary()
    ' 두 가지 방법 중 하나를 선택하여 객체를 초기화한다.
    
    ' 방법 A: 동적 생성 방식 (Late binding)
    Dim dictA As Object
    Set dictA = CreateObject("Scripting.Dictionary")
    
    ' 방법 B: 명시적 선언 방식 (Early binding; Microsoft Scripting Runtime 참조 필요)
    Dim dictB As New Scripting.Dictionary
    
    dictA.Add "Key1", "값1"
    dictB.Add "Key2", "값2"
End Sub
    

방법 4: 객체 유형 검사
객체를 사용하기 전에 TypeOf 연산자를 통해 해당 변수가 올바른 객체 유형인지 검사하여, 잘못된 참조로 인해 오류가 발생하지 않도록 한다.

Sub CheckObjectType()
    Dim dict As Object
    Set dict = CreateObject("Scripting.Dictionary")
    
    If TypeOf dict Is Object Then
        ' Dictionary 객체로 작업 수행
        dict.Add "Key1", "값1"
    Else
        MsgBox "잘못된 객체 참조입니다."
    End If
End Sub
    

위와 같이 각 해결 방법은 코드의 안정성을 높이고 유지보수를 용이하게 하며, 실무에서의 오류 발생 빈도를 상당히 줄일 수 있다. 또한, 개발 초기 단계부터 이러한 오류 처리 방법을 내재화하면 후속 개발 과정에서 일어날 수 있는 잠재적인 문제들을 미리 방지할 수 있다.

추가적으로, 코드 작성 시 주석을 통해 각 코드의 목적과 처리 로직을 명확하게 기록하여, 팀원들과의 협업 과정에서 혼선을 줄이는 것도 좋은 방법이다.

4.FAQ

Q1. Dictionary 객체에서 중복 키 입력을 방지하는 가장 좋은 방법은 무엇인가요?
A1. Dictionary 객체의 Exists 메서드를 활용하여 해당 키가 이미 존재하는지 사전에 확인한 후 데이터를 추가하는 방식이 가장 확실하다.

Q2. Collection 객체에서 특정 키의 존재 여부를 어떻게 확인할 수 있나요?
A2. Collection 객체는 Exists 메서드를 제공하지 않으므로, On Error 문을 활용하여 존재하지 않는 키에 접근 시 발생하는 오류를 통해 간접적으로 확인해야 한다.

Q3. Dictionary와 Collection 객체 중 어느 것이 성능면에서 더 우수한가요?
A3. 일반적으로 Dictionary 객체는 키 기반 데이터 검색 및 관리에 있어서 더 빠른 성능을 제공하므로, 대용량 데이터 처리에 유리하다.

Q4. Dictionary 객체를 사용하려면 별도의 참조 설정이 필요한가요?
A4. 네, Microsoft Scripting Runtime 라이브러리를 참조로 추가하는 방법과 CreateObject 함수를 통한 동적 생성 방식 두 가지 방법으로 사용할 수 있으며, 후자의 경우 별도의 참조 설정이 필요하지 않다.

Q5. Dictionary 객체에 저장할 수 있는 데이터 개수에는 제한이 있나요?
A5. Dictionary 객체 자체의 데이터 개수 제한은 없으나, 시스템 메모리 및 VBA 환경의 제약으로 인해 실질적인 한계가 존재할 수 있다.

Q6. Collection 객체와 Dictionary 객체를 함께 사용할 때 주의해야 할 점은 무엇인가요?
A6. 두 객체 간 기능 차이를 명확히 이해하고, 특히 Collection 객체의 경우 키 존재 여부 확인 방법이 없으므로 오류 처리 루틴을 반드시 포함시켜야 한다.

Q7. 객체 초기화가 제대로 되지 않았을 때 나타나는 대표적인 오류 메시지는 무엇인가요?
A7. "Object variable or With block variable not set"와 같은 오류 메시지가 나타나며, 이는 객체 초기화를 누락했을 때 발생한다.