回答編集履歴

1

コード修正

2021/02/20 15:23

投稿

hatena19
hatena19

スコア34073

test CHANGED
@@ -76,7 +76,7 @@
76
76
 
77
77
  Function RemoveDuplicatesBlank(Tbl, r As Long, c1 As Long, c2 As Long) As String
78
78
 
79
- Dim dic As New Micro
79
+ Dim dic As New Dictionary
80
80
 
81
81
  Dim c As Long
82
82