Ինչպե՞ս Excel- ում ավտոմատ տեղավորել սյունակի լայնությունը:
Excel- ում կարող եք սյունակի լայնությունը հարմարեցնել բջիջների պարունակությանը արագ տեղավորելու համար ՝ օգտագործելով AutoFit սյունակի լայնությունը առանձնահատկություն Երբեմն կցանկանայիք, որ սյունակի լայնությունն ավտոմատ կերպով թարմացվեր `հիմնվելով այդ սյունակում ամենաերկար տեքստի վրա, այսինքն` բջջի մեջ ինչ-որ երկար տեքստի տող մուտքագրելիս սյունի լայնությունը ավտոմատ կերպով կփոխվի, որպեսզի համապատասխանի բովանդակության երկարությանը: Հնարավո՞ր է դրանով զբաղվել Excel- ում:
Ավտոմատ տեղավորվող սյունակների լայնությունը VBA կոդով
Սյունակների լայնությունը ավտոմատ կերպով դյուրանցման ստեղներով
Ավտոմատ տեղավորվող սյունակների լայնությունը VBA կոդով
Թվում է, թե սյունակի լայնությունը ավտոմատ կերպով թարմացվում է բջիջների բովանդակության երկարությամբ, հետաքրքիր հնարք է, այն ավարտելու համար կարող եք օգտագործել հետևյալ VBA կոդը:
1, Պահեք պահեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.
2. Դրանից հետո կրկնակի կտտացրեք Այս գործառույթը է VBA նախագիծ ձախ պատուհանի օբյեկտները դատարկ մոդուլ բացելու համար, ապա VBA կոդի հետևյալը պատճենեք և կպցրեք Մոդուլի մեջ.
VBA կոդ. Աշխատանքային գրքում ավտոմատ տեղավորվող սյունակ
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'Update 20141127
Dim xCol, xoutCol
xCol = Target.Column
If xCol > 52 Then
xoutCol = Chr(Int((xCol - 1) / 52) + 64) & _
Chr(Int((xCol - 27) / 26) + 64) & _
Chr(Int((xCol - 27) Mod 26) + 65)
ElseIf xCol > 26 Then
xoutCol = Chr(Int((xCol - 1) / 26) + 64) & _
Chr(Int((xCol - 1) Mod 26) + 65)
Else
xoutCol = Chr(xCol + 64)
End If
Columns(xoutCol & ":" & xoutCol).AutoFit
End Sub
3, Դրանից հետո պահեք և փակեք այս կոդը, և այժմ, երբ երկար տեքստ մուտքագրեք բջիջ, սյունի լայնությունը կկարգավորվի ՝ ինքնաբերաբար տեղավորվելու բովանդակությանը:
Սյունակների լայնությունը ավտոմատ կերպով դյուրանցման ստեղներով
Եթե ունեք բազմաթիվ սյուններ, որոնց բջջային բովանդակության մի մասը թաքնված է, ինչպես ցույց է տրված հետևյալ նկարը, դուք ցանկանում եք միանգամից չափափոխել սյունակի լայնությունները ՝ դրանց բովանդակությանը համապատասխանելու համար: Հետևյալ դյուրանցման ստեղները կարող են օգնել ձեզ:
1, Ընտրեք տվյալների տիրույթը, որը ցանկանում եք փոխել սյունակի լայնությունը:
2, Պահեք ալտ բանալին եւ սեղմեք H + O + I, և այժմ ձեր սյունների լայնություններն անմիջապես ավտոմատ կերպով տեղադրվել են դրանց բովանդակության վրա: Տեսեք,
Նշում: Եթե օգտագործում եք Excel 2003 և ավելի վաղ տարբերակը, ապա ձեզ հարկավոր է օգտագործել այս դյուրանցման ստեղները. ALT + O + C + A.
Առնչվող հոդվածներ քանակը:
Ինչպե՞ս ավտոմատ կերպով տեղավորել Excel- ում միավորված բջիջների տողի բարձրությունը:
Ինչպե՞ս չափափոխել շարքի բարձրությունը կամ սյունի լայնությունը ՝ Excel- ում տեքստը տեղավորելու համար:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: