2 მეთოდი თქვენს Word დოკუმენტში ყველა სურათისა და ტექსტური ყუთის ცენტრისთვის

ამ სტატიაში გვსურს წარმოგიდგინოთ 2 მეთოდი, რომლითაც თქვენს Word დოკუმენტში ყველა სურათი და ტექსტური ყუთი ცენტრალიზდება.

სურათები და ფორმები, როგორიცაა ტექსტური ველები, სასიცოცხლოდ მნიშვნელოვან როლს თამაშობენ შესანიშნავი დოკუმენტის შესაქმნელად. სურათებისა და ფორმების მზარდი რაოდენობის ჩასმასთან ერთად, ჩნდება მათი ფორმატირების ინტეგრირების, მაგალითად, ცენტრირების მოთხოვნა.

რაც თქვენ უნდა იცოდეთ არის ის, რომ დოკუმენტში ჩასმული ყველა სურათი დაყენებულია „ტექსტის შესაბამისობაში“ განლაგებაში, ხოლო ტექსტური ველები მოდიფიკაციის ფორმებს წარმოადგენს. თქვენ შეგიძლიათ შეცვალოთ სურათის განლაგება საჭიროებისამებრ, მაგრამ მათ ცენტრში გადასატანად თქვენ უნდა გაითვალისწინოთ ტექსტის შეფუთვა. იმის გამო, რომ ტექსტის ფორმატირება შეიძლება ადვილად შეიცვალოს, რის გამოც თქვენ გაქვთ განლაგება, რომელიც არ მოგწონთ.

ამიტომ, ჩვენ ყურადღებას გავამახვილებთ სურათებისა და ტექსტური ველების „ტექსტთან შესაბამისობაში“ ცენტრირების 2 გზაზე.

მეთოდი 1: ხელით მოათავსეთ ერთი სურათი ან ტექსტური ყუთი

სურათის „ტექსტთან შესაბამისობაში“ დასაყრდენად, მიჰყევით ამ ნაბიჯებს:

1. პირველ რიგში, დააჭირეთ სურათს მის ასარჩევად.
2. მეორეც, დააწკაპუნეთ "ცენტრზე" ჯგუფში "პარაგრაფი" ჩანართზე "მთავარი". ან შეგიძლიათ გამოიყენოთ მალსახმობები "Ctrl+ E".

შემდეგ ტექსტური ველის ცენტრში გადასატანად, გაიარეთ ეს ინსტრუქციები:

1. ანალოგიურად, დააწკაპუნეთ ტექსტურ ყუთზე, რომ ის არჩეული იყოს.
2. შემდეგ დააწკაპუნეთ "ფორმატი" ჩანართზე "სახატავი ხელსაწყოები".
3. შემდეგი, დააჭირეთ "გასწორებას" ჯგუფში "მოწყობა".
4. და აირჩიეთ "Aign Center" მის ჩამოსაშლელ მენიუში.

მეთოდი 2: რამდენიმე სურათის ან ტექსტური ყუთების სერიული ცენტრი ავტომატურად

ჩვენი უმეტესობა ძალისხმევის დაზოგვის მიზნით ავტომატურ პროცესს ემხრობა. აი, ასეც მოიქეცით.

1. პირველ რიგში, დააჭირეთ "Alt+ F11" VBA რედაქტორის გასახსნელად.
2. შემდეგ დააჭირეთ "ნორმალური" პროექტს.
3. დააჭირეთ ჩანართს "ჩასმა" და აირჩიეთ "მოდული".
4. შემდეგ ორჯერ დააწკაპუნეთ მოდულზე, რომ გამოიტანოთ რედაქტირების ადგილი მარჯვენა მხარეს.
5. სურათების ცენტრის გვერდით, იქ ჩასვით შემდეგი კოდები:

Sub CenterInLinePictures()
  Dim objInLineShape As InlineShape
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  For Each objInLineShape In objDoc.InlineShapes
    objInLineShape.Select
    Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
  Next objInLineShape 
End Sub

ყველა ტექსტური ველის დასაყრდენად, დაგჭირდებათ შემდეგი მაკრო:

Sub CenterTextBoxes()
  Dim objDoc As Document
  Dim objTextBox As Shape
 
  Set objDoc = ActiveDocument
 
  For Each objTextBox In objDoc.Shapes
    If objTextBox.Type = msoTextBox Then
      objTextBox.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
      objTextBox.Left = wdShapeCenter
    End If
  Next objTextBox
End Sub

სურათების და ტექსტური ყუთების დასაყრდენად, თქვენ უნდა გამოიყენოთ ეს:

Sub CenterInLinePicturesAndTextBoxes()
  Dim objInLineShape As InlineShape
  Dim objShape As Shape
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  For Each objInLineShape In objDoc.InlineShapes
    objInLineShape.Select
    Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
  Next objInLineShape
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
      objShape.Left = wdShapeCenter
    End If
  Next objShape
End Sub

6. და ბოლოს, დააჭირეთ ღილაკს "გაშვება" ან დააჭირეთ "F5".

მიმართეთ დოკუმენტის პრობლემებს

რაც არ უნდა უხალისოდ უნდა ვაღიაროთ, რომ Word არ არის უგუნური. მისმა რღვევამ შეიძლება გამოიწვიოს დოკუმენტების კორუფცია მემკვიდრეობით ა დაზიანებული docx შეიძლება ჩვენთვის გული გატკინოს. ასეთი შფოთვის შესამსუბუქებლად, მიზანშეწონილია წინასწარ ჩაეჭიდოთ დოკუმენტის აღდგენის ხელსაწყოს. მაშინ არ მოგიწევთ ფიქრი მონაცემების დაკარგვაზე.

ავტორი შესავალი:

ვერა ჩენი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის xlsx კორუფცია მდე pdf პროგრამული პროდუქტების შეკეთება. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად