VBA 파일 경로를 넣고 폴더 안 파일명과 경로를 Variant 형으로 Return 하는 함수

이 글을 작성하는 이유는 특정 경로안에 엑셀 파일들이나 사진파일, 텍스트파일 등 여러 개의 파일들이 있다면 파일명과 파일경로를 가져와 Link를 시켜준다거나 할 때 유용할 수 있습니다. 배열로 가져오기 때문에 속도 측면에서도 엄청나게 빠르게 작업을 할 수 있습니다. ​ 해당 파일을 사용할 수 있는 경우 : 서버에 취합 해둔 파일들이 모아져있고, 이 파일들을 모두 하이퍼링크를 걸어야 할 때 : 단순 특정 경로 안의 파일명을 가져오고 싶을 때 Private Sub getFileInfo() Dim strFilePath As String: strFilePath = "C:\WorkSpace\" Dim vs() As Variant vs = get_files(strFilePath) vs = ss(vs) End Sub..

2020.05.28