VBA Excel error “Object variable or with block variable not set” Run time error 91 & 438

Question

I am trying to chart set of values using the following code

Option Explicit

Sub graphs()
Dim chart1 As Variables
Dim rlong As Single

rlong = ActiveSheet.Cells(R