分享方式:


Form.SelLeft 屬性 (存取)

使用 SelLeft 屬性來指定或判斷目前選取矩形中最左邊 (欄位) 資料行。 讀取/寫入的 Long

語法

表達。左翼

expression 代表 Form 物件的變數。

註解

SelLeft 屬性會傳回介於 2 和資料工作表中資料行數目之間的值 + 1, (Access 會從 0) 開始計算。 前兩欄一律是子資料表的記錄選取器欄和展開/摺疊指標欄。

如果沒有選取範圍,則屬性傳回的值是具有焦點之儲存格的列和欄。 如果您已選取資料工作表一個或一個以上的記錄 (使用記錄選取器),則您不能變更 SelLeft 屬性。

將這些屬性與 SelHeightSelWidth 屬性搭配使用,以指定或判斷選取矩形的實際大小。

SelTopSelLeft 屬性判斷選取範圍矩形的左上角的位置。

SelHeightSelWidth 屬性判斷選取範圍矩形的右下角。

範例

下列範例示範如何使用 SelHeightSelWidthSelTopSelLeft 屬性來判斷 [資料工作表] 檢視中選取矩形的位置和大小。 SetHeightWidth 程序會將目前選取矩形的高度和寬度指派給變數 lngNumRowslngNumColumnslngTopRow和 ,lngLeftColumn並在訊息方塊中顯示這些值。

Public Sub SetHeightWidth(ByRef frm As Form) 
 
 Dim lngNumRows As Long 
 Dim lngNumColumns As Long 
 Dim lngTopRow As Long 
 Dim lngLeftColumn As Long 
 Dim strMsg As String 
 
 ' Form is in Datasheet view. 
 If frm.CurrentView = 2 Then 
 
 ' Number of rows selected. 
 lngNumRows = frm.SelHeight 
 
 ' Number of columns selected. 
 lngNumColumns = frm.SelWidth 
 
 ' Topmost row selected. 
 lngTopRow = frm.SelTop 
 
 ' Leftmost column selected. 
 lngLeftColumn = frm.SelLeft 
 
 ' Display message. 
 strMsg = "Number of rows: " & lngNumRows & vbCrLf 
 strMsg = strMsg & "Number of columns: " _ 
 & lngNumColumns & vbCrLf 
 strMsg = strMsg & "Top row: " & lngTopRow & vbCrLf 
 strMsg = strMsg & "Left column: " & lngLeftColumn 
 MsgBox strMsg, vbInformation 
 End If 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應