실행 시간 오류 '1004'테이블은 무릎 통해 다른 <strong>대시 보드</strong>로라는 이름의 테이블을 만들기위한 아래의 코드를 사용하여 테이블

Question

임과 지금 내가 해요,

Range(Selection, Selection.End(xlToRight)).Select 
Range(Selection, Selection.End(xlDown)).Select 
ActiveSheet.ListObjects.Add(xlSrcRange, Selection, , xlYes).Name = "Dashboard" 

Range("Dashboard[#All]").Select 
ActiveSheet.ListObjects("Dashboard").TableStyle = "TableStyleLight9 2" 

그러나 어제까지 잘 작동되었다 수 없습니다 점점 런타임 오류 '1004'테이블이 다른 테이블을 오버 랩 할 수 없습니다 오류. 누군가가 내가이 오류가 어떻게

이 문제는 아마 당신 매크로뿐만 방식에 누워하지 않습니다

Answer 1

:) 사전에 감사합니다 해결하는거야 왜 나를 도울 수/엑셀 테이블을 처리합니다. 내 생각 엔 이전에 테이블 (또는 여전히 보이지만 보이지 않는)이 있었고 매크로를 사용하면 다른 테이블의 범위를 덮어 쓰려고했습니다. 동일한 범위를 다루는 (폐기 된) 테이블이 있다면 수식> 이름을 확인하십시오.

또 다른 문제점은 동일한 페이지에 하나의 테이블이 이미 존재하는 (만들려는 테이블의 이름을 하드 코딩했기 때문에) 2 개의 테이블을 만드는 것일 수 있다는 것입니다.

아무 도움이되지 않는다면 다음 코드로 디버깅 해보십시오.

dim vTmp as variant 
for each vTmp in application.ListObjects 
    debug.print vTmp.name, vTmp.range 
next vTmp 

그런 다음 동일한 범위의 테이블을 확인하십시오.