1 Reply Latest reply: Aug 14, 2015 8:13 AM by m w RSS

    Increase/Decrease Size of Text Box with Macro



      I am trying to define the size of a text box by multiplying the width and length by the value stored inside a variable. I have the following but I get an error.


      sub Resize

      set obj = ActiveDocument.GetSheetObject("TX26")


        set v = ActiveDocument.Variables("vCubeSize")

        v.SetContent vSize, true


      set Width = ActiveDocument.fields("ITEM_CASE_WIDTH").GetPossibleValues

      set Height = ActiveDocument.fields("ITEM_CASE_HEIGHT")GetPossibleValues


          set fr = obj.GetFrameDef

          set pos = fr.Rect

          pos.Width = pos.v

          pos.Height = pos.v

          obj.SetFrame fr,true,dummy


            End sub


      Any help would be greatly appreciated.