Kako postaviti širinu stupca proračunske tablice u Excelu pomoću VBA?

Ažurirano: kolovoz 2021.; Radi na Excelu 365, 2019, 2016.

U današnjem vodiču za automatizaciju Excela naučit ćemo kako brzo promijeniti širinu stupca radnog lista prema potrebi – ali programski koristeći VBA (Visual Basic za aplikacije).

Preduvjeti

Da biste napisali VBA kod, morate prije svega osigurati da je kartica programera omogućena. Ako niste sigurni u postupak, svakako pogledajte naš detaljni postupak .

Na računalu sa sustavom Windows otvorite Microsoft Excel .
Na glavnoj vrpci pritisnite Developer .
Pritisnite naredbu Visual Basic . Ovo će otvoriti VBA Editor .
U istraživaču projekata s lijeve strane označite određeni list u koji ćete umetnuti svoj kod. Alternativno, možete umetnuti novi modul ili dodati naš kod u postojeći VBA modul.

Postavljanje širine jednog stupca

U ovom primjeru odabrat ćemo jedan stupac u aktivnom radnom listu i u skladu s tim ga izmijeniti.

Koristeći VBA Editor, kopirajte sljedeći kod na svoj radni list ili modul.


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

Pokrenite svoj kôd pritiskom na F5 ili odaberite Run >> Run Sub ili Form.
Spremite svoj rad pritiskom na Datoteka >> Spremi ili ikonu Disk.

Promjena širine raspona više stupaca

U ovom primjeru biramo raspon stupaca, a zatim mijenjamo širinu.

Kod možete primijeniti na isti način kao što je opisano u prethodnom odjeljku.

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

Sljedeći koraci

Početi s VBA? Obavezno pogledajte VBA osnove za vodič za Excel .

Ostavite komentar

Predložak za PowerPoint godišnje izvješće neprofitne organizacije: besplatne opcije preuzimanja i kontrolni popis slajdova

Izradite jasno godišnje izvješće neprofitne organizacije u PowerPointu s besplatnim predloškom, praktičnom strukturom slajdova, metrikama utjecaja, financijskim podacima i savjetima za prezentacije spremnim za donatore.

Minimalistički PowerPoint predložak za prezentaciju investitorima za tehnološke startupove: Što uključiti, a što izostaviti

Izradite prezentaciju za investitore u startup s čistom tehnologijom u PowerPointu s praktičnom strukturom slajdova, porukama koje stavljaju dokaze na prvo mjesto, pristupačnim dizajnom i manje ometanja.

Predložak jednostavne matrice delegiranja zadataka za Word: Praktična verzija za voditelje malih timova

Pomoću ovog jednostavnog predloška matrice delegiranja zadataka u Wordu dodijelite vlasnike, ograničenja odluka, rokove i kontrolne točke bez prekomjernog kompliciranja malog tima.

Jednostavan predložak za evidenciju prisutnosti u vrtiću: Ispisiva prijava i odjava za kućnu brigu o djeci

Koristite ovaj jednostavni ispisivi popis prisutnosti u vrtiću za kućnu brigu o djeci, s imenima djece, vremenima dolaska/odlaska, potpisima i savjetima o usklađenosti.

Predložak marketinške strategije na jednoj stranici za ispis za lokalna poduzeća

Pomoću ovog predloška marketinške strategije od jedne stranice za ispis definirajte svoju lokalnu publiku, ponudu, kanale, proračun, tjedne akcije i mjerljive ciljeve.

Kako spriječiti Excel da automatski mijenja brojeve u datume

Spriječite Excel da pretvara vrijednosti poput 1/2, 11-53 ili JAN1 u datume. Naučite pouzdana rješenja za tipkanje, lijepljenje, uvoz CSV datoteka i već pretvorene ćelije.

PowerPoint predložak za modernu prezentaciju nekretnina (besplatno): Što uključiti

Besplatno izradite uglađen PowerPoint prezentaciju s popisom nekretnina uz praktičan plan slajdova, fotografiju, brendiranje, pristupačnost, usklađenost i savjete za izvoz.

Kako riješiti grešku Outlooka: ne može slati e-poštu, ali može primati

Popravite Outlook kada možete primati e-poštu, ali ne i slati. Provjerite mapu Odlazne, način rada bez veze, prijavu, SMTP postavke, profile i promjene u Microsoft 365.

Jednostavni Excel predložak za dvotjedni obračun plaća za male timove: Praktični vodič za postavljanje

Izradite jednostavan dvotjedni obračun plaća u Excelu za mali tim, s evidencijom radnih sati, plaća, odbitaka, oznaka za pregled, sažecima i smjernicama za vođenje evidencije.

Predložak za provjeru planiranja događaja i proračun za Word za ispis: Što uključiti i kada umjesto toga koristiti Excel

Izradite ili prilagodite predložak proračuna i kontrolni popis za planiranje događaja za ispis u programu Microsoft Word, s praktičnim odjeljcima, kompromisima i savjetima za Word u odnosu na Excel.