Kuinka asettaa Excel-laskentataulukon sarakkeen leveys VBA: lla?

Päivitetty: elokuu 2021; Toimii Excel 365:ssä, 2019, 2016.

Tämän päivän Excel-automaatio-opetusohjelmassa opimme kuinka nopeasti muuttaa laskentataulukon sarakkeen leveyttä tarpeen mukaan – mutta ohjelmallisesti VBA:lla (Visual Basic for Applications).

Edellytykset

Jotta voit kirjoittaa VBA-koodin, sinun on ennen kaikkea varmistettava, että kehittäjä-välilehti on käytössä. Jos olet epävarma menettelystä, muista tutustua yksityiskohtaiseen menettelytapaamme .

Avaa Windows-tietokoneessa Microsoft Excel .
Päänauhassa hitti Developer .
Napsauta Visual Basic -komentoa. Tämä avaa VBA-editorin .
Korosta vasemmanpuoleisessa projektinhallinnassa tietty taulukko, johon syötät koodisi. Vaihtoehtoisesti voit lisätä uuden moduulin tai lisätä koodimme olemassa olevaan VBA-moduuliin.

Yhden sarakkeen leveyden asettaminen

Tässä esimerkissä valitsemme yhden sarakkeen aktiivisesta laskentataulukosta ja muokkaamme sitä vastaavasti.

Kopioi seuraava koodi laskentataulukkoon tai moduuliin VBA-editorilla.


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

Suorita koodisi painamalla F5 tai valitse Suorita >> Suorita ala tai lomake.
Tallenna työsi napsauttamalla Tiedosto >> Tallenna tai Levy-kuvaketta.

Muuta usean sarakkeen leveyttä

Tässä esimerkissä valitsemme sarakkeiden alueen ja muutamme sitten leveyttä.

Voit käyttää koodia samalla tavalla kuin edellisessä osiossa.

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

Seuraavat vaiheet

Aloitatko VBA:lla? Muista tutustua VBA:n perusteisiin Excel-oppaassa .

Jätä kommentti

Voittoa tavoittelemattoman organisaation vuosikertomuksen PowerPoint-malli: Ilmaiset latausvaihtoehdot ja dialuettelo

Luo selkeä voittoa tavoittelemattoman organisaation vuosikertomus PowerPointissa ilmaisen mallin, käytännöllisen diarakenteen, vaikuttavuusmittareiden, taloustietojen ja lahjoittajille tarkoitettujen esitysvinkkien avulla.

Minimalistinen sijoittajapuheen PowerPoint-malli teknologia-alan startup-yrityksille: Mitä sisällyttää ja mitä jättää pois

Rakenna clean tech -alan startup-sijoittajan pitch-deck PowerPointilla käytännöllisellä diarakenteella, näyttöön perustuvalla viestinnällä, saavutettavalla suunnittelulla ja vähemmillä häiriötekijöillä.

Yksinkertainen tehtävien delegointimatriisimalli Wordille: Käytännönläheinen versio pienten tiimien esimiehille

Käytä tätä yksinkertaista tehtävien delegointimatriisimallia Wordissa omistajien, päätösrajojen, määräaikojen ja tarkistuspisteiden määrittämiseen ilman, että pienen tiimin työstä tulee liian monimutkaista.

Yksinkertainen päivähoidon läsnäololomakkeen malli: Tulostettava kirjautuminen sisään ja ulos kotihoitoon

Käytä tätä yksinkertaista tulostettavaa päivähoidon läsnäololomaketta kotihoitoon. Lomakkeeseen tulee lasten nimet, saapumis- ja lähtöajat, allekirjoitukset ja vinkkejä sääntöjen noudattamiseen.

Tulostettava yhden sivun markkinointistrategiamalli paikallisille yrityksille

Käytä tätä tulostettavaa yksisivuista markkinointistrategiapohjaa määrittääksesi paikallisen yleisösi, tarjonnan, kanavat, budjetin, viikoittaiset toimenpiteet ja mitattavissa olevat tavoitteet.

Kuinka estää Exceliä muuttamasta numeroita automaattisesti päivämääriksi

Estä Exceliä muuntamasta arvoja, kuten 1/2, 11-53 tai JAN1, päivämääriksi. Opi luotettavia korjauksia kirjoittamiseen, liittämiseen, CSV-tuontiin ja jo muunnettujen solujen käyttöön.

Modern Real Estate Listing Presentation PowerPoint Template (Free): What to Include

Build a polished real estate listing PowerPoint for free with a practical slide plan, photo, branding, accessibility, compliance, and export tips.

Näin korjaat Outlookin virheen: sähköpostia voi vastaanottaa, mutta ei lähettää

Korjaa Outlook, kun sähköpostia voi vastaanottaa mutta ei lähettää. Tarkista Lähtevät, offline-tila, kirjautuminen, SMTP-asetukset, profiilit ja Microsoft 365 -muutokset.

Yksinkertainen kahden viikon välein tapahtuvan palkanmaksun Excel-seurantamalli pienille tiimeille: käytännön asennusopas

Rakenna yksinkertainen kahden viikon välein tapahtuva palkanmaksuseurantamalli Exceliin pienelle tiimille, mukaan lukien tunnit, palkat, vähennykset, tarkistusliput, yhteenvedot ja kirjanpito-ohjeet.

Tulostettava tapahtumasuunnittelun tarkistuslista ja budjettimalli Wordiin: Mitä sisällyttää ja milloin käyttää Exceliä

Luo tai mukauta tulostettava tapahtumasuunnittelun tarkistuslista ja budjettimalli Microsoft Wordissa, joka sisältää käytännön osioita, kompromisseja ja vinkkejä Wordin ja Excelin vertailuun.