teratail
回答率
85.48%
質問するログイン新規登録
トップに関する質問作っておいたExcelをvisual studioで読み込んでtextBoxやlabelにセルの内容を表示したいのですがどうすれば良いのかわかりません。

編集履歴

質問編集履歴

4

syuusei

2017/08/06 03:04

投稿

lyra
lyra

スコア8

test CHANGED
File without changes
test CHANGED
@@ -2,7 +2,7 @@
2
2
 
3
3
  ここに質問したいことを詳細に書いてください
4
4
 
5
- visual studioの初心者です。あらかじめ作っておいたExcelをvisual studioで読み込んでtextBoxやlabel(WindowsフォームのC#)にセルの内容を表示したいのですがどうすれば良いのかわかりません。ソースコードを教えてください。
5
+ visual studioの初心者です。あらかじめ作っておいたExcelをvisual studioで読み込んでtextBoxやlabel(Windows visual basic)にセルの内容を表示したいのですがどうすれば良いのかわかりません。ソースコードを教えてください。
6
6
 
7
7
 
8
8
 
@@ -10,7 +10,11 @@
10
10
 
11
11
  ###発生している問題・エラーメッセージ
12
12
 
13
-
13
+ System.Data' は名前空間であり、式としては使用することはできません。
14
+
15
+ 'C1Excel' と class 'C1Excel' が namespace 'WindowsApp2.C1' で競合しています。
16
+
17
+ BC30367 クラス 'XLSheet' には既定のプロパティがないため、インデックス処理を実行できません。
14
18
 
15
19
  ```
16
20
 
@@ -22,127 +26,197 @@
22
26
 
23
27
  ###該当のソースコード
24
28
 
25
- using System;
26
-
27
- using System.Collections.Generic;
28
-
29
- using System.ComponentModel;
30
-
31
- using System.Data;
32
-
33
- using System.Drawing;
34
-
35
- using System.Linq;
36
-
37
- using System.Text;
38
-
39
- using System.Windows.Forms;
40
-
41
- using Microsoft.Office.Interop.Excel;
42
-
43
-
44
-
45
- namespace ExcelHandle
46
-
47
- {
48
-
49
- public partial class Form1 : Form
50
-
51
- {
52
-
53
- public Form1()
54
-
55
- {
56
-
57
- InitializeComponent();
58
-
59
- }
60
-
61
-
62
-
63
- private void label1_Click(object sender, EventArgs e)
64
-
65
- {
66
-
67
-
68
-
69
- }
70
-
71
-
72
-
73
- private void label2_Click(object sender, EventArgs e)
74
-
75
- {
76
-
77
-
78
-
79
- }
80
-
81
-
82
-
83
- private void label3_Click(object sender, EventArgs e)
84
-
85
- {
86
-
87
-
88
-
89
- }
90
-
91
-
92
-
93
- private void label4_Click(object sender, EventArgs e)
94
-
95
- {
96
-
97
-
98
-
99
- }
100
-
101
-
102
-
103
- private void label5_Click(object sender, EventArgs e)
104
-
105
- {
106
-
107
-
108
-
109
- }
110
-
111
-
112
-
113
- private void textBox1_TextChanged(object sender, EventArgs e)
114
-
115
- {
116
-
117
-
118
-
119
- }
120
-
121
-
122
-
123
- private void textBox2_TextChanged(object sender, EventArgs e)
124
-
125
- {
126
-
127
-
128
-
129
- }
130
-
131
-
132
-
133
- private void button1_Click(object sender, EventArgs e)
134
-
135
- {
136
-
137
-
138
-
139
- }
140
-
141
- }
142
-
143
- }
144
-
145
-
29
+ Imports C1Excel
30
+
31
+
32
+
33
+ Public Class Form1
34
+
35
+
36
+
37
+ Private wb As New C1XLBook()
38
+
39
+ Private i As Integer = 0
40
+
41
+
42
+
43
+ Private Sub Label1_Click(sender As Object, e As EventArgs) Handles tv1.Click
44
+
45
+ Dim sheet1 As XLSheet = wb.Sheets("Sheet1")
46
+
47
+ Dim data As String
48
+
49
+
50
+
51
+ Me.ListBox1.Items.Clear()
52
+
53
+ wb.Load("C:\Users\naoya\Book2.xlsx")
54
+
55
+
56
+
57
+ i = 1
58
+
59
+ Do
60
+
61
+ i += 1
62
+
63
+ data = sheet1(i, 0).Value
64
+
65
+ If data <> "" Then
66
+
67
+ Me.ListBox1.Items.Add(data)
68
+
69
+ End If
70
+
71
+ Loop While data <> ""
72
+
73
+
74
+
75
+ End Sub
76
+
77
+
78
+
79
+ Private Function ListBox1() As Object
80
+
81
+ Throw New NotImplementedException()
82
+
83
+ End Function
84
+
85
+
86
+
87
+ Private Sub Label2_Click(sender As Object, e As EventArgs) Handles tv2.Click
88
+
89
+
90
+
91
+
92
+
93
+ Me.ListBox1.Items.Clear()
94
+
95
+ wb.Load("C:\Users\naoya\東海道・山陽新幹線.xlsx")
96
+
97
+
98
+
99
+ i = 1
100
+
101
+ Do
102
+
103
+ i += 1
104
+
105
+ Data = sheet1(i, 0).Value
106
+
107
+ If Data <> "" Then
108
+
109
+ Me.ListBox1.Items.Add(Data)
110
+
111
+ End If
112
+
113
+ Loop While Data <> ""
114
+
115
+
116
+
117
+ End Sub
118
+
119
+
120
+
121
+ Private Function sheet1(i As Integer, v As Integer) As Object
122
+
123
+ Throw New NotImplementedException()
124
+
125
+ End Function
126
+
127
+
128
+
129
+ Private Sub Label3_Click(sender As Object, e As EventArgs) Handles tv3.Click
130
+
131
+
132
+
133
+ End Sub
134
+
135
+
136
+
137
+ Private Sub Label4_Click(sender As Object, e As EventArgs) Handles tv4.Click
138
+
139
+
140
+
141
+ Dim sheet1 As XLSheet = wb.Sheets("Sheet1")
142
+
143
+ Dim data As String
144
+
145
+
146
+
147
+ Me.ListBox1.Items.Clear()
148
+
149
+ wb.Load("C:\Users\naoya\Book2.xlsx")
150
+
151
+
152
+
153
+ i = 1
154
+
155
+ Do
156
+
157
+ i += 1
158
+
159
+ data = sheet1(i, 0).Value
160
+
161
+ If data <> "" Then
162
+
163
+ Me.ListBox1.Items.Add(data)
164
+
165
+ End If
166
+
167
+ Loop While data <> ""
168
+
169
+
170
+
171
+ End Sub
172
+
173
+
174
+
175
+ Private Sub Label5_Click(sender As Object, e As EventArgs) Handles tv5.Click
176
+
177
+
178
+
179
+ End Sub
180
+
181
+
182
+
183
+ Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
184
+
185
+
186
+
187
+
188
+
189
+
190
+
191
+ End Sub
192
+
193
+
194
+
195
+ Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged
196
+
197
+
198
+
199
+ wb.Load("j:\data\winelist.xls")
200
+
201
+
202
+
203
+ End Sub
204
+
205
+
206
+
207
+ Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
208
+
209
+
210
+
211
+ End Sub
212
+
213
+ End Class
214
+
215
+
216
+
217
+ Friend Class XLSheet
218
+
219
+ End Class
146
220
 
147
221
  ###試したこと
148
222
 

3

ソースの追加

2017/08/06 03:04

投稿

lyra
lyra

スコア8

test CHANGED
@@ -1 +1 @@
1
- あらかじめ作っておいたExcelをvisual studioで読み込んでtextBoxやlabel(Windowsフォーム)にセルの内容を表示したいのですがどうすれば良いのかわかりません。
1
+ 作っておいたExcelをvisual studioで読み込んでtextBoxやlabelにセルの内容を表示したいのですがどうすれば良いのかわかりません。
test CHANGED
@@ -2,9 +2,9 @@
2
2
 
3
3
  ここに質問したいことを詳細に書いてください
4
4
 
5
- (例)PHP(CakePHP)で●●なシステムを作っています。
5
+ visual studioの初心者です。あらかじめ作っておいたExcelをvisual studioで読み込んでtextBoxやlabel(WindowsフォームのC#)にセルの内容を表示したいのですがどうすれば良いのかわかりません。ソースコードを教えてください。
6
6
 
7
- ■■な機能を実装中に以下のエラーメッセージが発生しました。
7
+
8
8
 
9
9
 
10
10
 
@@ -22,11 +22,125 @@
22
22
 
23
23
  ###該当のソースコード
24
24
 
25
- ```ここに言語を入力
25
+ using System;
26
26
 
27
- ここにご自身が実行したソースコードを書いてください
27
+ using System.Collections.Generic;
28
28
 
29
+ using System.ComponentModel;
30
+
31
+ using System.Data;
32
+
33
+ using System.Drawing;
34
+
35
+ using System.Linq;
36
+
37
+ using System.Text;
38
+
39
+ using System.Windows.Forms;
40
+
41
+ using Microsoft.Office.Interop.Excel;
42
+
43
+
44
+
45
+ namespace ExcelHandle
46
+
29
- ```
47
+ {
48
+
49
+ public partial class Form1 : Form
50
+
51
+ {
52
+
53
+ public Form1()
54
+
55
+ {
56
+
57
+ InitializeComponent();
58
+
59
+ }
60
+
61
+
62
+
63
+ private void label1_Click(object sender, EventArgs e)
64
+
65
+ {
66
+
67
+
68
+
69
+ }
70
+
71
+
72
+
73
+ private void label2_Click(object sender, EventArgs e)
74
+
75
+ {
76
+
77
+
78
+
79
+ }
80
+
81
+
82
+
83
+ private void label3_Click(object sender, EventArgs e)
84
+
85
+ {
86
+
87
+
88
+
89
+ }
90
+
91
+
92
+
93
+ private void label4_Click(object sender, EventArgs e)
94
+
95
+ {
96
+
97
+
98
+
99
+ }
100
+
101
+
102
+
103
+ private void label5_Click(object sender, EventArgs e)
104
+
105
+ {
106
+
107
+
108
+
109
+ }
110
+
111
+
112
+
113
+ private void textBox1_TextChanged(object sender, EventArgs e)
114
+
115
+ {
116
+
117
+
118
+
119
+ }
120
+
121
+
122
+
123
+ private void textBox2_TextChanged(object sender, EventArgs e)
124
+
125
+ {
126
+
127
+
128
+
129
+ }
130
+
131
+
132
+
133
+ private void button1_Click(object sender, EventArgs e)
134
+
135
+ {
136
+
137
+
138
+
139
+ }
140
+
141
+ }
142
+
143
+ }
30
144
 
31
145
 
32
146
 

2

変更

2017/08/03 11:27

投稿

lyra
lyra

スコア8

test CHANGED
@@ -1 +1 @@
1
- visual studioであらかじめ作っておいたExcelを読み込んでtextBoxやlabelにセルの内容を表示したいのですがどうすれば良いのかわかりません。ソースコードを教えてください。
1
+ あらかじめ作っておいたExcelをvisual studioで読み込んでtextBoxやlabel(Windowsフォーム)にセルの内容を表示したいのですがどうすれば良いのかわかりません。
test CHANGED
File without changes

1

あ

2017/08/02 22:43

投稿

lyra
lyra

スコア8

test CHANGED
File without changes
test CHANGED
File without changes