Access Tips #244 範囲選択されているレコード数を取得するには？

Access Tips


#244	範囲選択されているレコード数を取得するには？	フォーム、VBA
表形式またはデータシート形式のフォームにおいて、レコードセレクタ上のドラッグによって範囲選択されているレコード数を取得するには、フォームの"SelHeight"プロパティの値を調べます。また同様に、"SelTop"プロパティによって、範囲選択されている一番先頭の行のレコード番号を得ることができます。次の例では、レコードを範囲選択した状態でF4キーを押すことによって、それらの情報をメッセージボックスに表示します。 Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyF4 Then MsgBox "範囲選択されている先頭行は " & Me.SelTop & " です。" & _ vbCrLf & vbCrLf & _ "範囲選択されている行数は" & Me.SelHeight & " 行です。", _ vbOKOnly + vbInformation End If End Sub
\| Index \| Prev \| Next \|