|
▼わさび さん:
こんにちは。
>いたせりつくせりのご回答、本当にありがとうございます。
>早速試してみたのですが、どうしても1箇所だけうまくいきません。
>
>ユーザーフォームからワークシートに切り替える際、
>Ctrl+aを押すと、ユーザーフォームは非アクティブになるのですが、
>ワークシートはアクティブにならず、操作できません。
>その状態でまたCtrl+aを押しても、ユーザーフォームがアクティブになるわけでもなく、
>どちらも機能しないまま、立ち往生状態となってしまいます。
>
>ワークシートがアクティブな状態からユーザーフォームへの切替は大丈夫です。
>
>私なりにいろいろ考えていじってみましたがよくわかりません。
>もし何か思い当たる節がありましたら、ぜひ教えていただければ幸いです。
>よろしくお願い致します。
一箇所訂正です。
Userform1のモジュールに
'================================================================
>Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
> If Shift = 2 And KeyCode = 65 Then
AppActivate Application.Caption
> End If
>End Sub
私のほうでは、
Win98+Excel2000
Win2000+Excel2002で
確認しましたが、これでアクティブ・非アクティブが
正常に作動しています。
(実は、訂正前でも作動するときもあるんですが、
エラーになる場合もあったので・・)
>どちらも機能しないまま、立ち往生状態となってしまいます。
とのことなので心配ですが・・・。
|
|