2017-03-16 1 views
3
매크로

없이 엑셀 통합 문서의 복사본을 저장 :이 아닌 매크로를 사용할 수있는 통합 문서의 현재 통합 문서를 저장나는 다음과 같은 코드를 포함 매크로 엑셀 2010 템플릿 파일이

ActiveWorkbook.SaveAs Filename:= _ 
    newname, FileFormat:= _ 
    51, CreateBackup:=False 

을하지만, 나는 분명히 필요한 나머지 매크로는 실행할 수 없습니다.

나는

ActiveWorkbook.SaveCopyAs Filename:= _ 
    newname, FileFormat:= _ 
    51, CreateBackup:=False 

이 구문 오류를 얻을 수를 사용하려고 노력했다. 내 목표는 복사본을 새 이름으로 저장하는 것이므로 템플릿 파일은 변경되지 않고 매일 실행할 수 있습니다.

+0

왜 매크로가 필요한 경우 매크로가 아닌 워크 북으로 저장합니까? 그것은 전혀 이해가되지 않습니다. 그리고 SaveAs 실제로 원본 템플릿 파일이 남아있는 사본을 저장하지 않습니다. –

+0

매크로의 다음 부분은 새 통합 문서를 가져 와서 특정 메일 링리스트로 전자 메일로 보냅니다. 매크로가 아닌 통합 문서로 저장하면 해당 부분이 실행되지 않습니다. – mbald23

+0

이렇게하면 작동하지 않습니다. 이를 해결하기 위해 도우미 워크 북이 필요합니다. 매크로가있는 통합 문서 A가 있다고 가정 해 보겠습니다. 이 통합 문서 A는 템플릿 B를 열고 매크로없이 B- 복사본으로 저장 한 다음 B- 복사본을 전자 메일로 보냅니다. 이것은 효과가있다. –

답변

2

이 시도 :

Dim wMacro As Workbook  'workbook you want to save 

    wMacro.Sheets(Array("all sheets name")).Select 
    wMacro.Sheets(Array("all sheets name")).Copy 
    ActiveWorkbook.SaveAs Filename:= "filename.xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False 

이 복사본을 생성하고 저장합니다.

+0

감사합니다. 나는 이것이 효과가 있다고 생각한다! – mbald23

관련 문제