2012-10-25 4 views
0

특정 셀에서 시작하는 열의 모든 셀에 대해 드롭 다운 목록을 만들려고합니다. 다음은 내가 제작 한 것입니다 :다음 VBA 매크로가 실패하는 이유를 알아낼 수 없습니다.

Run-time error '1004': 

Application-defined or object-defined error 

I 돈 :이 코드를 실행하면

.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ 
      xlBetween, Formula:=dvList 

, 나는 점점 계속 :이 라인에 문제가 오전

Public Sub Dropdown() 
    Dim dvList As String 

    dvList = "Option1, Option2, Option3" 

    With ActiveSheet.Range("C25").Resize(50, 1).Validation 
     .Delete 
     .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ 
     xlBetween, Formula:=dvList 
     .IgnoreBlank = True 
     .InCellDropdown = True 
     .InputTitle = "" 
     .ErrorTitle = "" 
     .InputMessage = "" 
     .ErrorMessage = "" 
     .ShowInput = True 
     .ShowError = True 
    End With 
End Sub 

왜 이런 일이 일어나는 지 알지 못한다. 이것이 그 일을하는 방법 인 것처럼 보일 것이다. 누군가 내 오류를 지적하시기 바랍니다 수 있습니까?

답변

3

Formula1:=dvList

+1

+1로 변경해보십시오. [MSDN 참조.] (http://msdn.microsoft.com/en-us/library/office/ff837441.aspx) 또한 Validation.Formula 속성이 없음을 알 수 있습니다. –

관련 문제