Good morning.
I have code that runs from a button on a userform. The code works fine except for the first line. This line is supposed to send a status update to a text box on the userform. You'll notice there's also a second status update after the code runs. That one works fine, which is strange.
I have code that runs from a button on a userform. The code works fine except for the first line. This line is supposed to send a status update to a text box on the userform. You'll notice there's also a second status update after the code runs. That one works fine, which is strange.
VBA Code:
Sub TestHLinkValidityAll()
Settings.MessageReturn.Value = "Testing for broken Hyperlinks"
Application.EnableEvents = False
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Sheets("Calendar").Select
Application.GoTo Reference:="CalendarAssets"
Call TestHLinkValidityAssets
Application.GoTo Reference:="CalendarFloorsOrderNumberColumn"
Call TestHLinkValidityFloorOrderNumber
Application.GoTo Reference:="CalendarLooseLumberOrderNumberColumn"
Call TestHLinkValidityLooseLumberOrderNumber
Application.GoTo Reference:="CalendarRoofTrussesOrderNumberColumn"
Call TestHLinkValidityRoofTrussOrderNumber
Application.EnableEvents = True
Application.ScreenUpdating = True
Application.DisplayAlerts = True
Settings.MessageReturn.Value = "Testing complete. Cells with RED backgrounds have broken Hyperlinks."
End Sub