Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

60929 / 76732

←次へ　｜　前へ→


	【20430】ユーザーフォームのラベルについて

コバ - 04/12/9(木) 0:15 -


	引用なし

	パスワード

Excel97にて、一点質問があります。
どなたか解決方法をご存知の方はご教授下さい。
よろしくお願い致します。

今回、行いたい処理は以下の通りです。
前提状況：「UserForm」上に「CommandButton」と「Label」の２つがあります。
処理内容：「CommandButton」をクリックすると、「Label」を『上書き中』と表示し、Bookの上書き保存を行い、「UserForm」を閉じます。
以上の条件を満たすコードを作成しているのですが、Bookの上書き保存前に「Label」に『上書き中』と表示されません。（下記コード参照）
＊Msgboxのコメント文を外すと、「Label」に『上書き中』と表示されます。謎です。

Private Sub CommandButton_Click()

Label = "上書き中"
'MsgBox "上書きします。"
ActiveWorkbook.Save
UserForm.Hide

End Sub

0 hits

▼

【20430】ユーザーフォームのラベルについて コバ 04/12/9(木) 0:15

≪