im having trouble finding resources for using visio with vba macros. there are multiple things im trying to work out, but currently i need my text to rotate 90 degrees counter clockwise. visShape.CellsU("TextDirection").FormulaU = "1" works with rotating counterclockwise, but visShape.CellsU("TextDirection").FormulaU = "2" and visShape.CellsU("TextDirection").FormulaU = "3" do nothing. any suggestions?
visShape.CellsU("TxtAngle").FormulaU = "90 deg"
The TextDirection cell is not used for angular rotations. It only allows the text to flow horizontally or vertically. Allowed entry values are either 0 or 1. See https://learn.microsoft.com/en-us/office/client-developer/visio/textdirection-cell-text-block-format-section (https://learn.microsoft.com/en-us/office/client-developer/visio/textdirection-cell-text-block-format-section)
For more comprehensive text treatment, see Designing Text Behavior, https://learn.microsoft.com/en-us/previous-versions/office/developer/office-xp/aa200986(v=office.10) (https://learn.microsoft.com/en-us/previous-versions/office/developer/office-xp/aa200986(v=office.10))