Excel VBA質問箱 IV

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

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


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

45267 / 76732

←次へ　｜　前へ→


	【36466】Re:誰か教えてくださいUserformの開き方

K - 06/3/31(金) 18:59 -


	引用なし

	パスワード

▼初心者Ａさん：

KeinさんそしてJakaさんのコードで上手く動きますが。
何かが災いしているのかな？

もし貴方のコードを使うなら…
Sub UFO1()
If Cells(1, 1).Value = 10 Or Cells(1, 1).Value = 20 Then
　 UserForm1.Show
End If
If Cells(2, 1) = 10 Or Cells(2, 1) = 20 Then
　 UserForm1.Show
End If
If Cells(3, 1) = 10 Or Cells(3, 1) = 20 Then
　 UserForm1.Show
End If
End Sub

1 hits

▼

【36417】誰か教えてくださいUserformの開き方 初心者A 06/3/30(木) 17:48