有在word表格中插入矩形文本框的代码么?

请问用VB操作word 如何插入一个矩形的文本框 注意是文本框而且该文本框背景透明 边框是红色请问代码该怎么写啊 急救 拜谢

解决方案 »

  1.   

    再顶 若大csdn 就没有人知道吗?
      

  2.   

    从菜单中找找啊
    你用什么版本的WORD?
      

  3.   

    With OWork.ActiveDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 120, 40).Fill 
    .Transparency = 1    '设置形状为透明 
    .line.ForeColor.RGB =rgb(0,0,255)
    End With 
      

  4.   

    楼上 不是addshape要文本框
      

  5.   

    Word 录制宏时，鼠标不能操作，无法录制加入文本框的过程。
      

  6.   

    ActiveDocument.Shapes.AddTextbox msoTextOrientationHorizontal, 100, 100, 50, 50