Excel VBA質問箱 IV

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

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


11551 / 13645 ツリー ←次へ | 前へ→

【15462】イベントプロシージャについて mkcapella 04/6/25(金) 17:34 質問[未読]
【15467】Re:イベントプロシージャについて IROC 04/6/25(金) 19:29 回答[未読]
【15517】Re:イベントプロシージャについて mkcapella 04/6/28(月) 10:20 質問[未読]
【15520】Re:イベントプロシージャについて IROC 04/6/28(月) 11:08 回答[未読]
【15521】Re:イベントプロシージャについて mkcapella 04/6/28(月) 11:17 お礼[未読]

【15462】イベントプロシージャについて
質問  mkcapella  - 04/6/25(金) 17:34 -

引用なし
パスワード
   識者の皆様 教えていただけますか?

複数のシートがあるエクセルブックがあり、
Sheet3の内容がどこか変更されると
自動でデータの並べ替えをする構文を
書きたいと考えております

イベントプロシジャなるものがあるらしいと
調べたのですが、書き方が分からず困っております

簡単な例文を教えていただけないでしょうか?

【15467】Re:イベントプロシージャについて
回答  IROC  - 04/6/25(金) 19:29 -

引用なし
パスワード
   VBEのシートモジュールを開くと、
コードウィンドウの上にある
コンボボックスで、左側で対象を選択し、
右側でイベントを選択できます。

そのなかに change イベントがあります。


使い方は、変数 target が 変化したセルを表します。

http://t_shun.at.infoseek.co.jp/My_Page/Excel-VBA/vba_page23.htm

【15517】Re:イベントプロシージャについて
質問  mkcapella  - 04/6/28(月) 10:20 -

引用なし
パスワード
   IROCさん 早速のご返答有難うございました
もう一つ質問させて頂いて宜しいですか?

SHEET1〜3がありまして、
SHEET3が非アクティブになった際に
SHEET3のデータを並べ替えする構文を書きたいと思っています。

SHEET2を選択した際に、イベントが処理されるのは
良いのですが、SHEET3がアクティブになってしまいます。
SHEET1か2、どちらが選択されても
SHEET3の並べ替えが正しく行われ、尚且つ選択したSHEETが
アクティブになるようにするためにはどうすればよいでしょうか?
ご教授をよろしくお願いいたします。

Private Sub Worksheet_Deactivate()

  Sheets("SHEET3").Select
  Range("A1").Select
  Selection.Sort Key1:=Range("A2"), Order1:=xlAscendi
  ng, Header:=xlYes

End Sub

【15520】Re:イベントプロシージャについて
回答  IROC  - 04/6/28(月) 11:08 -

引用なし
パスワード
   Sheet3 をSelectしなければ良いと思います。

Private Sub Worksheet_Deactivate()
  Sheets("Sheet3").Range("A1").Sort _
  Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes
End Sub

【15521】Re:イベントプロシージャについて
お礼  mkcapella  - 04/6/28(月) 11:17 -

引用なし
パスワード
   こんな初心者にご返答いただきまして
有難うございました。
助かりました。。

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