
StrPictureNumber = InputBox("Input the number of the picture for each page", "Picture Number", "For exemple: 1") StrFile = Dir(StrFolder & "*.*", vbNormal)

Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker) Sub InsertSpecificNumberOfPictureForEachPage()

The macro we are going to present you is capable of following functions: How about use a macro to automatically perform the task? Once you insert a picture into document, you may have to manually resize it or enter its name around. You can feel comfortable while working with pictures in Word. In this article, we would like to offer you the way to batch insert multiple pictures to your Word document.
