Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako vstaviti več slik z isto velikostjo v dokumentu Word?

Običajno lahko vstavite več slik hkrati v dokument Word z njihovo prvotno velikostjo. Včasih jih morate pri namestitvi te slike enakomerno razporediti. V tem članku bom govoril o tem, kako v dokument Word shraniti več slik z enako velikostjo.

Vstavite več slik z isto velikostjo v dokumentu Word s kodo VBA

Spreminjanje velikosti vseh slik na enako velikost glede na določeno sliko s programom Kutools for Word


Spreminjanje velikosti vseh slik na isto velikost glede na izbrano:

Za spreminjanje velikosti vseh slik v enako velikost, jih morate normalno spremeniti, eden za drugim, vendar z Kutools for Word's Spreminjanje velikosti slik funkcijo, lahko vse slike z enako velikostjo prilagodite z izbranim. Na drugi strani jih lahko tudi spremenite na določen odstotek, kot jih potrebujete.

doc prilagodi slike 05

Kutools for Word: z več kot 100 priročnimi dodatki za Word, lahko brezplačno poskusite brez omejitev v 60 dneh. Kliknite za prenos in brezplačno preizkusite zdaj!


Vstavite več slik z isto velikostjo v dokumentu Word s kodo VBA

Naslednja VBA koda vam lahko pomaga, da vstavite več slik in jih spremenite na velikost, ki jo določite naenkrat, storite tako:

1. Drži dol ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v okno modula.

VBA koda: vstavite več slik z enako velikostjo:

Sub InsertSpecificNumberOfPictureForEachPage()
    Dim xDlg As FileDialog
    Dim xFilePath As String
    Dim xFileName As String
    Dim xMsbBoxRtn As Long
    Dim xPicSize As String
    Dim xShape As InlineShape
    Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
    If xDlg.Show = -1 Then
        xFilePath = xDlg.SelectedItems(1) & "\"
    Else
        Exit Sub
    End If
    xFileName = Dir(xFilePath & "*.*", vbNormal)
    While xFileName <> ""
        If Not (Right(xFileName, 4) = ".png" Or Right(xFileName, 4) = ".bmp" _
        Or Right(xFileName, 4) = ".jpg" Or Right(xFileName, 4) = ".ico") Then
            GoTo LblCtn
        End If
        With Selection
            .InlineShapes.AddPicture xFilePath & xFileName, False, True
            .TypeParagraph
            .Collapse wdCollapsEnd
            .TypeText Left(xFileName, InStrRev(xFileName, ".") - 1)
            .ParagraphFormat.Alignment = wdAlignParagraphCenter
            .TypeParagraph
        End With
LblCtn:
        xFileName = Dir()
    Wend
    ActiveDocument.InlineShapes(1).Select
    Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
    xMsbBoxRtn = MsgBox("Do you want to resize all pictures?", vbYesNo, "Kutools for Word")
    If xMsbBoxRtn = 6 Then
        xPicSize = InputBox("Input the height and width of the picture, separated by comma", "Kutools for Word", "")
    End If
    For Each xShape In ActiveDocument.InlineShapes
      xShape.Height = Split(xPicSize, ",")(0)
      xShape.Width = Split(xPicSize, ",")(1)
    Next xShape
End Sub

3. In potem, pritisnite F5 ključ za zagon te kode, a Brskanje prikaže se okno, izberite mapo, ki vsebuje slike, ki jih želite vstaviti, si oglejte posnetek zaslona:

doc vstavi slike z enako velikostjo 1

4. Nato kliknite OK gumb in polje za predogled je izpuščeno, da vas opomni, če želite spremeniti velikost slik, glejte sliko zaslona:

doc vstavi slike z enako velikostjo 2

5. Kliknite Da, in vnesite številke velikosti višine in širine, ki so ločene z vejico v polje z besedilom, glejte sliko zaslona:

doc vstavi slike z enako velikostjo 3

6. In nato kliknite OK, so bile vse vstavljene slike preuredjene kot enake velikosti, glejte sliko zaslona:

doc vstavi slike z enako velikostjo 4

Opombe: velikost enote je ribnik v kodi VBA.


Spreminjanje velikosti vseh slik na enako velikost glede na določeno sliko s programom Kutools for Word

Če v dokumentu Word obstaja več slik, z Kutools for WordJe Spreminjanje velikosti slik uporabnost, lahko hitro spremenite velikost vseh slik enako kot določena.

Kutools for Word : z več kot 100 priročnimi dodatki za Word, lahko brezplačno poskusite brez omejitev v dnevih 60.

Po namestitvi Kutools for Word, storite tako:

1. Prilagodite eno sliko na želeno velikost in jo izberite ter kliknite Podjetje > Spreminjanje velikosti slik > Spreminjanje velikosti slik z izbiro, si oglejte sliko zaslona:

doc vstavi slike z enako velikostjo 5

2. Vse slike v tem besednem dokumentu so bile takoj spremenjene enako kot izbrane, glejte sliko zaslona:

doc vstavi slike z enako velikostjo 6

Kliknite, če želite prenesti Kutools za Word in brezplačno preizkusiti zdaj!

Priporočena orodja za produktivnost Worda

shot kutools beseda kutools zavihek 1180x121
shot kutools beseda kutools plus zavihek 1180x120

Kutools for Word - več kot 100 napredne funkcije Za Microsoft Word shranite svoj čas 50%

  • Zapletene in ponavljajoče se operacije lahko opravite enkratno obdelavo v sekundah.
  • V dokument Worda vstavite več slik v mapah.
  • Združite in združite več datotek Word v mapah v eno z želenim naročilom.
  • Razdelite trenutni dokument v ločene dokumente v skladu z naslovom 1, odlomkom odseka ali drugimi merili.
  • Pretvorite datoteke med Doc in Docx, Docx in PDF, zbirko orodij za običajne konverzije in izbiro, in tako naprej...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Soda · 2 months ago
    Hi, hello
    I'm Soda, I'm here to say that, I really learn a lot with your website and information that you give.
    Thanks for that :)