VBA code works on works desktop but not on my own laptop

[Monojono]

Hello Readers and hopefully problem solvers,

I have a large amount of coding across my workbook that works fine on my works desktop. However, on my laptop one small sub routine stops half way into the code and I can't seem to find the answer to getting it working.

As I said and code works OK on my works desktop but not on my laptop.

The code is as follows:

Sub NoneGasRoundEntrie()

Sheets("SCORECARD").Select

Range("AV7").Value = Range("P3").Value

Range("AV7").Select

Dim GolferX As Range

Set GolferX As ActiveCell

Sheets("INDEX").Select

Range("C10:C111").Find(GolferX).Select

ActiveCell.Offset(0, 5).Select

Call MoveOldRounds

ActiveCell.Offset(0, 19).Select

ActiveCell = Sheets("SCORECARD").Range("AV6").Value

Call IndexFormula

Sheets("SCORECARD").Select

Range("B4").Select

End Sub

The line in YELLOW above is where the code stops.

The desktop is using Office 365 Pro Plus and my laptop is using Office 365

Please please help.

Kind Regards,

Mono

 

[EXCEL MAX]

Yes, this is completely correct.

Set nVar = Range("C10:C111").Find(GolferX)