ActiveX電子表格MS訪問

Question

我想請你的幫助。

我想建立一個表單，用戶將有選擇在表單電子表格上粘貼數據後，我想通過VBA恢復數據，將其插入到表格中。

我該如何使用Active X電子表格？ 我怎麼能知道單元格A1上的值是多少？

請幫幫我。

Answer 1

Set mySht = Me.Spreadsheet 

隨着mySht 隨着.ActiveWindow.ActiveSheet lastColumn = .UsedRange.Columns（mySht.ActiveWindow.ActiveSheet.UsedRange.Columns.Count）.COLUMN LASTROW = .Range（ 「A」 & mySht.ActiveWindow .ActiveSheet.Rows.Count）.END（xlUp）.Row 結束隨着 結束隨着

MSGBOX 「表漁政，線=」 & LASTROW & 「列=」 & lastColumn

使用ReDim LINEA（lastColumn）

對於i = 1到LASTROW 對於j = 1到lastColumn

mySht.Cells(i, j) 'something with the cell (i, j) 
Next ' end line 

下一頁 '未來 線' 處置 設置mySht =無

Answer 2

您可以參考對象在綁定或綁定控件：

Private Sub Command3_Click() 
    Set obj = Me.OLEUnbound0.Object 
    MsgBox obj.ActiveSheet.[a1] 
End Sub 

我認爲它會更容易只得到用戶給你的Excel工作表中的數據的名稱。我懷疑這種方法會涉及相當多的培訓。