#125 SelHeight

SelHeight プロパティ

フォームビューまたはデータシートビューにおいて、現在、範囲選択されている行数あるいは範囲選択されているセルの行方向の数を取得・設定します。
1行も範囲選択されていない状態ではこのプロパティ値は「0」が返されます。また「0」に設定することで、範囲選択が取り消されます。
このプロパティは、SelWidthプロパティといっしょに使うことによって、縦横の選択範囲を同時に取得・設定することもできます。

フォーム

Private Sub fraProperty_AfterUpdate()
'[プロパティの設定]オプショングループの更新後処理

  With Me!フォーム125_sub.Form
    Select Case Me!fraProperty
      Case 1
        '3行分のセル範囲を選択
        .SelHeight = 3
      Case 2
        '5行分のセル範囲を選択
        .SelHeight = 5
    End Select
  End With

End Sub


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
'サブフォーム側のキークリック時
'(サブフォームのキーボードイベント取得プロパティを"はい"に設定のこと)

  If KeyCode = vbKeyF3 Then
    'F3キーが押されたら選択行数をメッセージ表示
    MsgBox Me.SelHeight
  End If

End Sub
  • 3行分を範囲選択
  • 5行分を範囲選択
  • 行範囲を選択したあと、F3キーで選択行数を取得
| Index | Prev | Next |

 

Copyright © T'sWare All rights reserved