A. word圖片格式
圖一是非嵌入型圖片,圖二是嵌入型圖片,簡單的說,你可以把嵌入型圖片理解成一個大文字,可以像文字一樣調整對齊、行距,甚至是自動編號。
那麼,以後如何讓插入的圖片是嵌入型圖片,我們需要點擊文件-選項-高級-剪切、復制和粘貼-將圖片插入、粘貼為:嵌入型
Sub 轉換圖片的版式()
Dim oShape As Variant, shapeType As WdWrapType
On Error Resume Next
If MsgBox("按「是」將圖片由嵌入式轉為浮動式 , 將「否」圖片由浮動式轉為嵌入式", 68) = 6 Then
shapeType = Val(InputBox(Prompt:="請輸入圖片版式:0=四周型,1=緊密型, " & vbLf & "3=襯於文字下方,4=浮於文字上方", Default:=0))
For Each oShape In ActiveDocument.InlineShapes
Set oShape = oShape.ConvertToShape
With oShape
Select Case shapeType
Case 0, 1
.WrapFormat.Type = shapeType
Case 3
.WrapFormat.Type = 3
.ZOrder 5
Case 4
.WrapFormat.Type = 3
.ZOrder 4
Case Else
Exit Sub
End Select
.WrapFormat.AllowOverlap = False
End With
Next
Else
For Each oShape In ActiveDocument.Shapes
oShape.ConvertToInlineShape
Next
End If
End Sub
B. 多次拉入word文檔上的圖片如何調整默認大小
Word中的圖片不能批量選中設置大小,非常不方便。一個不錯的辦法是事先把這些圖片統一尺寸,然後再插入。批量處理圖片的方法有很多,例如可以安裝一個美圖秀秀軟體,使用它的批處理功能一次性把圖片的尺寸統一。
不過要提醒注意的是,默認的Word排版布局下,橫向鋪滿最大可以支持14.05厘米的圖片:
如果你想實現的效果是圖片在Word上只佔據一部分畫面,而不是橫向鋪滿的話,批量統一尺寸時,記得把圖片寬度設置為小於14.05的值,例如7厘米,這樣圖片插入Word之後,就只會占據一半的橫向寬度,便於排版設計。
C. 如何用VBA中獲取word文檔中的圖片
於圖片來說,,分為二種的,,
第一種:是Shape對象(Word中自帶的「自選圖形」)
第二種:是InlineShape對象(嵌入式圖片,也就是所謂的通過點擊菜單欄中的「插入」->「圖片」->「來自文件」)
-------------------
如何判斷word文檔中是否存在一張圖片呢?這個問題。
我來解答:判斷word文檔中是否存在一張圖片,可以通過看一看word文檔中的inlineshape對象的數量來判斷。
舉例:
Dim doc As Document '當前打開的文檔對象Document
Dim MyApp As Word.Application 'Word應用程序對象
Dim MyFileName As String '當前打開的文件名
MyFileName="c;\aaa.doc" '此處可以改成你的文件名字
Set MyApp = CreateObject("Word.Application")
Set doc = MyApp.Documents.Open(MyFileName)
If doc.InlineShapes.Count <> 0 then
msgbox "有嵌入式圖片存在!"
Else
msgbox "沒有嵌入式圖片存在!"
End if
-------------------------------------------------------
如果你非要想知道,用戶到底是不是插入了你要求的圖片的話,你要必須要再他進行插入圖片操作時進行控制,也就是說,你必須把用戶所插入的圖片的(絕對地址)或者(圖片名字)添加到用戶所插入圖片的「可選文字」中記錄下來。
MydocInlineShapes.AddPicture(FileName, LinkToFile, SaveWithDocument, Range)
FileName String 類型,必需。指定要創建對象的文件名。如果忽略本參數,則使用當前文件夾。
LinkToFile Variant 類型,可選。如果此屬性設置為 True,則將 OLE 對象與創建該對象的文件鏈接。如果設置為 False,則令該 OLE 對象成為該文件的獨立副本。默認值為 False。
SaveWithDocument Variant 類型,可選。如果此屬性為 True,則將鏈接的圖片與文檔一起保存。默認值為 False。
Range Variant 類型,可選。指定一個區域,OLE 對象放置在該區域的文字中。如果該區域未折疊,那麼圖片將覆蓋該區域。如果忽略此參數,則自動放置圖片。
ActiveDocument.Shapes.AddPicture "C:\stone.bmp",True, True,MyRange
ActiveDocument.InlineShapes(ID).AlternativeText = App.Path & "\temp" & shapeII & ".bmp" '添加「可選文字」
D. word圖片如何添加邊框
一、為少量圖片添加邊框
如果文檔中需要添加邊框的圖片不多,我們可以直接在」圖片邊框「功能下進行設置。
方法一:選擇文檔中需要添加邊框的圖片,點擊【圖片工具】-【格式】-【圖片樣式】-【圖片邊框】按鈕,在彈出的菜單中選擇「粗線」或「虛線」子菜單中的線型即可。
方法二:選擇文檔中需要添加邊框的圖片,點擊滑鼠右鍵,在彈出的菜單中選擇「設置圖片格式」命令,在打開的任務窗格中選擇「填充與線條」選項,展開「線條」欄,選中「實線」單選按鈕,即可為圖片添加上邊框。同時,在下方還可設置邊框線顏色、線型、粗線、透明度以及鏈接類型等參數。
二、給多張圖片批量添加邊框
在排版長文檔時,如果文檔中有許多圖片同時都需要添加邊框,如果一張張的手工添加邊框,會非常的耗時。這時候,我們可以利用宏批量為圖片添加邊框。
方法為:點擊【視圖】-【宏】按鈕,然後選擇」查看宏「命令,打開」宏「對話框,在」宏名「文本框中輸入宏的名字,這里輸入」picture「,再點擊」創建「按鈕。打開」宏代碼「對話框,粘貼如下代碼:
Sub Example()
Dim oInlineShape
As InlineShape
Application.ScreenUpdating = False
For Each oInlineShape In ActiveDocument.InlineShapes
With oInlineShape.
Borders
.OutsideLineStyle = wdLineStyleSingle
.
OutsideColorIndex = wdColorAutomatic
.
OutsideLineWidth = wdLineWidth050pt
End With
Next
Application.
ScreenUpdating = True
End Sub
然後保存宏,並執行宏命令,關閉窗口返迴文檔界面,即可查看到所有圖片已添加了邊框。
E. 如何將word文檔轉為圖片
1、新建Word文檔
2、用「插入/對象」
3、選擇「從文件創建」,找到你的文章,插入後選中文檔
4、點右鍵,選擇「轉換」,轉換成圖片格式
5、然後把它復制到「畫圖」中,存為JPG 格式即可
先將word轉成PDF格式,再在PDF裡面全部轉成JPG格式。
2.用Adobe Reader打開存好的pdf文件,選擇Edit - Take a snapshot,出現小+號滑鼠,用這個滑鼠選擇要轉換成圖片的頁面,選擇完後會提示The selected area has been copied. 3.新建word文檔,paste, 剛選中的頁面會被作為圖片粘貼在文檔中,選擇圖片,右鍵菜單選擇Save As
強烈推薦你使用PDF虛擬列印機
這個是地址 呵呵
:home.zbsz./vsoft/r-pdf_pe.rar
PNG,是圖像文件存儲格式,是一種點陣圖文件(bitmap file)存儲格式,讀作「ping」。
WORD,是一種字處理程序,可使文檔的創建、共享和閱讀變得更加容易,其文件都以doc或docx擴展名顯示。
所以,PNG和WORD之間是不能現實相互轉換的,PNG可以通過WORD的插入功能插入到文檔中,而不能轉換成WORD文檔。
使用漢王pdf ocr軟體。
可以直接把pdf轉換成txt或rtf文檔,如果pdf中的文字不能直接轉換(這種情況很常見,直接轉換一般都是亂碼),可以使用ocr功能進行識別。
圖片上的文字也可以識別。
打開doc文檔---按一下鍵盤上的Print Scyeen sysrq鍵--再點開始--程序--附件--畫圖--編輯--粘貼--另存為jpg或bmp就可以了.
或者打開doc文檔,利用QQ的剪裁功能把文檔剪裁下來發出去,保存就可以了.
二者的對應關系是:Word大綱文檔的一級標題變為PowerPoint演示文稿頁面的標題,Word 大綱文檔的二級標題變為PowerPoint演示文稿頁面的第一級正文,Word大綱文檔的三級標題變為PowerPoint演示文稿頁面第一級正文下的主要內容,其餘依次類推。 這種轉換方法要求你在Word大綱視圖下編輯文檔談指銷,對於習慣於Word頁面視圖的朋友來說有些不太方便,那麼請看下法。 ·直接創建演示文稿 如逗做果你在Word的頁面視圖下已寫好了內容或者是以前用Word編的一篇文章,想把它們製成幻燈片,就可以在Word中應用樣式和快捷鍵來直接創建演示文稿。 請先把你認為要作為一張幻燈片標題的地方選中,然後選擇標題1,其他也依次類推。然後在菜單欄上選擇工具/自定義,再在彈出的對話框中選命令選項卡,從左窗口中選所有命令,從右窗口中找到Present It命令。用滑鼠左鍵按住並拖動Present It至Word的菜單欄或工具欄均可。 用此快捷鍵可直接調用PowerPoint程序,並把當前的Word文檔直接轉換為 PowerPoint演示文稿,以大綱視圖顯示。點擊PresentIt後你會發現,用標題1樣式定義過的標題全都作為獨立的一頁幻燈片。如果你沒給 Word文檔定義樣式,點擊[Present It]後,PowerPoint會把文檔的每一段落作為一張幻燈片,是不是很簡單啊?
word裡面是不能直接轉換成SWF格式的,你可以在你的電腦上安裝一個ADOBLE PDF 然後在WORD裡面的文件-列印-列印成PDF,WORD文件就轉換成了PDF格式含游,在PDF裡面把文件存儲為或者輸出為SWF格式就可以了。
方法一:.在WORD軟體中實現
打開WORD,發現菜單上多了一項FlashPaper工具欄里也有一個小小的轉換成swf的圖標
這時,我們製作或打開任意一個WORD文檔再點擊工具欄上的這個按鈕找到保存的目錄就可以很容易地再次創建FlashPaper文檔了!
方法二::拖放word到主程序中
拖放文檔到FlashPaper應用程序窗口的方法來創建FlashPaper文檔,這個方法也比較方便快捷。
首先雙擊桌面上的FlashPaper圖標啟動FlashPaper,然後將要轉換的文檔拖放到FlashPaper窗口中即可
顯示轉換過程
主程序窗口出現SWF文檔後 用快捷鍵 CTRL+S 就可以保存
:使用列印命令轉換:
在WORD中打開你需要轉換的文檔, 菜單 文件--列印,然後下圖所示的「列印」對話框中選擇列印機「Macromedia FlashPaper」,單擊「確定」
主程序開始緊張工作,你可以悠閑的等待 轉換時間長短與文檔的頁數有關 建議文件不要太長
轉換完畢,出現下面所示的窗口,在窗口中單擊「Save as Macromedia Flash」或者用快捷鍵-CTRL+S,就可以將轉換得到的文檔另存為SWF文件了,
首次成功,打開你的文件夾 看看吧,這一切好像來得有點容易啊,,哈哈!
F. WORD 圖片如何用灰度
WORD編輯中要插入圖片,批量換為灰度。
插入圖片(或者打開圖片文件)
ctrl+a(全選圖片)
按Alt和F11進入宏界面
工具欄里點「插入」,「模塊」,粘貼如下代碼:
-------------------------------
Sub 批量修改圖片格式()
Dim i As Integer
For i = 1 To ActiveDocument.InlineShapes.Count
If ActiveDocument.InlineShapes(i).Type = 3 Then
ActiveDocument.InlineShapes(i).PictureFormat.ColorType =msoPictureGrayscale
End If
Next
End Sub
------------------------------
按F5運行此宏,完成。