Excel VBA質問箱 IV

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

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


60581 / 76732 ←次へ | 前へ→

【20789】Re:行を隠したい
回答  Kein  - 04/12/19(日) 22:37 -

引用なし
パスワード
   >目的はスクロール
ならば、セルをダブルクリックで一発でスクロールするマクロ。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, _
Cancel As Boolean)
  Cancel = True
  With Application
   If Target.Column = 1 Then
     .Goto Range("A1"), True
   Else
     .GoTo Range("A65536").End(xlUp), True
     ActiveCell.Offset(1).Select
   End If
  End With
End Sub

これをシートモジュールに入れて下さい。
A列のセルをダブルクリックしたときだけ、A1 が選択されます。
その他の列ならA列の最終入力行を先頭にし、次の行を選択して終わります。

0 hits

【20779】行を隠したい あいりあり 04/12/19(日) 19:33 質問
【20780】Re:行を隠したい つん 04/12/19(日) 20:04 回答
【20781】Re:行を隠したい あいりあり 04/12/19(日) 20:17 質問
【20785】Re:行を隠したい [名前なし] 04/12/19(日) 22:01 発言
【20786】Re:行を隠したい あいりあり 04/12/19(日) 22:26 発言
【20788】Re:行を隠したい [名前なし] 04/12/19(日) 22:35 回答
【20790】Re:行を隠したい あいりあり 04/12/19(日) 22:44 お礼
【20793】Re:行を隠したい [名前なし] 04/12/19(日) 22:58 発言
【20807】ウインドウ枠を固定することにしました あいりあり 04/12/20(月) 16:22 お礼
【20789】Re:行を隠したい Kein 04/12/19(日) 22:37 回答
【20792】Re:行を隠したい あいりあり 04/12/19(日) 22:58 お礼
【20787】Re:行を隠したい Kein 04/12/19(日) 22:27 回答
【20791】Re:行を隠したい あいりあり 04/12/19(日) 22:50 お礼

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