Forum Discussion
Solved
After upgrade the MS Office 365 getting error 2147417848 Method 'Value' of object 'Range' failed
After upgrade the MS Office 365 getting below error in one our VBA based tool which runs on Excel. However it is still working for our colleague who did not upgrade MS office 365. Request you to plea...
I do not get that error. However, I see that the Worksheet_Change event risks going into an endless loop, because the Change event causes itself to be called again and again due to the fact that the value of the cell that triggered the event to fire is changed within the event itself. This may cause a stack overflow. This may be prevented by adding Application.EnableEvents = False prior to any action in that event that changes a cell, e.g.:
' Existing other code here Else sString2Replace = Target.Text 'removes any instances of a £ symbol For iLoopCount = 1 To Len(sString2Replace) If Mid(sString2Replace, iLoopCount, 1) = "£" Then sString2Replace = Replace(sString2Replace, "£", "") Next Application.EnableEvents = False 'Added by JKP Target.Value = sString2Replace Application.EnableEvents = True 'Added by JKP End If 'Remainder of code
That'll prove quite difficult to troubleshoot without the file I'm afraid!
JKPieterse : I am attaching the file. you can just put any amount in pound column then press tab key to go to other column then you will receive the same error.
- The VBA is password protected
- You can access worksheet by entering the below character.
SST0122BP6002- Where can I find the Pound column you refer to please?
You can enable the Debug button on the error message:
- open the file
- open the VBA editor
- expand the project so it asks for the password and enter the password
- Now repeat the actions that lead to the error.