名前を付けて保存の作り方？ (ID:104633)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 プログラム上の命令（SaveDataとSaveFileName） SaveFileName = .FileName SaveData (SaveFileName) ユーザ定義関数と変数ではないでしょうか？ その為エラーが発生するものと思われます。 例： On Error GoTo Err_Cancel: CommonDialog1.CancelError = True CommonDialog1.Flags = cdlOFNOverwritePrompt + cdlOFNHideReadOnly CommonDialog1.Filter = "ビットマップファイル (*.bmp)|*.bmp" CommonDialog1.ShowSave '[ファィル名をつけて保存]ダイアログボックスを表示 SavePicture Picture1.Image, CommonDialog1.FileName 'フォームに画像をつけてから使用 Exit Sub Err_Cancel: Exit Sub