HOME > Q&A > Excel （VBA）

Excel （VBA）
Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 11全般 : Microsoft 365)
自動作成したファイルの名前を品番にしたい
投稿日時: 23/09/07 15:15:32
投稿者: YU0001

VBA初心者です。
ネット検索でVBAをコピペして
リストをもとに大量の申請書を自動作成をできるようにしたのですが、
ファイル名を品番にしたいです。
 
リスト
A1セル（コード）例123
A2セル（品番）例55555
 
今自動化してできたファイル名が
12355555.xlsxという名前になっています。
それを
55555.xlsxにしたいです。
 
コピペしたVBAの
保存に関わる部分はココかなと思うのですが。。。
 
book.SaveAs filename:=folder&"￥"&".xlsx",FileFormat:=xlOpenXMLWorkbook
book.Close
 
初心者で申し訳ありませんが、
教えていただけますか？
 
よろしくお願いします。
 
回答
投稿日時: 23/09/07 15:43:26
投稿者: higejee

YU0001 さんの引用:
保存に関わる部分はココかなと思うのですが。。。
 
book.SaveAs filename:=folder&"￥"&".xlsx",FileFormat:=xlOpenXMLWorkbook

　保存してるのはそこですが、つまり folder という変数に（名前が folder なのでたぶんもともとはフォルダのパスが格納されていて、そこに）A1、A2 をまとめて結合している箇所があるはずなので、そこで A2 だけ結合するようにすればよいかと。
投稿日時: 23/09/07 16:03:05
投稿者: YU0001

higejee さんの引用:
YU0001 さんの引用:
保存に関わる部分はココかなと思うのですが。。。
 
book.SaveAs filename:=folder&"￥"&".xlsx",FileFormat:=xlOpenXMLWorkbook

　保存してるのはそこですが、つまり folder という変数に（名前が folder なのでたぶんもともとはフォルダのパスが格納されていて、そこに）A1、A2 をまとめて結合している箇所があるはずなので、そこで A2 だけ結合するようにすればよいかと。

＝＝＝
 
ありがとうございます。
 
filename=というところが別にありました。
確かにセル1＆2　的な文を見つけて、削除したら品番のみのファイル名になりました。
ありがとうございました。