With WordObject1.Selection
.PasteSpecial Link:=False, DataType:=wdPasteOLEObject, _
Placement:=wdInLine, DisplayAsIcon:=False
 
  With Selection.ShapeRange
    .ScaleWidth 1.5, msoFalse
    .ScaleHeight 1.5, msoFalse
    .IncrementLeft 50
    .IncrementTop 50
  End With
end with
why?到了mosfalse時卻說未宣告???這不是vb之word的元件內容文法嗎???元件有載入阿???
Public WordObject1 As Word.Application
Set WordObject1 = GetObject("", "Word.Application")
ㄎ這些都沒問題唯獨"mosfalse"
arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(0) 人氣()