VBA 런타임 오류 1004

Question

VBA에 조금 익숙하며 해결할 수없는 런타임 오류가 발생합니다. 응용 프로그램 정의 또는 개체 정의 오류 : 나는

Dim vRange As Range 
Sheets("Vert E").Cells.FormatConditions.Delete 
With Sheets("Vert E") 
    Set vRange = .Range(.Cells(2, 2)) 
End With 

vRange.Select 

마지막 줄, vRange.Select은 런타임 오류 '1004'라는 오류를 던지고 다음 코드를 가지고있다. 어떤 아이디어?

Answer 1

몇 가지 :

1)) (.Cells 주위에 2,2를 .Range (_)를 제거합니다 : 그것은 불필요

2) 더

세까지로 이동) Range.Select는 Range의 워크 시트가 활성 시트 인 경우에만 사용할 수 있습니다. 그래서 그것을 확인하기 위해 vRange.Select 위와 같은 .Activate를 추가하고 End With를 vRange.Select 아래로 이동하십시오.

처럼 :

Dim vRange As Range 
With Sheets("Vert E") 
    .Cells.FormatConditions.Delete 
    Set vRange = .Cells(2, 2) 
    .Activate 
    vRange.Select 
End With 

희망

Answer 2

짧은 및 일의 깔끔한 방법을하는 데 도움이

Dim vRange As Range 
Dim ws as Worksheet 
Set ws = Sheets("Vert E") 
ws.Cells.FormatConditions.Delete 
Set vRange = ws.Cells(2, 2) 
ws.Activate 
vRange.Select 

참고 : avoid using Select

업데이트 :

는

VBE에서

vRange.Interior.Color = RGB(200, 100, 50) 

단지 vRange.Interior.를 입력하고 당신에게 도움이해야되는 VBE 인텔리의 활용이

예를 아래에

셀의 색상을 변경 사용 선택하지 않고 셀에 일부 서식을 적용하려면 내부 클래스의 사용 가능한 속성을 나열하여.

셀에 서식을 적용하는 가장 좋은 방법은 recording a macro 동안 코드를 편집 한 다음 VBE에서 코드를 편집하는 것입니다.