Өөрийн үгийн баримт бичигт дотор шугаман зургийг хөвөгч хэлбэрт шилжүүлэх 3 арга

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

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

Үргэлж л бид танд авах 3 аргыг санал болгож байна.

Арга 1: Нэг зургийн боодлын хэв маягийг гараар өөрчлөх

1. Нэгдүгээрт, зураг дээр хулганы баруун товчийг дарж, контекст цэсэнд байрлах “Боодолтой текст” сонголтыг дарна уу.
2. Дараа нь "Текстийн дагуу" -ээс бусад загварыг сонгоорой. Дараа нь та зургийг дуртай газраа чирэх боломжтой болно.

Арга 2: Анхдагч хэв маягийг өөрчлөх

Дээр дурдсанчлан, анхдагч боодлын хэв маягийг “Тексттэй нийцүүлэн” тохируулсан болно. Гэхдээ зураг оруулахаасаа өмнө дараахь алхамуудыг хийж тохиргоогоо өөрчилж болно.

1. Эхлүүлэхийн тулд "Файл" таб дээр дараад "Сонголтууд" командыг ашиглан "Word Сонголтууд" харилцах цонхыг нээнэ үү.
2. Дараа нь зүүн баган дээрх "Advanced" дээр дарна уу.
3. Доныг "Зүсэх, хуулах, буулгах" хэсэг рүү гүйлгээд "Зургийг оруулах / оруулах" сонголтыг олоорой.
4. Боодлын хэв маягийг сонгохын тулд доош унах товч дээр дарна уу.
5. Хамгийн сүүлд гэхдээ хамгийн багаар бодоход шинэ тохиргоог хадгалахын тулд “OK” дээр дарна уу.

Ирээдүйд оруулах бүх зургууд нь хөвөх боодлын хэв маягийг харуулах болно.

Арга 3: VBA-ээр дамжуулан олон зургийн боодлын хэв маягийг өөрчлөх

1. Эхлээд VBA засварлагчийг эхлүүлэхийн тулд "Alt" + "F11" товчийг дарна уу.
2. Дараа нь "Normal" дээр дарж "Normal" төсөл рүү орно уу.
3. Дараа нь цэсний мөрөн дээрх "Оруулах" табыг дарж, доош унах цэснээс "Модуль" командыг сонгоно уу.
4. Одоо шинэ модуль дээр давхар товшоод редакторын баруун талд кодлох зайг гаргаж ирнэ үү.
5. Доорх макроыг наана уу:

Sub ChangeInLineWithTextPicToFloatingPic()
  Dim objDoc As Document
  Dim objInLineShape As InlineShape
  Dim objShape As Shape
 
  Set objDoc = ActiveDocument
 
  With objDoc
    For Each objInLineShape In .InlineShapes
      objInLineShape.ConvertToShape
    Next objInLineShape
 
    For Each objShape In .Shapes
      objShape.Select
      Selection.ShapeRange.WrapFormat.Type = wdWrapBehind
    Next objShape
  End With
End Sub

6. Эцэст нь "Run" дээр дарна уу эсвэл "F5" дээр дарна уу.

Тайлбар:

Энэхүү макро нь идэвхтэй баримт бичигт багтсан бүх доторлогооны зургуудыг хөвөгч болгон өөрчилж, "Текстийн ард" хэв маягаар тохируулна. Хэрэв та тэдгээрийг өөр хэв маягаар форматлах шаардлагатай бол "Selection.ShapeRange.WrapFormat.Type = wdWrapBehind" кодын мөрөнд тогтмолыг нь солиход хангалттай. Илүү дэлгэрэнгүй тоолохын тулд та энэ холбоосоор орж үзнэ үү. https://docs.microsoft.com/en-us/office/vba/api/Word.WdWrapType

Нөөцлөлтүүд

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

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

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