Үгийн баримт бичиг дэх зургийн хэмжээг хурдан өөрчлөх 2 арга

Энэ нийтлэлд бид тодорхой шаардлагад нийцүүлэн Word баримт бичигт байгаа олон зургийн хэмжээг хэрхэн хурдан өөрчлөхийг харуулах болно.

Өнөө үед Word баримт бичигт олон зураг оруулах нь ердийн зүйл биш юм. Гэсэн хэдий ч заримдаа эдгээр зургуудыг ижил хэмжээгээр тохируулах хэрэгтэй. Ердийн үед оруулсан зураг нь "Тексттэй нийцсэн" боодлын хэв маягтай байдаг тул бид бүгдийг нь зэрэг сонгож чадахгүй гэсэн үг юм. Тиймээс, зургийн хэмжээг тохируулах нь хэд хэд байсан ч цаг хугацаа их шаарддаг.

Танд тустай байж болох 2 хурдан аргыг доор харуулав.

Арга 1: “F4” ашиглана уу

1. Юуны өмнө, засварлах горимд орохын тулд зураг дээр хоёр удаа дарна уу.
2. Хоёрдугаарт, "Format" табын доор байрлах "Хэмжээ" бүлэгт байрлах доош сумтай товчийг дарж "layout" харилцах цонхыг нээнэ үү.
3. Нээлттэй харилцах цонхны өндөр, өргөнийг шаардлагатай хэмжээгээр нь өөрчил.
4. Дараа нь "Масштаб" хэсэгт байгаа "Зургийн харьцааг түгжих" ба "Зургийн анхны хэмжээтэй харьцуулах" хайрцгийг арилгана.
5. Эцэст нь “OK” дээр дарна уу.
6. Дараа нь өөр зураг дээр дарж “F4” товчийг дарна уу. Одоо та хоёрдахь зургийг өмнөх зургийнхтай ижил хэмжээтэй болохыг олж мэдэх болно. "F4" энд хамгийн сүүлийн үйлдлийг давтаж болно.

Арга 2: VBA код ашиглах

Ерөнхийдөө 1-р арга нь танд маш их цаг хугацаа хэмнэж чадна. Гэхдээ зураг дээр дараад уйтгартай, уйтгартай санагдсан тохиолдолд "F4" товчийг дарахад та VBA кодын тусламжийг авч даалгавраа нэг удаа дуусгаж болно.

1. Эхлэхийн тулд "Хөгжүүлэгч" таб дээр дарна уу.
2. Дараа нь "Код" бүлэгт байгаа "Visual Basic" дээр дарна уу эсвэл "Alt + F11" дээр дарж VBA засварлагчийг нээнэ үү.
3. Дараа нь "Хэвийн" дээр дарна уу.
4. "Оруулах" дээр дарна уу.
5. Мөн "Модуль" -ыг сонгоорой.
6. Дараа нь шинэ модуль дээр давхар товшоод засварлах хэсгийг нээнэ үү.
7. Дараах кодыг тэнд байрлуул:

Sub SetupAllPictureSize()
  Dim objInlineShape As InlineShape
  Dim objShape As Shape
    
  For Each objInlineShape In ActiveDocument.InlineShapes
    objInlineShape.Height = 500
    objInlineShape.Width = 500
  Next objInlineShape

  For Each objShape In ActiveDocument.Shapes
    objShape.Height = 500
    objShape.Width = 500
  Next objShape
End Sub

8. Эцэст нь “Run” товчийг дарна уу.

Тайлбар:

1. "ObjInlineShape.Height = 500" ба "objInlineShape.Width = 500" кодуудын утгыг өөрчлөх боломжтой тул зургийн өндөр, өргөнийг "Тексттэй нийцүүлэн" боох хэв маягаар өөрчлөх шаардлагатай.
2. Та "objShape.Height = 500" ба "objShape.Width = 500" кодуудын утгыг өөрчилж "Зургийн дагуу" боодлын хэв маягаар биш зургийн өндөр, өргөнийг өөрчлөх боломжтой.

Баримтын асуудлуудыг шийдвэрлэх

Хэт олон зураг агуулсан Word баримт бичиг нь боловсруулах хурдыг удаашруулж зогсохгүй баримт бичгийн эвдрэлд хүргэж болзошгүй юм. Үүний нэг арга бол Word файлд хэт олон зураг оруулахаас зайлсхийх явдал бөгөөд ингэснээр ийм асуудал гарахгүй байх болно. Нөгөө арга нь a docx асуудлыг засах хэрэгсэл Урьдчилан, чухал файлаа алдахаас санаа зовох хэрэггүй болно.

Зохиогчийн танилцуулга:

Вера Чен бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. xlsx өгөгдлийн алдааг засах хэрэгсэл болон pdf програм хангамжийн бүтээгдэхүүнийг засах. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com