Excel VBA 讀儲存格值


Dim a As Double
If Worksheets("超簡易算盤").Range("B2").Value <> 0 Then
a = Worksheets("超簡易算盤").Range("B1").Value / Worksheets("超簡易算盤").Range("B2").Value
Worksheets("超簡易算盤").Range("B5").Value = a
Else
Worksheets("超簡易算盤").Range("B5").Value = "B值不能等於0"
End If


語法
Worksheets("超簡易算盤").Range("B2").Value

說明:
叫出超簡易算盤資料表的B2儲存格的值 也可直接取代