セルの値編-エクセルのＶＢＡ集

セルの値編

'セルの値を取得します。
Sub セルの値の取得()

'A2のセルに現在の日付を入力
Range("A2").Value = Date

'A1のセルにA2のデータを表示する数式を入力
Range("A1").Formula = "=A2"

'A1のセルの値をダイアログで表示
MsgBox Range("A1").Value
End Sub

'セルの数式を取得します。
Sub セルの数式取得()

'A2のセルに現在の日付を入力
Range("A2").Value = Date

'A1のセルにA2のデータを表示する数式を入力
Range("A1").Formula = "=A2"

'A1のセルの値をダイアログで表示
MsgBox Range("A1").Formula
End Sub

'セルに実際に入力されている値を取得します。
Sub セルの値の取得2()

'A2のセルに現在の日付を入力
Range("A2").Value = Date

'A1のセルにA2のデータを表示する数式を入力
Range("A1").Formula = "=A2"

'A1のセルの日付のシリアル値をダイアログで表示
MsgBox Range("A1").Value2
End Sub

'セルに表示されている値を取得します。
Sub 表示値取得()

'A2のセルに現在の日付を入力
Range("A1").Value = 123

'A1のセルにA2のデータを表示する数式を入力
Range("A1").NumberFormatLocal = "0000"

'A1のセルの入力されている値をダイアログで表示
MsgBox Range("A1").Value

'A1のセルの表示されている値をダイアログで表示
MsgBox Range("A1").Text
End Sub