回答編集履歴
1
シート名を間違えたので修正しました。
test
CHANGED
|
@@ -14,7 +14,7 @@
|
|
|
14
14
|
|
|
15
15
|
を
|
|
16
16
|
|
|
17
|
-
**If wb.Worksheets("
|
|
17
|
+
**If wb.Worksheets("商品名A").Range("AD28").MergeArea(1, 1).Value = "有り" Then**
|
|
18
18
|
|
|
19
19
|
にした所、正しく動作するようになりました。
|
|
20
20
|
|