エクセルでマクロを使ってCSV保存時のファイル名
初めてエクセルでマクロ(マクロの記録と言うのを使って)をトライしている初心者です。自分なりに色々調べて見ましたが、イマイチ分からないので以下2つ教えて頂けないでしょうか？
他のアプリに取込む為、通常使っているエクセルのデータをCSV形式で保存するまでをマクロで作成しマクロボタンまでを作ることは出来ました。それを使いたいと言う同僚が何人かいて、その人にエクセルを渡す場合についてです。
(1)CSV保存するファイル名を、各人好みの元々のエクセルのファイル名にしたい。
(2)保存する場所を、同僚各自のデスクトップにしたい。または各自に指定して保存させたい。
のですが、私が記録したマクロの保存該当部分は以下と思いますが、自分用なので、自分のPCの名前(以下、XXXX部分)になっていて、かつ自分が指定した毎回同じファイル名(以下、AAAA部分)になっているのが問題で、同僚のPCではマクロが実行できませんでした。
この、XXXXとAAAAやその前後の言葉をマクロの修正(VBAで)で書き換えればいいのでしょうか？その場合どのようにすればいいか教えてください。
ChDir "C:\Users\XXXX\Desktop"
ActiveWorkbook.SaveAs Filename:= _
"C:\Users\XXXX\Desktop\AAAA.csv", FileFormat:=xlCSV, _
CreateBackup:=False
End Sub
長くなりましたが、どうぞ宜しくお願い致します。
お礼
ありがとうございました。 フリーソフトの検索文字を上手く引き出せませんでした。