View Single Post
 
Old 04-18-2020, 06:14 AM
dazza67 dazza67 is offline Windows 10 Office 2016
Novice
 
Join Date: Apr 2020
Posts: 3
dazza67 is on a distinguished road
Default

Hi Paul

Thanks for the reply again.

I am struggling to get this to work and look right on the page, I have now found this though that looks quite good, it works as suggested in the original post but, I tried to change the "N" for "NO" and "?" to "YES/NO?" and "Y" to "YES" this appears to break the use!

Any ideas how to fix this?

Thanks

Darren

link to thread I found Enable a user to double-click text in a document to change its value

Original code


my code below

Sub SymbolCarousel()
'
' SymbolCarousel Macro
'
'
Select Case Selection.Fields(1).Code.Characters(29)
Case "YES"
Selection.Fields(1).Code.Characters(29) = "NO"
Case "NO"
Selection.Fields(1).Code.Characters(29) = "YES/NO?"
Case "YES/NO?"
Selection.Fields(1).Code.Characters(29) = "YES"
Case Else
End Select


End Sub
Reply With Quote