過去ログ

                                Page     458
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼選択したシートが開くとユーザーフォームを表示する  弘二 02/12/16(月) 12:26
   ┣Re:選択したシートが開くとユーザーフォームを表示する  ひで 02/12/16(月) 12:50
   ┣Re:選択したシートが開くとユーザーフォー...  つん 02/12/16(月) 12:50
   ┣Re:選択したシートが開くとユーザーフォームを表示する  Nakamura 02/12/16(月) 12:50
   ┗Re:選択したシートが開くとユーザーフォームを表示する  Nakamura 02/12/16(月) 12:52
      ┗Re:選択したシートが開くとユーザーフォームを表示する  ひで 02/12/16(月) 12:54

 ───────────────────────────────────────
 ■題名 : 選択したシートが開くとユーザーフォームを表示する
 ■名前 : 弘二
 ■日付 : 02/12/16(月) 12:26
 -------------------------------------------------------------------------
   1つのブックの中で特定のシートを選択した時、そのシートが開くと同時にユーザーフォームを表示させるには?(コマンドボタン等を使用せずに表示させたい!)
 ───────────────────────────────────────  ■題名 : Re:選択したシートが開くとユーザーフォームを表示する  ■名前 : ひで  ■日付 : 02/12/16(月) 12:50  -------------------------------------------------------------------------
   ▼弘二 さん こんにちは
>1つのブックの中で特定のシートを選択した時、そのシートが開くと同時にユーザーフォームを表示させるには?(コマンドボタン等を使用せずに表示させたい!)

VBA Project の Sheet1(sheet1)に下記コードで良いのでは
と思うのですが、いかがでしょう?

Private Sub Worksheet_Activate()

UserForm1.Show

End Sub
 ───────────────────────────────────────  ■題名 : Re:選択したシートが開くとユーザーフォー...  ■名前 : つん <honey@sweetparty.ne.jp>  ■日付 : 02/12/16(月) 12:50  -------------------------------------------------------------------------
   弘二 さん、こんにちは

>1つのブックの中で特定のシートを選択した時、そのシートが開くと同時にユーザーフォームを表示させるには?(コマンドボタン等を使用せずに表示させたい!)

そのシートの、Activateイベントに、

Private Sub Worksheet_Activate()

  UserForm1.Show

End Sub

とすればいかがでしょう?
 ───────────────────────────────────────  ■題名 : Re:選択したシートが開くとユーザーフォームを表示する  ■名前 : Nakamura  ■日付 : 02/12/16(月) 12:50  -------------------------------------------------------------------------
   ▼弘二 さん:
>1つのブックの中で特定のシートを選択した時、そのシートが開くと同時にユーザーフォームを表示させるには?(コマンドボタン等を使用せずに表示させたい!)

こんにちは

ユーザーフォームをUserForm1として
表示したいシートのシートモジュールに

Private Sub Worksheet_Activate()

  UserForm1.Show

End Sub

とすればシートを選択したときに
ユーザーフォームが表示されます。

それでは
 ───────────────────────────────────────  ■題名 : Re:選択したシートが開くとユーザーフォームを表示する  ■名前 : Nakamura  ■日付 : 02/12/16(月) 12:52  -------------------------------------------------------------------------
   ひでさん、つんさん すいません。
どかぶりました。m(__)m
 ───────────────────────────────────────  ■題名 : Re:選択したシートが開くとユーザーフォームを表示する  ■名前 : ひで  ■日付 : 02/12/16(月) 12:54  -------------------------------------------------------------------------
   ▼Nakamura さん つんさん こんにちは

>ひでさん、つんさん すいません。
>どかぶりました。m(__)m

みなさん同じ時間なので秒の差??(笑)
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 458