엑셀파일을 TSV(텍스트 탭분리) utf-8로 저장하는 방법 질문있습니다!

아래 소스코드는 제가 작성한 엑셀파일을 TSV(텍스트 탭분리)로 저장하는 코드입니다.

다만 utf-8로 변환하기가 어려워 질문드립니다.

Private Sub 저장_Click()

Dim newName As String
Dim rngUsed As Range

newName = ThisWorkbook.Path & "\" & "woojunggigi.txt"

If Dir(newName, vbDirectory) = Empty Then

Set rngUsed = Sheets("EP File").Range("A1:AY100001")

Workbooks.Add
rngUsed.Copy ActiveWorkbook.Sheets("Sheet1").Range("A1:AY100001")
Sheets("Sheet1").Name = "woojunggigi"
ActiveWorkbook.SaveAs fileName:=newName, FileFormat:=xlText, CreateBackup:=False
ActiveWorkbook.Close
Else
MsgBox newName & " 파일은 존재하므로 확인해보세요"
End If

End Sub