Error on cell reference

Dim BDSDate As Range
Set BDSDate = Worksheet("BDS").Range("A4:A6")
Dim BDPXDate As Range
Set BDPXDate = Worksheet("BD_PX").Range("A4:A7")


I'm getting an error message on this part of my code. Can someone help me fix this?


Thank you ! :D