| 
    
     |  | ▼Asaki さん ありがとうございます。 
 >確認ですが、CommandButton1 はユーザーフォーム上にあるのですよね?
 
 そうです。ユーザーフォーム上にCommandButton1はあります。
 
 >うまくいかないとは、何かエラーが出ますか?
 >それとも、処理結果がおかしいですか?
 >指定のシートが表示されないとか、ユーザーフォームが消えないとかでしょうか。
 
 エラー表示はありませんが、ユーザーフォームにある
 CommandButton1をクリックすると、
 CommandButton1のコードが表示されます。
 その後Sheet1(下記の教えて頂いた処理をしました)に
 戻ってSheet1にあるコマンドボタンをクリックすると
 こちらはうまくいきました。
 Sheet1からユーザーフォームに戻ってから、もう一度ユーザーフォーム上にある
 CommandButton1をクリックすると、こんどは
 
 実行時エラー'361':
 このプロジェクトは、ロードまたはアンロードすることはできません。
 
 とエラー表示されます。
 
 >Unload の代わりに
 >Me.Hide
 >ではどうなりますか?
 
 前記の処理はMe.Hideで処理した場合だったのですが、
 Unloadでやりますと、
 つまりユーザーフォームの実行をクリックしてから
 ユーザーフォームの背後にExcelのSheetが背後にあらわれて
 (でもこの状態で、背後に見えているExcelSheetをクリック
 してもアクティブな状態にはなりません)
 ユーザーフォーム上のCommandButton1をクリックしますと
 今度は背後にコードが見えます。
 
 >ユーザーフォームは、どのようにして表示させていますか?
 
 どのように表示されているかというのはどのようにお答えすればいいのか
 よくわからないのですが、ユーザーフォームの実行をしたあと
 ユーザーフォームが前面に、背後にエクセルのシートが見えています。
 この状態でユーザーフォーム上のCommandButton1をクリックすると、
 前記のように、ユーザーフォームのコードに戻ってしまいます。
 
 
 >>Sheet1からユーザーフォームに戻りたい
 >こちらは、Showするだけです。
 >UserForm1.Show
 >など。
 
 前記しましたが、こちらは問題なくできました。
 
 
 |  |