本文介紹一下,VBE中如何使用RefEdit對象來實現一個些簡單的引用操作。
上圖為引用示例,實現了對一些數據的乘法運算,當然了,通過代碼可以實現任意想要的計算過程。
整體效果如下圖所示:
創(chuàng)建三個RefEdit對象,分別引用3列數據單元格。
前2列為計算數據,后一列為結果位置。很好理解,通過一列表來顯示計算結果。
下圖為面向對象編輯RefEdit對象的屬性設置面板,通過下面的屬性設置,可以實現其相應的外觀以及功能屬性等。
相對都比較簡單。
本示例,通過RefEdit引用單元格地址,來進行單元格內數據進行計算操作。
也就是RefEdit的Value值,它是個體字符串。
具體可參考下面代碼進一步理解。
代碼:
Private Sub CommandButton1_Click()
Dim R1 As String, R2 As String, R3 As String
R1 = Me.RefEdit1.Value
R2 = Me.RefEdit2.Value
R3 = Me.RefEdit3.Value
Dim R As Range, xR As Range, yR As Range
Dim i As Integer
Set R = Range(R1)
Set xR = Range(R2)
Set yR = Range(R3)
For i = 1 To R.Count
With yR.Item(i)
.Value = R.Item(i) * xR.Item(i)
End With
Next i
End Sub
RefEdit屬性看上去較多,但和TextBox,ComboBox等對象的屬性相差無幾,可以參考學習一下。
歡迎關注、收藏
—END—
]]>