VBA初心者です。 たくさんネットで検索しましたが中々問題解決せず 万事休すのためお力をお貸しくださいませ・・・_(:3 」∠)_ <やりたいこと> ① .srtファイルを.txtファイル(UTF-8)に変換して保存します(手動) ② ①のtextファイル内の「必要な項目」のみ、予めExcelで作成した表の「指定のセル」にそれぞれインポート・転記する txtの中身は以下の通りです(例です) 各ブロックの 一行目には≪項番≫ 二行目には≪タイムコード≫ 三行目には≪テロップ一行目≫ テロップが二行ある場合は、 四行目に≪テロップ二行目≫があり、 空白行を挟んで次のブロックとなります。 ブロック数はファイルによって異なります。 また、タイムコードはインポートするファイルによって、 00:00:00,000という表記や 00;00;00;00 00;00;00;0という表記があります。 但し、ファイル内でバラバラに表記されることはなく 00;00;00;00であれば、全て00;00;00;00で表記されます。 ---------- 1 00:00:00,300 --> 00:00:02,450 皆さまこんにちは。 2 00:00:05,740 --> 00:00:10,090 本日は晴天に見舞われ 大変過ごしやすい一日となりました。 3 00:00:11,220 --> 00:00:12,560 皆さまと一緒に運営できるのを大変嬉しく思います。 4 00:00:13,820 --> 00:00:17,330 ところで、今回皆様にお話ししない内容はというと ・ ・ ・ ---------- Excelにインポートしたい項目は以下のうち、 二行目の ①開始タイムコード ②終了タイムコード 三行目(と四行目)の ③文字列(テロップ)です Excel側に以下の通り、 txtファイル内の各ブロックをエクセルの行ごとに上詰めで 転記させたいと考えています。 A列 → ①開始タイムコード B列 → ②終了タイムコード C列 → ③文字列 この時、テロップが二行だった(四行目文字列があった)場合は、 三行目文字列+四行目文字列として セルC内に三行目文字列と四行目文字列を結合させた文字列を 転記したいと考えています。 転記後のエクセルイメージも添付いたします。 以上、説明が拙く大変申し訳ございません・・・。 何卒ご教示の程よろしくお願いいたします。
Visual Basic