回答編集履歴

1

コード修正

2019/12/13 10:23

投稿

hatena19
hatena19

スコア33768

test CHANGED
@@ -30,7 +30,7 @@
30
30
 
31
31
  varList = rng.Value
32
32
 
33
- Dim r As Long, c As Long, Temp As Variant
33
+ Dim r As Long, c As Long
34
34
 
35
35
  For r = 1 To UBound(varList, 1)
36
36