Hi, I need to invert text in cells up down side and I have found the best way to insert textbox and invert it then linking it to the cell.
I try to make the text in the textbox to shrink to fit the size of the text box, thanks in advance.
to DECREASE font size - click on shape and "OK" (click more than once to keep decreasing)
to INCREASE font size - click on shape and replace "Y" with any other character (or delete the "Y")
Assgn this macro to the textbox
If UCase(InputBox("Y = decrease", "Font Size", "Y")) = "Y" Then .Size = .Size - 1 Else .Size = .Size + 1