|
アドバイスありがとうございました。
ただ「マクロの記録」で色々試してみたのですが、
下記の点がわかりません。
すいませんが、宜しくお願いします。
・ファイル名1
CSVファイルはブック名+時間で表示したいため、
Thisworkbook.Name + Date と書き換えてみたのですが、エラーになってしまいました。
・マクロの記録だとCSVで保存した際に
一度CSVファイルになってしまうため、CSV対象になったsheet2をブック名から
「sheet2」に書き直して、またexcel保存になってしまうため、
ファイルの上書きのメッセージが出てしまいます。
この点をなくしたいのと
この方法だとexcel保存時にはファイル名がThisworkbook.Nameだと日付も
ついてしまったものになってしまうため、困まります。
色々とわからない点があるので宜しくお願いします。
Sub Macro1()
Sheets("Sheet2").Select
ActiveWorkbook.SaveAs Filename:= _
ファイル名1, FileFormat:=xlCSV, _
CreateBackup:=False
Sheets("B").Select
Sheets("B").Name = "Sheet2"
Sheets("Sheet1").Select
ActiveWorkbook.SaveAs Filename:= _
ファイル名2, FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub
|
|