Access (的 Form.SelWidth 屬性)

使用 SelWidth 屬性可指定或決定目前選取範圍矩形中) (欄位的選取資料行數目。 讀取/寫入的 Long。

語法

運算式。SelWidth

expression 代表 Form 物件的變數。

註解

如果沒有選取範圍，此屬性傳回的值將是零。 將屬性的值設定為 0，會從資料工作表或表單中移除選取範圍。

如果您已經選取一個或多個記錄中資料工作表 (使用記錄選取器)，就無法變更 SelWidth 屬性 (除非將它設定為 0) 的設定。

使用這些屬性搭配 SelTop 和 SelLeft 屬性來指定或決定資料工作表上選取範圍矩形的實際位置。 如果沒有選取範圍， SelTop 和 SelLeft 屬性會傳回具有焦點之儲存格的列號和欄號。

SelHeight 和 SelWidth 屬性包含選取範圍矩形的右下角的位置。

SelTop 和 SelLeft 屬性值會判斷選取範圍矩形的左上角。

範例

下列範例示範如何使用 SelHeight、 SelWidth、 SelTop和 SelLeft 屬性來判斷選取範圍矩形在資料工作表檢視中的位置和大小。 SetHeightWidth程式會將目前選取範圍矩形的高度和寬度指派給變數 lngNumRows 、 lngNumColumns 、 lngTopRow 和 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 支援與意見反應。