How to fix a Range

[jamiguel77]

hi all
i have this code:

    Private Const Chart_Source_Range = "Sheet1!$A$1:$B$9"     ' <== Change Chart Source addrs as required
    Range(Chart_Source_Range).Parent.Select
    Application.EnableEvents = True
    Set ws = Range(Chart_Source_Range).Parent
    Set oLbl = Me.Frame1.Controls.Add("Forms.Label.1", "Test", 0)
    Set oChart = CreateChart(Range(Chart_Source_Range), PIE_CHART_TYPE)

my problem is:

i opened a Excel file and stored on a variable named: wbk

i try this:

Set NewSheet = wbk.Sheets("Graficas")
Chart_Source_Range = NewSheet.Range("K66:L78")

in this last line i get an error: 91
Spanish: Variable de objeto o bloque with no establecido

the filename is named: "Budget 2018.xlsx"

how to fix?


thanks

 

[jamiguel77]

i think the variable:

Chart_Source_Range = NewSheet.Range("K66:L78")


have not a String.


how to convert it?


thanks