アメリカの大学生活---日記

ミネソタ州立大学ムーアヘッド校 2015年-2017年の日記

練習問題8(表示形式の練習)メモ

 

excel-ubara.com

 

 

Sub 8()
Dim i As Long
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
  Cells(i, 4) = Cells(i, 2) * Cells(i, 3)
Next
  Columns(1).NumberFormatLocal = "yyyy/mm/dd"
  Columns(4).NumberFormatLocal = "#,##0"
End Sub