In the Sub Errors() dialog add this.
Code: Register to unlock hidden link
intMatch = InStr(strSearchString, "[Chat]From")
if intMatch > 0 Then
VGSendCommand "/quit"
End If
The end result should look like this:
Sub Errors()
'this is the sub you need to find
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(Logpath, ForReading)
strSearchString = objFile.ReadAll
objFile.Close
'this is what is at the top to open and edit the file.
intMatch = InStr(strSearchString, "[Chat]From")
if intMatch > 0 Then
VGSendCommand "/quit"
End If
'this will be what you add to search for a tell from anyone.
intMatch = InStr(strSearchString, "You need more items to complete that work order")
if intMatch > 0 Then
Mouse.LMouseClick AB_X, AB_Y, 1, 1
End If
'I just included this so that you see what I added the text between.