Converting EPUB to DOCX Results in Small Images
Bug #1715807 reported by
Ukie
This bug affects 1 person
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
calibre |
Expired
|
Undecided
|
Unassigned |
Bug Description
When converting EPUB books to DOCX, often times the images are noticeably smaller in DOCX than they were originally in EPUB.
Would it be possible upscale them by default to around 30–50%?
Thank you!
description: | updated |
Changed in calibre: | |
status: | New → Confirmed |
status: | Confirmed → New |
To post a comment you must log in.
Something to keep in mind is that there are two types of images that Word recognizes: "Shapes" and "InlineShapes"
I have written a macro (below) to do this, but it would be much more convenient to add the option under "DOCX output" in Caliber.
Sub UpscaleAllImages()
Dim i As Long
With ActiveDocument
q = .InlineShapes.Count
r = .Shapes.Count
countMsg = MsgBox("There Are " & q + r & " Images found. Proceed to Upscale?", vbYesNo)
If countMsg = vbNo Then End
For i = 2 To .Shapes.Count 'Skip first image (cover)
With .Shapes(i)
.ScaleHeig ht 1.4, msoFalse
.ScaleWidt h 1.4, msoFalse
End With
Next i
For j = 2 To .InlineShapes.Count 'Skip firt image (cover)
.ScaleHeig ht = 80
.ScaleWidt h = 80
With .InlineShapes(j)
End With
Next j
End With
End Sub