SaveAs
메서드를 사용하여 올바른 매개 변수를 전달해야합니다. 자세한 내용은 this
링크를 확인하십시오.
여기 는 당신이 시도 할 수있는 작업 코드 :
file = "File path with file name"
newfile = "File path with new file name"
Set ExcelObj = createobject("excel.application")
ExcelObj.Visible = true
Set ExcelFile = ExcelObj.Workbooks.Open (file)
Set ScripSheet = ExcelFile.Worksheets("Scripts")
ScripSheet.Cells(1,1) = "Passed"
ExcelFile.SaveAs newfile, , "test"
ExcelFile.Close
ExcelObj.Quit
UPDATE OP
의견 당
당신이 ReadOnly
으로 파일을 저장하려면, 당신은 WriteResPassword
을 사용해야합니다 매개 변수는 다음과 같습니다.
ExcelFile.SaveAs newfile, , , "test"
나는 각각
FileFormat
및
Password
에 대한 두 개의 빈 매개 변수를했습니다
참고.
이렇게하면 쓰기 모드에서 파일을 열 때 암호를 묻습니다. 암호를 입력하지 않으면 ReadOnly
모드로 파일이 열립니다.
내가 언급 한 링크를 확인하십시오.
이제 암호를 보려면 암호가 필요합니다. 누구든지 암호없이 파일을 볼 수 있습니다. 암호는 파일을 편집하려고 할 때만 필요합니다. 우리가 할 수 있을까요? 미안하지만 내 게시물에 분명하지 않은 경우. – bugfinder
** Google에서 ** 수정 작업을 위해 잠긴 ** 워크 시트 **를 검색하면 많은 답변을 얻게됩니다. – ManishChristian
UFT를 사용하여이 작업을 수행해야합니다. 나는 수색했다. UFT를 사용하여 솔루션을 제공하지 않습니다. 수동으로 수행하는 방법을 제공합니다. – bugfinder