Excel VBA質問箱 IV

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

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


75831 / 76732 ←次へ | 前へ→

【5333】Re:再現しないです。
質問  123  - 03/5/7(水) 10:47 -

引用なし
パスワード
   ▼こうさん こんにちわ。

こうさん 早々にありがとうございます。

>エラーになります?こちらで再現しませんでしたが,
>どのようなエラーメッセージでしょうか?

「オブジェクト変数またはWithブロック変数が設定されていません」
というメッセージがでます。

Private Sub Worksheet_Activate()
If Userform1.Visible = True Then
  Unload Userform1
End If
Userform2.Show
End Sub

上記だとディバックで同エラーになってしまいます。

>ただし,UserForm1.Hideの場合もFalseが返りますね...
>無条件に「Unload Userform1」を実行して,「On Error
>Resume Next」で逃げますか?

Worksheet_Activate() がいけないのでしょうか。
いろいろやってみたのですが、おかしいところが
分からない状態なのです。
0 hits

【5325】ユーザーフォームが表示されていなかったら 123 03/5/6(火) 21:28 質問
【5326】再現しないです。 こう@連休無し!! 03/5/6(火) 22:41 回答
【5333】Re:再現しないです。 123 03/5/7(水) 10:47 質問
【5337】ステップ実行で,エラーが発生する行を特定... こう@昼休みも無し!! 03/5/7(水) 12:22 回答
【5341】Re:ステップ実行で,エラーが発生する行を特... 123 03/5/7(水) 13:20 質問
【5343】こっちでも問題なしですが・・・ つん 03/5/7(水) 14:11 発言
【5344】Re:こっちでも問題なしですが・・・ Jaka 03/5/7(水) 14:22 回答
【5352】Re:こっちでも問題なしですが・・・ 123 03/5/7(水) 18:56 お礼
【5351】Re:こっちでも問題なしですが・・・ 123 03/5/7(水) 18:43 質問
【5354】論より証拠ってことで・・・ こう@夜休みも無し!! 03/5/7(水) 20:34 回答
【5355】Re:論より証拠ってことで・・・ 123 03/5/7(水) 21:17 お礼
【5356】Re:論より証拠ってことで・・・ こう@そして夜がふける... 03/5/7(水) 22:02 回答
【5394】再現しました こう 03/5/9(金) 19:10 質問

75831 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free