Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailem Formátování více obrázků najednou ve Wordu

Pokud vím, tak více obrázků označit nejde, takže bys musela asi použít makro.
To tak jednoduché není, obzvlášť když nechceš hromadně upravovat všechny obrázky - totiž našel jsem makro, které umožní nastavit třeba výšku všem obrázkům v celém dokumentu, které jsou vložené v řádku. Možná by to někdo uměl upravit, aby to šlo spustit na jeden označený obrázek, pak by to šlo spouštět třeba klávesovou zkratkou...
Požadovanou výšku zadej za vyskavcm =

Sub resize()
Dim i As Long, j As Single
cmtopoint = 0.035267
vyskavcm = 5
With ActiveDocument
For i = 1 To .InlineShapes.Count
With .InlineShapes(i)
.ScaleHeight = 100
.ScaleWidth = 100
.Height = vyskavcm / cmtopoint
End With
Next i
End With

End Sub

Reakce na odpověď

1 Zadajte svou přezdívku:
2 Napište svou odpověď:
3 Pokud chcete dostat ban, zadejte libovolný text:

Zpět do poradny