vbaの別のディレクトリに.xlsxとして保存

Question

SaveAsメソッドを使用して、.csvファイルを.xlsファイルとして保存しようとしています。ただし、フォルダを指定しようとすると失敗します。例えば

、それはいくつかのデフォルトのディレクトリ（マイドキュメント、私はから準備ができているところはありません）ここに保存されます：

Sub csv() 
Workbooks.Open Filename:="directory/tmp.csv" 
ActiveWorkbook.SaveAs Filename:="test.xlxs", FileFormat:=51, CreateBackup:=False 
End Sub 

しかし、これは失敗します。

Sub csv() 
Workbooks.Open Filename:="directory/tmp.csv" 
ActiveWorkbook.SaveAs Filename:="otherdirectory/test.xlxs", FileFormat:=51, CreateBackup:=False 
End Sub 

があります別の方法は、ディレクトリを指定するには？

Answer 1

使用FileFormat:=xlCSV

これは私のために動作します。

ActiveWorkbook.SaveAs Filename:="C:\test.csv", FileFormat:=6, CreateBackup:=False 

疑いで、マクロを記録するたびに:)

FileFormat定数はxlCSVです。あなたはFileFormat:=xlCSVを入力することもできますし、それは私はあなたが質問:)私は再びそれ見ていきましょう:)

を編集したことがわかり6

EDIT

あり、実際の値だ使用することができますどちらか

ディレクトリを指定する別の方法はありますか？おかげで、

あなたが指定している正確なパスとは何ですか？私はFilename:="C:\Users\Siddharth Rout\Desktop\Book1.xlsx"を使用し、それは完全に動作します。

Answer 2

シダースが示唆していることは、パス全体を書き出してディレクトリを指定することです。 ユーザーがディレクトリにファイルを変更することができる持っていると思った場合はまた、あなたが使用することができます保存するときに保存されているに：ファイルパスが開始ディレクトリになり

CHDRIVE（filePathに） ChDir関数（filePathに）

Application.GetSaveAsFilenameで使用するユーザーは、必要に応じて、ファイルの名前を入力するか、ディレクトリを変更することができます。