1 つのテキスト ボックスで Excel シートのデータ全体を読み取りたい。
これは可能ですか?
セルのデータを Excel からテキスト ボックスに読み取るコードを知っています。
PrivateSub Button18_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button18.Click
Dim xlaTest As Excel.Application = CType(CreateObject("Excel.Application"), Excel.Application)
xlaTest.Visible = True
Dim wbkTest As Excel.Workbook = xlaTest.Workbooks.Open("D:\Tests\VBTrials\ExcelTests\TestWorkbook.xls")
Dim wshTest As Excel.Worksheet = DirectCast(wbkTest.Worksheets("Sheet1"), Excel.Worksheet)
TextBox1.Text = wshTest.Range("B2").Value
wbkTest.Close()
xlaTest.Quit()
EndSub