0 Replies Latest reply on Aug 16, 2015 2:10 AM by Yong Ning

    Stack Note→Aligns normal text (API)

    Yong Ning

      "<STACK size=0.4 divider=no>3<OVER></STACK>"

      Result see picture

      4.jpg

       

       

      Question:

      "<STACK size=0.4 divider=no>3<OVER></STACK>"→

      <OVER>Aligns normal text with the Lower portion of stacked text

      Help me

       

      How to change <OVER> Aligns normal text with theMiddle of stacked text

       

       

       

      2010 SOLIDWORKS Help - Stack Note

      http://help.solidworks.com/2010/english/solidworks/sldworks/legacyhelp/sldworks/detailing/hidd_richtool_stack.htm

       

      Alignment. Aligns normal text with:

      Upper portion of stacked text

      Middle of stacked text

      Lower portion of stacked text

      Stack Size. Defines the size of the text relative to the font size.

      *************************************************

      ''

       

       

      ''

      Private Sub ll7()

         Dim Xls As Excel.Application, Rng As Range

            Set Xls = GetObject(, "Excel.Application")

            Set Rng = Xls.Selection

         Dim SwApp As SldWorks.SldWorks, SwModel As ModelDoc2

            Set SwApp = Application.SldWorks

            Set SwModel = SwApp.ActiveDoc

         Dim SwSelMgr As SelectionMgr

            Set SwSelMgr = SwModel.SelectionManager

         Dim SwDraw As DrawingDoc

            Set SwDraw = SwModel

         Dim SwNote As Note, Str

       

            Set SwNote = SwSelMgr.GetSelectedObject5(1)

         Dim SwTextFormat As TextBox

             'Set SwTextFormat = SwNote.GetTextFormat

            '<STACK size=0.9 divider=no><FONT Size=3>3<OVER></STACK>

            Str = "<FONT Size=4>m<STACK size=0.5 divider=no>-6<OVER></STACK>"

            Str = "m<STACK size=0.4 divider=no>3<OVER></STACK>"

            Str = "m<STACK size=0.4 divider=no>3<OVER></STACK>"

          

            SwNote.SetText Rng 'Str

            Rng = SwNote.PropertyLinkedText

            ''

      End Sub

       

      How to change note color with API | SOLIDWORKS Forums

      https://forum.solidworks.com/thread/62500