Based on your initial situation, I'd change:
select case rs!response_count
case is = 9
if scalelabel = "-" then
'start word using template 1
end if
case is = 10
if scalelabel = "--" then
'start word using template 2

end if
end select
to
VB Code:
  1. Select Case rs!Response_Count
  2.     Case is = 9
  3.         If Scale_Label = "--" Then
  4.             'start word using template 1
  5.         Else
  6.             'start word using template 2
  7.         End If
  8.     Case Else
  9.         MsgBox "No option defined for this Response_Count value"
  10. End Select
Nate