Alright, was much easier than I thought, but getting a ton of problems...
If Not Intersect(Target, Range("BJ77:BJ113")) Is Nothing Then
'On Error Resume Next
If Target.Value = "Craftsman" Then
Sheet1.Range(Target.Address) = "Craft: " & InputBox(Prompt:="Enter Craft:", Title:="CRAFT NAME", Default:="")
End If
'On Error Goto 0
End If
In theory, this should check if boxes BJ77 through BJ113 have the word Craftsman, and if so put up an InputBox where the user can input a value and press Enter and the box with the change will be changed to show Craft: User Input. What happens with the On Errors active is an endless loop each and every time I type anything in boxes BJ77 to BJ113. Without the On Error, it will work as intended unless I type in Craftsman and then backspace it, or backspace any text I typed in any boxes, at which point I get a Run-time error '13': Type mismatch. I'm not sure what the problem is here; obviously it's a type-mismatch based on a "" value, but that doesn't make any sense to me why this should be happening!
EDIT: It would seem 10th tries a charm with Google. I just had to search for the right criteria I guess.
I had to include this before my "If" statement, and remove my On Errors:
If Target.Count > 1 Then Exit Sub
Bookmarks