word中vba製作動態圖片

① 在word中如何用VBA實現插入多張圖片

要從兩個方面考慮：
1、如何把現有文檔中的圖片導出？這個代碼片斷可以參考一下：
Set ImageStream = CreateObject("ADODB.Stream")
With ImageStream
.Type = 1
.Open
.Write ActiveDocument.InlineShapes(1).Range.EnhMetaFileBits
.SaveToFile "d:\Temp\Output.bmp"
.Close
End With
Set ImageStream = Nothing

2、如何把已經到處的圖片導入到新文檔中？這個函數調用可以參考一下：
ActiveDocument.InlineShapes.AddPicture

如果還是不明白的話，請補充提問。

_____
補充：
請問樓主你運行那個代碼片斷得到的*完整*錯誤信息是什麼？報錯的時候，系統一般會把游標移動到出錯的那行代碼上，你看到的是哪一行代碼出錯呢？
我看你貼上來的代碼應該是沒有什麼語法上的錯誤，「Exit For」的確是不應該要的，但那也不是語法錯誤啊。

② 如何運用vba將指定圖片插入word中

例如，新建一個4行1列的表格，然後在Cell(3, 1)內插入圖片：
Sub Macro1()
Dim mysel
mysel = ActiveDocument.Tables(1).Cell(3, 1)
mysel.InlineShapes.AddPicture FileName:="C:\a.jpg", LinkToFile:=True, SaveWithDocument:=True
End Sub

③ 如何用Word宏操作處理圖片讓所有圖片統一操作

方法如下：

1. 先打開存有圖片的word。

2. 在打開的文檔中，選擇在「工具」菜單中選擇「宏」--「宏」。

3. 隨後彈出「宏」對話框，在宏名中輸入setpicsize。

4. 宏名起好了，單擊「創建」按鈕進入Visual Basic 編輯器，輸入代碼。

5. 關閉入Visual Basic 編輯器，返回word，重新選擇「工具」--「宏」--「宏」（或者直接按Alt+F8），再次進入宏的界面，在彈出的宏名中選擇"setpicsize",最後點擊「運行」---確認即可快速地批量修改word中所有圖片大小。
   

④ Word中如何設置動畫效果

1、將要製作的視頻用Kmplayer或類似工具保存成一張張的圖片
2、將圖片轉換成灰度圖
3、算出ASCII每個字元的灰度值（在一定的區域中總共有多少個點）
4、將圖片中的每個點用相同灰度數的ASCII字元代替
5、導入到word中，選擇字元集（ASCII），分頁，設置行距字型大小，縮放到合適大小，這時可以看出效果了。
6、編寫VBA或宏，自動翻頁
7、運行宏即可看到效果
http://v.youku.com/v_show/id_XMTM4Mzg0NzEy.html

⑤ WORD怎樣製作宏插入圖片，圖片上面需要帶圖片名字，謝謝。越詳細越好。

給你一條思路吧。
1、打開word文件，用錄制宏錄一段插入圖片的代碼（這里注意代碼的路徑和圖片名）；再錄一段保存文件到A目錄的代碼。備用；
2、新建一個excel文件，將你文件夾里需要建文件的人名全部列到excel的某一列中；
3、參照1的代碼在excel里寫vba代碼，循環執行這些人名，每個人名都有新建、插入圖片、保存這個過程。