回答編集履歴

1

追記

2017/09/26 05:53

投稿

King_of_Flies
King_of_Flies

スコア382

test CHANGED
@@ -3,3 +3,9 @@
3
3
  Cells(i, 3).Value = CDate("20" + bar)の一行を
4
4
 
5
5
  If分岐の中で処理させようと思います。
6
+
7
+
8
+
9
+ 追記
10
+
11
+ コーディングについてのアドバイスは引き続き受け付けます。