動画の説明

今回は、Excelのマクロを使って読み上げキャラクターを自動で入力していきます。
この動画ではExcelのマクロの使い方と実際の挙動、コードの確認をして、マクロファイルの保存方法と呼び出し方の解説を行います。

補足

マクロコードコピペ用↓

Sub 読み上げキャラの入力()
Dim lastRow As Long
Dim i As Long

lastRow = Cells(Rows.Count, "B").End(xlUp).Row

For i = 1 To lastRow
If Cells(i, "B").Font.Color = 42495 Then
Cells(i, "A").Value = "ゆっくり魔理沙"
ElseIf Cells(i, "B").Font.Color = 9662683 Then
Cells(i, "A").Value = "ゆっくり霊夢"
ElseIf Cells(i, "B").Font.Color = 13434880 Then
Cells(i, "A").Value = "男性"
End If

Next i

End Sub

動画が再生されない時

動画が再生されない場合や、動画が見にくい場合は下記の切り替えボタンをクリックのうえ、設定で画質の調整をしてください

切り替え