Si të vendosni një gjerësi kolone të fletëllogaritjes Excel me VBA?

Përditësuar: gusht 2021; Punon në Excel 365, 2019, 2016.

Në tutorialin e sotëm të automatizimit të Excel do të mësojmë se si të ndryshojmë shpejt gjerësinë e një kolone të fletës së punës sipas nevojës – por në mënyrë programore duke përdorur VBA (Visual Basic për Aplikacione).

Parakushtet

Për të shkruar kodin VBA, para së gjithash duhet të siguroheni që skeda juaj e zhvilluesit të jetë e aktivizuar. Nëse nuk jeni të sigurt për procedurën, sigurohuni që të shikoni procedurën tonë të detajuar .

  • Në kompjuterin tuaj Windows, hapni Microsoft Excel .
  • Në shiritin kryesor goditi Zhvilluesi .
  • Shtypni komandën Visual Basic . Kjo do të hapë Redaktuesin VBA .
  • Në eksploruesin e projektit në anën e majtë, theksoni një fletë specifike në të cilën do të futni kodin tuaj. Përndryshe, mund të futni një modul të ri ose të shtoni kodin tonë në një modul ekzistues VBA.

Si të vendosni një gjerësi kolone të fletëllogaritjes Excel me VBA?

Vendosja e një gjerësie kolone

Në këtë shembull, ne do të zgjedhim një kolonë në fletën aktive të punës dhe do ta modifikojmë në përputhje me rrethanat.

  • Duke përdorur redaktuesin VBA, kopjoni kodin e mëposhtëm në fletën e punës ose modulin tuaj.

Sub Set_Column_Width()

Dim MySheet As Worksheet
Set MySheet = ActiveSheet

' Select one or multiple columns, set your column width as needed

With MySheet.Columns("B")

    .ColumnWidth = 50
End With

End Sub
  • Ekzekutoni kodin tuaj duke shtypur F5 ose zgjidhni Run >> Run Sub ose Form.
  • Ruani punën tuaj duke shtypur File >> Save ose ikonën Disk.

Ndryshoni gjerësinë e një diapazoni të shumëfishtë kolonash

Në këtë shembull ne zgjedhim një varg kolonash, më pas ndryshojmë gjerësinë.

Ju mund ta aplikoni kodin në të njëjtën mënyrë siç përshkruhet në seksionin e mëparshëm.

Sub Set_Column_Range_Width()

Dim MySheet As Worksheet

Set MySheet = ActiveSheet

' Set your column width as needed
With MySheet.Range("A:F")

    .ColumnWidth = .ColumnWidth * 1.5
End With

End Sub

Hapat e ardhshëm

Filloni me VBA? Sigurohuni që të shikoni bazat e VBA për udhëzuesin Excel .


Si të shkruani nga e djathta në të majtë në Microsoft Office 2016 , 2019 / 365?

Si të shkruani nga e djathta në të majtë në Microsoft Office 2016 , 2019 / 365?

Mësoni si të kaloni nga tastierat LTR në RTL në Microsoft Word.

Si të vendosni ngjyrën e shkronjave të tekstit Excel me VBA?

Si të vendosni ngjyrën e shkronjave të tekstit Excel me VBA?

Mësoni si të përdorni Excel VBA për të ndryshuar në mënyrë programore tekstin, ngjyrën, madhësinë dhe vetitë e qelizës.

Si të kontrolloni nëse një qelizë ose një varg qelizash të shumta është bosh me Excel VBA?

Si të kontrolloni nëse një qelizë ose një varg qelizash të shumta është bosh me Excel VBA?

Mësoni se si të programoni vba për të kërkuar qeliza boshe në një fletë pune ose një gamë qelizash.

Performanca e ngadaltë e Microsoft Word? Shtatë këshilla për ta bërë Word 365 / 2019 / 2016 të funksionojë shumë më shpejt

Performanca e ngadaltë e Microsoft Word? Shtatë këshilla për ta bërë Word 365 / 2019 / 2016 të funksionojë shumë më shpejt

Mësoni se si mund ta bëni me lehtësi Word 365 të funksionojë më shpejt duke çaktivizuar shtesat, duke përmirësuar harduerin tuaj dhe duke hequr qafe

A mund të fshij skedarët vc_red nga hard disku i kompjuterit tim personal?

A mund të fshij skedarët vc_red nga hard disku i kompjuterit tim personal?

Mësoni gjithçka që nevojitet për instalimin e VC_RED dhe skedarët e kabinetit. A është e sigurt t'i fshini ato nga sistemi juaj operativ Windows 7 & 10?

Si të punoni me kutitë e mesazheve dhe hyrjeve në PowerPoint VBA?

Si të punoni me kutitë e mesazheve dhe hyrjeve në PowerPoint VBA?

Mësoni se si të kodoni kutitë e mesazheve dhe hyrjeve me VBA në PowerPoint

Si të krijoni dhe shtoni rrëshqitje në prezantimet në PowerPoint me VBA?

Si të krijoni dhe shtoni rrëshqitje në prezantimet në PowerPoint me VBA?

Mësoni se si të shkruani një makro të thjeshtë VBA për të futur rrëshqitje dhe për të krijuar një Prezantim të ri

Si mund ti modifikoj ngjyrat e temës së ekranit të Office 2016?

Si mund ti modifikoj ngjyrat e temës së ekranit të Office 2016?

Mësoni se si të aplikoni skemat e ngjyrave të personalizuara të Office.

Shfaqni tekstin e kokës dhe të fundit vetëm në faqen e parë në Word 365 / 2016 / 2019 dhe Google Docs?

Shfaqni tekstin e kokës dhe të fundit vetëm në faqen e parë në Word 365 / 2016 / 2019 dhe Google Docs?

Mësoni se si të shfaqni fundin dhe kokën në faqen e parë vetëm në Word 365, 2016 dhe 2019; si dhe në Dokumentet e Google

Si të hapni skedarë .one në kompjuterët MAC dhe Windows?

Si të hapni skedarë .one në kompjuterët MAC dhe Windows?

Mësoni se si të hapni shtesat e skedarëve OneNote të MAC dhe Windows