Vba를 사용하여 파일을 이동하는 방법(예제 포함)
VBA에서 MoveFile 메서드를 사용하여 한 폴더에서 다른 폴더로 파일을 이동할 수 있습니다.
실제로 이 방법을 사용하는 일반적인 방법은 다음과 같습니다.
Sub MoveMyFile()
Dim FSO As New FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
'specify source file and destination file
SourceFile = "C:\Users\bob\Desktop\Some_Data_1\soccer_data.txt"
DestFile = "C:\Users\bob\Desktop\Some_Data_2\soccer_data.txt"
'move file
FSO.MoveFile Source:=SourceFile, Destination:=DestFile
End Sub
이 특정 매크로는 Soccer_data.txt 라는 파일을 Some_Data_1 이라는 폴더에서 Some_Data_2 라는 폴더로 이동합니다.
다음 예에서는 실제로 이 구문을 사용하는 방법을 보여줍니다.
예: VBA를 사용하여 파일을 이동하는 방법
데스크탑의 Some_Data_1 폴더에 football_data.txt 라는 텍스트 파일이 있다고 가정해 보겠습니다.
이제 VBA를 사용하여 이 텍스트 파일을 현재 두 개의 텍스트 파일이 포함된 데스크톱의 Some_Data_2 라는 다른 폴더로 이동한다고 가정해 보겠습니다.
VBA를 사용하여 이 파일을 이동하기 전에 먼저 VB 편집기에서 Microsoft Scripting Runtime을 활성화해야 합니다.
이렇게 하려면 VB 편집기를 열고 도구 , 참조를 차례로 클릭합니다.
나타나는 새 창에서 Microsoft Scripting Runtime이 보일 때까지 아래로 스크롤하고 옆에 있는 확인란을 선택합니다. 그런 다음 확인을 클릭합니다.
그런 다음 다음 매크로를 만들어 파일을 이동할 수 있습니다.
Sub MoveMyFile()
Dim FSO As New FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
'specify source file and destination file
SourceFile = "C:\Users\bob\Desktop\Some_Data_1\soccer_data.txt"
DestFile = "C:\Users\bob\Desktop\Some_Data_2\soccer_data.txt"
'move file
FSO.MoveFile Source:=SourceFile, Destination:=DestFile
End Sub
이 매크로가 실행되면 Soccer_data.txt 라는 파일이 Some_Data_1 폴더에서 Some_Data_2 폴더로 이동됩니다.
한 폴더에서 다른 폴더로 모든 파일을 이동하려면 다음 구문을 사용할 수 있습니다.
Sub MoveMyFile()
Dim FSO As New FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
'specify source and destination folders
SourceFile = "C:\Users\bob\Desktop\Some_Data_1\*"
DestFile = "C:\Users\bob\Desktop\Some_Data_2\"
'move all files from source folder to destination folder
FSO.MoveFile Source:=SourceFile, Destination:=DestFile
End Sub
이 특정 매크로는 Some_Data_1 폴더의 모든 파일을 Some_Data_2 폴더로 이동합니다.
참고 : MoveFile 메소드에 대한 전체 문서는 여기에서 찾을 수 있습니다.
추가 리소스
다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.
VBA를 사용하여 폴더를 만드는 방법
VBA를 사용하여 폴더를 삭제하는 방법
VBA를 사용하여 파일을 삭제하는 방법