ამ სტატიაში გვინდა წარმოგიდგინოთ Word დოკუმენტში კონკრეტული სიტყვების პირველი ასოს სტილის შეცვლის 3 მეთოდი.
დოკუმენტის ფორმატირების ერთ-ერთი საერთო წესია თითოეული წინადადების პირველი ასოს დიდი ასოებით. მაგრამ ზოგიერთ განსაკუთრებულ შემთხვევაში, როგორიცაა მხატვრულ დოკუმენტზე მუშაობა, არის კონკრეტული მოთხოვნები, რომლებიც უნდა დავაკმაყოფილოთ.
ამ პოსტში ჩვენ გაჩვენებთ 3 გზას, თუ როგორ შეცვალოთ სიტყვების პირველი ასოს სტილი 3 განსხვავებული მოთხოვნის შესაბამისად.
მეთოდი 1: შეცვალეთ თითოეული სიტყვის პირველი ასოს სტილი დოკუმენტში
- პირველ რიგში, Word-ში VBA რედაქტორის გამოსაძახებლად დააჭირეთ Alt+F11-ს.
- შემდეგ დააჭირეთ ღილაკს "ნორმალური" მარცხენა სვეტში.
- შემდეგი მენიუს ზოლში დააჭირეთ ღილაკს "ჩასმა".
- და დააჭირეთ "მოდულს" ჩამოსაშლელ მენიუში.
- ახლა ორჯერ დააწკაპუნეთ ახალ მოდულზე მის გასახსნელად და იქ ჩასვით შემდეგი კოდები:
Sub ChangeStyleOfFirstLetterInWords()
Dim objWord As Range
For Each objWord In ActiveDocument.Words
' Change the font size for the first letter in every word.
objWord.Characters(1).Font.Size = 16
' Set Bold font for the first letter in every word.
objWord.Characters(1).Font.Bold = True
' Change the font color for the first letter in every word.
objWord.Characters(1).Font.Color = wdColorGreen
Next
End Sub
- დაბოლოს, დააჭირეთ ღილაკს "Run".
აი შედეგი:
შენიშვნები:
-
Characters(1).Font.Size = 16
ეს ადგენს პირველი ასოს შრიფტის ზომას 16-ში. შეცვალეთ ნომერი, როგორც გსურთ.
-
Characters(1).Font.Bold = True
ეს სტრიქონი აყენებს პირველ ასოს თამამად. თუ არ გჭირდებათ, შეგიძლიათ შეცვალოთ „True“ „False“-ზე.
-
Characters(1).Font.Color = wdColorGreen
ეს ეხება მწვანე ფერს ასოზე. სასურველი ფერის ასარჩევად ეწვიეთ შემდეგ ბმულს: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)
მეთოდი 2: შეცვალეთ პირველი სიტყვის პირველი ასოს სტილი ყველა წინადადებაში
- პირველ რიგში, დააინსტალირეთ და გაუშვით მაკრო, როგორც ეს ნაჩვენებია მეთოდი 1-ში.
- შემდეგ შეცვალეთ ეს მაკრო:
Sub ChangeStyleOfFirstLetterInSentence()
Dim objSentence As Range
For Each objSentence In ActiveDocument.Sentences
' Change the font size for the first letter in every sentence.
objSentence.Words(1).Characters(1).Font.Size = 16
' Set Bold font for the first letter in every sentence.
objSentence.Words(1).Characters(1).Font.Bold = True
' Change the font color for the first letter in every sentence.
objSentence.Words(1).Characters(1).Font.Color = wdColorGreen
Next
End Sub
შეამოწმეთ შედეგი:
მეთოდი 3: ყველა აბზაცში პირველი სიტყვის პირველი ასოს სტილის შეცვლა
- ანალოგიურად, დააინსტალირეთ და გაუშვით მაკრო შემდეგი ნაბიჯებით მეთოდი 1.
- შემდეგ გამოიყენეთ ეს მაკრო:
Sub ChangeStyleOfFirstLetterInParagraphs()
Dim objParagraph As Word.Paragraph
For Each objParagraph In ActiveDocument.Paragraphs
' Change the font size for the first letter in every paragraph.
objParagraph.Range.Words(1).Characters(1).Font.Size = 16
' Set Bold font for the first letter in every paragraph.
objParagraph.Range.Words(1).Characters(1).Font.Bold = True
' Change the font color for the first letter in every paragraph.
objParagraph.Range.Words(1).Characters(1).Font.Bold = True
Next
End Sub
იხილეთ ეკრანის სურათი:
მონაცემთა დაკარგვის მართვის საუკეთესო მიდგომა
კრიტიკული მონაცემების დაკარგვა შეიძლება ძალიან სტრესული იყოს. ამიტომ, თქვენ უნდა იცოდეთ როგორ გაუმკლავდეთ ასეთ კატასტროფას. და რა თქმა უნდა, თქვენი საუკეთესო გამოსავალი არის ა დოკუმენტის შეკეთება სასარგებლო. მისი საშუალებით შეგიძლიათ თქვენი მონაცემების დაბრუნება უმცირეს დროში.
ავტორი შესავალი:
ვერა ჩენი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის Excel-ის შეკეთება მდე pdf პროგრამული პროდუქტების შეკეთება. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად




