View Single Post
 
Old 09-29-2020, 05:29 PM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2016
Expert
 
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 3,977
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default

That End If line needs to move up two lines (after the End With line).

The Title property on your CCs doesn't match the code. Change this line
Case "Lst1", "Lst2"
to
Case "Bondy Scale"

Also note that if you are setting the fill and the text colour to exactly the same colour, you won't be able to see the text. Your original request showed the background as a paler tint of the text colour. Once you have the code working, if you want the text to be visible we may need to ensure the background colour is not on 100% fill - but lets get the colour working first.
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote