Přizpůsobení velikosti obrázků ve Wordu pomocí makra: Porovnání verzí

Z BBM Dokumentace iFIS
Skočit na navigaciSkočit na vyhledávání
Jana.dankova (diskuse | příspěvky)
Bez shrnutí editace
Jana.dankova (diskuse | příspěvky)
Bez shrnutí editace
Řádek 1: Řádek 1:
===Návod na vytvoření makra pro úpravu obrázků, které svojí velikostí přesahují dokument ve Wordu===
Obrázky přesahující velikost dokumentu ve Wordu lze zmenšit tak, aby byly viditelné a použitelné k tisku. K tomu lze využít v MS Word tzv. '''maker''', která uživatelům výrazně usnadní práci například s přípravou dokumentu k tisku.


Obrázky přesahující velikost dokumentu ve Wordu lze zmenšit tak, aby byly viditelné a použitelné k tisku. K tomu lze využít v MS Word maker, která výrazně usnadní práci.


 
===Návod na vytvoření makra pro úpravu obrázků, které svojí velikostí přesahují dokument ve Wordu:===
Lze postupovat následujícím způsobem:




<ol>
<ol>
<br>
<li>V dokumentu MS Word z panelu nástrojů vybrat nabídku ''Zobrazení'' &rarr; kartu ''Makro'' &rarr; rozbalit nabídku &rarr; vybrat volbu ''Zaznamenat makro...''</li>
<li>V dokumentu MS Word z panelu nástrojů vybrat nabídku ''Zobrazení'' &rarr; kartu ''Makro'' &rarr; rozbalit nabídku &rarr; vybrat volbu ''Zaznamenat makro...''</li>


Řádek 15: Řádek 14:
'''Obr.''' ''Zaznamenání makra''
'''Obr.''' ''Zaznamenání makra''


<br><br>


<li>Nově vytvářené makro pojmenovat názvem '''fitImageSize''' &rarr; do popisu je možné vložit libovolný text pro identifikaci makra &rarr; tlačítkem ''Ok'' makro vytvořit</li>
<li>Nově vytvářené makro pojmenovat názvem '''fitImageSize''' &rarr; do popisu je možné vložit libovolný text pro identifikaci makra &rarr; tlačítkem ''Ok'' makro vytvořit</li>
Řádek 22: Řádek 22:


'''Obr.''' ''Vytvoření makra a jeho pojmenování''
'''Obr.''' ''Vytvoření makra a jeho pojmenování''
 
<br><br>


<li>Z panelu nástrojů vybrat nabídku ''Zobrazení'' &rarr; kartu ''Makro'' &rarr; rozbalit nabídku &rarr; vybrat volbu ''Zastavit makro''</li>  
<li>Z panelu nástrojů vybrat nabídku ''Zobrazení'' &rarr; kartu ''Makro'' &rarr; rozbalit nabídku &rarr; vybrat volbu ''Zastavit makro''</li>  
Řádek 31: Řádek 32:
'''Obr.''' ''Zastavení záznamu makra''
'''Obr.''' ''Zastavení záznamu makra''


<br><br>


<li>Poté použít volbu ''Zobrazit makro''</li>
<li>Poté použít volbu ''Zobrazit makro''</li>
Řádek 39: Řádek 41:
'''Obr.''' ''Zobrazení makra''
'''Obr.''' ''Zobrazení makra''


<br><br>


<li>Vybrat požadované makro a stisknout tlačítko ''Upravit''</li>
<li>Vybrat požadované makro a stisknout tlačítko ''Upravit''</li>
Řádek 47: Řádek 50:
'''Obr.''' ''Výběr makra a jeho úprava''
'''Obr.''' ''Výběr makra a jeho úprava''


<br><br>


<li>Nahradit veškerý původní text tímto:
<li>Nahradit veškerý původní text tímto:<br><br>
<syntaxhighlight lang="plsql">
<syntaxhighlight lang="plsql">
Sub fitImageSize()
Sub fitImageSize()
Řádek 72: Řádek 76:
'''Obr.''' ''Přepsání původního textu novým''
'''Obr.''' ''Přepsání původního textu novým''


