Excel VBA質問箱 IV

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

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


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

58483 / 76732

←次へ　｜　前へ→


	【22976】ユーザーフォームについて教えて下さい

VBAルーキー - 05/3/9(水) 11:06 -


	引用なし

	パスワード

ユーザーフォームで「ＯＫ」をクリックすると「文字色クリア」を実行し、
「ＣＡＮＣＥＬ」をクリックするとそのまま終了させたいのですが…

内容は以下の通りです。
簡単な内容で申し訳ないのですが教えて下さい。

'【クリア確認】

　　クリア確認.Show
　　　　　　　　　　
　　　If クリア確認.CommandButton1 = True Then　　　
　　　　GoTo 文字色クリア　　　
　　　Else　　　
　　　　GoTo クリアせずに終了　　　　　　　　　　　　　　　
　　　End If

'【文字色クリア】

文字色クリア：

　　工事概要.Cells(2, 7).Font.FontStyle = "標準"
　　工事概要.Cells(2, 7).Font.ColorIndex = 1
　　工事概要.Cells(2, 7).Interior.ColorIndex = 2

クリアせずに終了：

End　Sub

ユーザーフォームの方は…

Private Sub CommandButton1_Click()
　Commandbutton1 = True
　Unload クリア確認
End Sub

Private Sub CommandButton2_Click()
　Commandbutton2 = False
　Unload クリア確認
End Sub

3 hits

▼

【22976】ユーザーフォームについて教えて下さい VBAルーキー 05/3/9(水) 11:06

≪