Ինչպե՞ս Excel- ում խցանվել միայն առաջին տողը կամ առաջին բառը:
Excel- ի աշխատանքային թերթում կարող են լինել բազմաթիվ բջիջներ պարունակող բազմաթիվ բջիջներ, որոնք պարագրաֆացված են Alt + Enter ստեղներով: Որոշ դեպքերում կարող է անհրաժեշտ լինել, որ այս բջիջներում միայն առաջին տողը թեքեք: Կամ միայն թեքեք առաջին բառը բջիջներում այն բացառիկ դարձնելու համար: Այս հոդվածը մանրամասնորեն ցույց է տալիս ձեզ երկու մեթոդ `դրան հասնելու համար:
VBA կոդով խցիկով թեքեք միայն առաջին տողը VBA կոդով խցիկով թեքեք միայն առաջին բառը
VBA կոդով խցիկով թեքեք միայն առաջին տողը
Հետևյալ VBA կոդը կարող է օգնել արագորեն խստացնել միայն առաջին տողը ընտրված բջիջներում: Խնդրում եմ, արեք հետևյալ կերպ.
1. Մամուլ ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, Դրանից հետո պատճենեք և տեղադրեք ներքևի VBA կոդը Մոդուլի պատուհանում:
VBA կոդ. Բջիջներում թեքեք միայն առաջին տողը
Option Explicit
Sub BoldFirstLine()
Dim xRng As Range, xCell As Range
Dim xFirstRow As String
On Error Resume Next
Set xRng = Application.InputBox("Please select range:", "Kutools for", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
On Error Resume Next
For Each xCell In xRng
With xCell
.Characters(1, InStr(.Value, Chr(10))).Font.Bold = True
End With
Next
End Sub
3. Սեղմեք F5 ծածկագիրը գործելու համար: Հետո ա Excel- ի համար նախատեսված գործիքներ երկխոսության պատուհանը հայտնվում է, խնդրում ենք ընտրեք ընդգրկույթը առաջին գծի հետ, որն անհրաժեշտ է այն համարձակ դարձնելու համար, և այնուհետև կտտացրեք այն OK կոճակը:
Դրանից հետո դուք կարող եք տեսնել, որ ընտրված բջիջների բոլոր առաջին տողերը անմիջապես թավ են, ինչպես ցույց է տրված նկարում:
VBA կոդով խցիկով թեքեք միայն առաջին բառը
Ինչպես ցույց է տրված սքրինշոթի ներքևում, երբեմն, դուք պետք է առաջին բառը խեղդեք միայն A2 տիրույթում. A4 Excel- ում: Դուք դրան կարող եք հասնել քայլ առ քայլ, ինչպես հետևյալն է.
1. Մամուլ ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, Դրանից հետո պատճենեք և տեղադրեք ներքևի VBA կոդը Մոդուլի պատուհանում:
VBA կոդ. Բջիջներում թեքեք միայն առաջին բառը
Sub boldtext()
Dim xRng As Range, xCell As Range
On Error Resume Next
Set xRng = Application.InputBox("Please select range:", "Kutools fro Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
On Error Resume Next
For Each xCell In xRng
If xCell.Value <> "" Then
xCell.Characters(1, InStr(1, xCell.Value, " ") - 1).Font.Bold = True
End If
Next
End Sub
3. Սեղմեք F5 ծածկագիրը գործելու համար: Պատուհանման մեջ Excel- ի համար նախատեսված գործիքներ երկխոսության տուփ, ընտրեք այն տիրույթը, որը ցանկանում եք առաջին բառը համարձակ դարձնել, և այնուհետև սեղմել OK կոճակ Տեսեք,
Դրանից հետո դուք կարող եք տեսնել, որ ընտրված բջիջների բոլոր առաջին բառերը անմիջապես թավ են, ինչպես ցույց է տրված նկարում:
Առնչվող հոդված:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: