回答編集履歴
1
コード修正
answer
CHANGED
|
@@ -10,7 +10,7 @@
|
|
|
10
10
|
ActiveSheet.Copy after:=Workbooks("Test.xlsm").Sheets(1)
|
|
11
11
|
|
|
12
12
|
WIth ActiveSheet.UsedRange
|
|
13
|
-
.Value = Value
|
|
13
|
+
.Value = .Value
|
|
14
14
|
End With
|
|
15
15
|
|
|
16
16
|
End Sub
|