⑴ word文檔里插入的圖片或超鏈接顯示為代碼
如果是想臨時切換,就在代碼處點右鍵,選擇「切換域代碼」,如果是想總是不顯示為代碼,[工具]-[選項]-[視圖],把」顯示「那裡的」域代碼「前面的勾取消掉。
⑵ word文檔中復制圖片到裡面顯示代碼怎麼辦
你這不是插入圖片,而是插入了一個文件對象。如果你想在Word裡面直接插入圖片,就選擇「插入」-「圖片」然後選擇要插入的圖片文件。這樣就能直接在Word裡面顯示圖片內容而不是一個文件對象。或者你用畫筆或其他什麼工具直接打開這個圖片文件,拷貝圖片內容再到Word裡面粘貼。
⑶ word宏代碼--選中的圖片修改尺寸 代碼,不是批量處理
1. VB語言中對圖片大小的設置是以原圖的長寬等比在縮放,統一設置時默認優先對齊所有圖片的「寬度」。
2. ActiveDocument.InlineShapes(n).Range.ParagraphFormat.Alignment= wdAlignParagraphCenter '設置圖片居中 可以讓圖片居中,Left、Right可以分別設置左對齊、右對齊。
3. 全文如果有「手動換行符」↓(代碼是^l),設置某一部分居中時會影響漆上下部分的居中與否,因而,如果需要只對圖片進行居中,則需先將全文中的↓替換成「段落標記符」(常規回車鍵,代碼是^p)。
4. 這里的Shapes(InlineShapes)不僅僅是指圖片,也包含其它的,自選圖形、任意多邊形、OLE 對象、ActiveX 控制項、圖片等。
5. InlineShapes類型圖片與Shapes類型圖片的區別有待研究。
按比例縮放篇代碼
Sub setpicsize() '設置圖片大小 Dim n
Dim picwidth Dim picheight
On Error Resume Next '忽略錯誤
For n = 1 To ActiveDocument.InlineShapes.Count 'InlineShapes類型圖片 picheight = ActiveDocument.InlineShapes(n).Height picwidth = ActiveDocument.InlineShapes(n).Width
ActiveDocument.InlineShapes(n).Height = picheight * 0.6 '設置高度為0.6倍
ActiveDocument.InlineShapes(n).Width = picwidth * 0.6 '設置寬度為0.6倍 Next n
For n = 1 To ActiveDocument.Shapes.Count 'Shapes類型圖片 picheight = ActiveDocument.Shapes(n).Height picwidth = ActiveDocument.Shapes(n).Width
ActiveDocument.Shapes(n).Height = picheight * 0.6 '設置高度為0.6倍 ActiveDocument.Shapes(n).Width = picwidth * 0.6 '設置寬度為0.6倍 Next n End Sub
⑷ word文檔中復制圖片到裡面顯示代碼怎麼辦
這不是代碼,是照片名字,你直接把照片拉到word裡面的話word是連接到這個圖片的。解決方法:在word裡面點擊,插入---圖片。這樣插進去的圖片就不是連接上去的了。