わちょんのゆっくりIT
チャンネル登録者数 18.7万人
8364 回視聴 ・ 99いいね ・ 2021/01/02
【Excel】【VBA】初心者向け解説～VBA100本ノック 6本目～【ゆっくり解説】
VBA100本ノックの6本目の解説です。
※ExcelVBAのプロではありませんので、考え方や使い方は参考程度で。
もし間違った情報、古い情報などはコメント欄でお願いします。
Excelのバージョンや使うPCによって、関数もしかり、ショートカットキーもしかり変わります。
「誰が使うか？」「何のために使うか？」によってもコードの書き方や変わってきます。
あくまで参考に。
＜霊夢の回答＞
Sub VBAノック6本目()
Dim A As Long
A = Cells(Rows.Count, 1).End(xlUp).Row
Dim i As Long
For i = 2 To A
If Cells(i, 1) Like "*-*" Then
'処理なし
Else
Cells(i, 4) = Cells(i, 2) * Cells(i, 3)
End If
Next i
End Sub
次回の動画(7本目)
→ • 【Excel】VBA100本ノック7本目やってみた～日付判定～【ゆっくり解説】
＜参考サイト＞
Excelの神髄
excel-ubara.com/
＜模範解答＞
Sub VBA100本ノック6本目模範解答()
Dim i As Long
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
If Not Cells(i, 1).Value Like "*-*" Then
Cells(i, 4).FormulaR1C1 = "=RC[-2]*RC[-1]"
End If
Next
End Sub
コメントを取得中...