Data Type VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Data Type
  4. Object variable
Sub ObjectVariable()
  Dim Rng As Range
  Set Rng = ThisWorkbook.Worksheets("Sheet1").Range("C10")
  Rng.Value = InputBox("Enter Sales for January")
  Rng.Offset(-1, 0).Value = "January Sales"
End Sub