2014-03-13 6 views
0

통합 문서를 저장하고 닫고 다시 열되지 않은 경우, 나는 다음과 같은 오류를 얻을VBA - 범위 : "런타임 오류 '91'

"런타임 오류 '91': Object 변수 또는 블록이 설정되지 않음 "

다른 위치에 동일한 코드 (문자열의 이름 만 다름)가 있고 때로는 닫기를 저장하고 다시 열어 다시 실행할 때까지 동일한 오류가 발생합니다. 그 후 코드가 원활하게 실행됩니다.

버그를 피하시오? 전에이 문제가 있었나요? x의 값이 발견되지 않는 경우는 당신이 그것을 확인해야합니다 있도록

Dim fal As Excel.Worksheet 
Set fal = wb.Sheets("Falancs") 

Dim x As String 
x = "F_1 =" 

Dim cc As Integer ' The column as an integer (cc = 1,2,3...) 
cc = fal.UsedRange.Find(x).Column 

오류,

+0

'wb '는 무엇을 의미합니까? – Kapol

+0

'x'값이 발견되지 않으면 대소 문자를 체크해야합니다 : 1)'Dim res as Range' 2)'set res = fal.UsedRange.Find (x)'3)'Not res is Nothing then cc = res.Column' –

+0

그것은 "ThisWorkbook" – Trenera

답변

1

.Find 반환 Nothing ... (가) "(X)"입니다 마지막 줄에 있습니다 :

Dim fal As Excel.Worksheet 
Set fal = wb.Sheets("Falancs") 

Dim x As String 
x = "F_1 =" 

Dim cc As Integer ' The column as an integer (cc = 1,2,3...) 
Dim res As Range 

Set res = fal.UsedRange.Find(x) 
If Not res Is Nothing Then 
    cc = res.Column 
Else 
    MsgBox "Value " & x & " not found" 
    Exit Sub 
End If 
+1

을 다시 한번 언급합니다 - 감사합니다 !!! 5 분 안에 받아 들일 것입니다. – Trenera

+0

당신은 환영합니다 :) –