Save as UTF-8

[shes_ohwsome]

Hi! i Need to save my file with filter setting

Character set to UTF-8 and Field Delimiter to ; (semicolon). Is it possible, here's what I only have so far :/


Sub save()
Dim fName As Variant
fName = Application.GetSaveAsFilename(InitialFileName:="", FileFilter:="Excel Files (*.csv), *.csv", Title:="Save As")
If fName = False Then Exit Sub
ActiveWorkbook.SaveAs Filename:=fName
End Sub

 

[JazzSP8]

Hi

Tis possible, it's a bit more involved than that though, here is a link to another thread that should point you in the right direction;

https://www.mrexcel.com/forum/excel...s-macro-save-excel-file-like-txt-utf-8-a.html

HTH

 

[shes_ohwsome]

thank you i fixed it already