2017-10-20 2 views
0

Excel 1016에서 잘 작동하는 스크립트가 있습니다. Excel 시트에 따라 파일 이름을 바꾸거나 번호 매기기에 사용합니다.Excel VBA로 파일 이름 바꾸기 - GrantAccessToMultipleFiles

하지만 Mac에서는 각 파일에 대한 액세스 권한을 확인해야합니다. 번호가 매겨진 파일이 3000 개가 넘기 때문에 불가능합니다. Macs sandboxing과 관련이 있습니다. GrantAccessToMultipleFiles가 키워드입니다. 누군가이 스크립트를 완료하는 데 도움이 될 수 있습니까? 이름을 바꾸는 모든 파일을 확인하지 않아도됩니까?

sub Test() 
iPath = "c:temp" 
lr = cells(rows.count, "A").end(xlup).row 
for i = 1 to lr 
    name iPath & cells(i,"A") as iPath & Format(i, "0###") & " " & cells(i,"A") 
next i 
end sub 

답변