質問編集履歴
2
入力と出力のイメージを追加しました
test
CHANGED
File without changes
|
test
CHANGED
@@ -17,6 +17,22 @@
|
|
17
17
|
|
18
18
|
|
19
19
|
ファイル保存のコードを追記しました。
|
20
|
+
|
21
|
+
|
22
|
+
|
23
|
+
追記
|
24
|
+
|
25
|
+
![入力1(sheet1)です](d98820e73c7554528569f7737df019e1.png) ![入力2(sheet2)です](f44b4a71e15e7530f1f1bc0e356ceb36.png)
|
26
|
+
|
27
|
+
|
28
|
+
|
29
|
+
![出力したいものです](7d938772a025a7ab131051777b63c66d.png) ![現状出力されているものです](cab45e2a762fdb7fd742b3368e8ab4bf.png)
|
30
|
+
|
31
|
+
|
32
|
+
|
33
|
+
sheet1とsheet2でA列(品名)が一致したらsheet2のC列とD列をsheet1のB列とC列に書込みます。
|
34
|
+
|
35
|
+
|
20
36
|
|
21
37
|
|
22
38
|
|
1
ファイル保存のコード
test
CHANGED
File without changes
|
test
CHANGED
@@ -7,6 +7,16 @@
|
|
7
7
|
データは900行くらいまであるので、最後まで入力されて正常終了になるはずなのですが、必ず同じ行まで入力された状態で、終了してしまいます。
|
8
8
|
|
9
9
|
環境は、VB.NET(Visual Studio v15.7.3)です。
|
10
|
+
|
11
|
+
|
12
|
+
|
13
|
+
追記
|
14
|
+
|
15
|
+
書込みは、sheet2のセルからsheet1のセルへ書込みをしています(書込みとは言わない?(貼り付け?))
|
16
|
+
|
17
|
+
|
18
|
+
|
19
|
+
ファイル保存のコードを追記しました。
|
10
20
|
|
11
21
|
|
12
22
|
|
@@ -54,6 +64,14 @@
|
|
54
64
|
|
55
65
|
Next
|
56
66
|
|
67
|
+
'シート名を変更して保存
|
68
|
+
|
69
|
+
sheet1.Name = "sheet_test"
|
70
|
+
|
71
|
+
対象ファイル.SaveAs("C:\Users\xxxxxxx\TestBook.xlsx")
|
72
|
+
|
73
|
+
|
74
|
+
|
57
75
|
```
|
58
76
|
|
59
77
|
|