| |
テキストボックスに数字を入力するとエクセルファイルに数字を入力させる方法を教えて頂きたいのですが・・・
まずは別のボタンで下記の既存ファイルを開きました。
Dim xlApp As New Excel.Application
Dim xlBooks As Excel.Workbooks = xlApp.Workbooks
Dim xlFilePath As String = "C:\TEST.xls"
Dim xlBook As Excel.Workbook = xlBooks.Open(xlFilePath)
Dim xlSheets As Excel.Sheets = xlBook.Worksheets
Dim xlSheet As Excel.Worksheet = xlSheets.Item(1)
xlApp.Visible = True
その後、『textbox1_1』に入力された数字をこの"TEST.xls"のSheet名"testing"のセル"A1"に入力させたいのですが・・・
Private Sub TextBox1_1_TextChanged() Handles TextBox1_1.TextChanged
※この部分のが解からないのです・・・
End Sub
宜しくお願い致します。
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
