質問: 仕事を効率化するべくVBAユーザーフォーム独学をしている初心者です。
回答: 2カ所変更 1) ReDim myData2(1 To lastRow, 1) ↓ ReDim myData2(1 To lastRow, 0) 2) myData2(cn, 1) = myData(i, 5) ↓ myData2(cn, 0) = myData(i, 5) 配列の文法を復習すべきですね。