Word(ワード)総合相談所 Part23 [無断転載禁止]©2ch.net

[0351 名無しさん＠そうだ選挙にいこう 2018/12/06(木) 17:45:23.47]

>>350
Dim savefilename As String
savefilename = CreateObject("Scripting.FileSystemObject").GetBaseName(ThisWorkbook.Name) & ".html"