Mega Code Archive

 

Categories / VisualBasic Script / Data Type

 

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