<br><br>


<li>Okna s textem zavřít a znovu použít volbu ''Zobrazit makro'' &rarr; vybrat právě vytvořené makro z nabídky (je-li jich více, vybrat to správné s názvem '''fitImageSize''') &rarr; stisknout tlačítko ''Spustit makro''</li>
<li>Okna s textem zavřít a znovu použít volbu ''Zobrazit makro'' &rarr; vybrat právě vytvořené makro z nabídky (je-li jich více, vybrat to správné s názvem '''fitImageSize''') &rarr; stisknout tlačítko ''Spustit makro''</li>
Řádek 80: Řádek 85:
'''Obr.''' ''Opětovné zobrazení makra a jeho spuštění''
'''Obr.''' ''Opětovné zobrazení makra a jeho spuštění''


<br><br>


<li>Použitím tlačítka dojde k přizpůsobení obrázků velikosti dokumentu a dokument je připraven k dalšímu zpracování či tisku</li>
<li>Použitím tlačítka dojde k přizpůsobení obrázků velikosti dokumentu a dokument je připraven k dalšímu zpracování či tisku</li>
Řádek 87: Řádek 93:


'''Obr.''' ''Přizpůsobení velikosti obrázků dokumentu po spuštění makra (všechny obrázky dokumentu se zmenší tak, aby byly v dokumentu viditelné)''
'''Obr.''' ''Přizpůsobení velikosti obrázků dokumentu po spuštění makra (všechny obrázky dokumentu se zmenší tak, aby byly v dokumentu viditelné)''
<br><br>
</ol>
</ol>

Verze z 19. 7. 2016, 09:12

Obrázky přesahující velikost dokumentu ve Wordu lze zmenšit tak, aby byly viditelné a použitelné k tisku. K tomu lze využít v MS Word tzv. maker, která uživatelům výrazně usnadní práci například s přípravou dokumentu k tisku.


Návod na vytvoření makra pro úpravu obrázků, které svojí velikostí přesahují dokument ve Wordu:


  1. V dokumentu MS Word z panelu nástrojů vybrat nabídku Zobrazení → kartu Makro → rozbalit nabídku → vybrat volbu Zaznamenat makro...
  2. Obr. Zaznamenání makra

  3. Nově vytvářené makro pojmenovat názvem fitImageSize → do popisu je možné vložit libovolný text pro identifikaci makra → tlačítkem Ok makro vytvořit
  4. Obr. Vytvoření makra a jeho pojmenování

  5. Z panelu nástrojů vybrat nabídku Zobrazení → kartu Makro → rozbalit nabídku → vybrat volbu Zastavit makro
  6. Obr. Zastavení záznamu makra

  7. Poté použít volbu Zobrazit makro
  8. Obr. Zobrazení makra

  9. Vybrat požadované makro a stisknout tlačítko Upravit
  10. Obr. Výběr makra a jeho úprava

  11. Nahradit veškerý původní text tímto:

    Sub fitImageSize()
    Dim i, maxWidth As Long
    
    maxWidth = 453.5
    With ActiveDocument
        For i = 1 To .InlineShapes.Count
          If .InlineShapes(i).Width > maxWidth Then
            With .InlineShapes(i)
                .Width = maxWidth
            End With
          End If
        Next i
    End With
    End Sub
    
  12. Obr. Přepsání původního textu novým

  13. Okna s textem zavřít a znovu použít volbu Zobrazit makro → vybrat právě vytvořené makro z nabídky (je-li jich více, vybrat to správné s názvem fitImageSize) → stisknout tlačítko Spustit makro
  14. Obr. Opětovné zobrazení makra a jeho spuštění

  15. Použitím tlačítka dojde k přizpůsobení obrázků velikosti dokumentu a dokument je připraven k dalšímu zpracování či tisku
  16. Obr. Přizpůsobení velikosti obrázků dokumentu po spuštění makra (všechny obrázky dokumentu se zmenší tak, aby byly v dokumentu viditelné)