ブックを上書き保存する Sub WorkbookSave() Dim Response As Integer Response = MsgBox("Do you save this " & ActiveWorkbook.FullName & "?", vbYesNo + vbQuestion, "check") If Response = vbYes Then ActiveWorkbook.Save End If End Sub ▼Rangeオブ…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。