title: Word VBA help- Insert carriage return after images
body: <p>I have a bunch of images in a Word doc that I am using the following script to resize.  Is there a way for me to insert a carriage return after each image?  I would ideally need double spacing after each image.  I am using the script below to resize the images.  </p>
  
  <pre><code>Sub ResizePhotos()
      Dim pic As InlineShape
  
      For Each pic In ActiveDocument.InlineShapes
          With pic
              .LockAspectRatio = msoFalse
                  .Height = InchesToPoints(3.33)
                  .Width = InchesToPoints(4.44)
          End With
      Next
  End Sub
  </code></pre>