CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede swamboo Seniormester
23. november 2022 - 21:14 Der er 3 kommentarer og
3 løsninger

Width er ikke Width, men Width?!?

Jeg er forvirret.

Jeg skriver:
Columns("G:G").ColumnWidth = 1.44

Men skriver jeg:
MsgBox (Columns("g").Width)
    så bliver svaret 12

og holder jeg musen over feltet, så får jeg tallet 20 pixels.

Hvordan sætter jeg og udlæser jeg samme tal - så er jeg egentlig lige glad om det er pix, tommer eller noget andet - bare noget jeg kan regne med begge steder.... 😁

På forhånd tak!!! 😎
Avatar billede store-morten Ekspert
24. november 2022 - 01:00 #1
Columns("G:G").ColumnWidth = 1.44

'Men skriver du:
MsgBox (Columns("G").ColumnWidth)
'så bliver svaret 1.45

1.44 kan ikke bruges! Det rettes automatisk af Excel til 1.45
Avatar billede Dan Elgaard Ekspert
24. november 2022 - 12:22 #2
.Width giver bredden i points, og er en 'Read-Only' egenskab.

.ColumnWidth giver bredden i normal tegn (antallet af 0, der kan være i cellen).
Denne egenskab kan både læses og skrives - aftså skjal du benytte .ColumnWidth
Avatar billede jens48 Ekspert
24. november 2022 - 14:17 #3
Men du kan undgå en smule af forvirringen, hvis du går ind i File - Options - Advanced og under Display sætter "Ruler units" til millimeter i stedet for Default Units. Så vil værdien du får når du kører musen over feltet være lig med det du skrev i makroen
Avatar billede swamboo Seniormester
24. november 2022 - 21:50 #4
SUPER!!!! 3 perfekte svar. 1000 tak

Tillægsspørgsmål:
Hvis man vil have flere kolonner talt sammen, virker dette ikke:

MsgBox (Columns("A:G").ColumnWidth)

Kan man gøre noget smart, udover at tælle dem enkeltvis?
Avatar billede jens48 Ekspert
24. november 2022 - 22:41 #5
Du kan mærke A1:G1 op og køre denne makro:

Sub test()
Dim c As Range
x = 0
For Each c In Selection
x = x + c.ColumnWidth
Next
MsgBox (x)
End Sub
Avatar billede store-morten Ekspert
24. november 2022 - 22:44 #6
Dim i As Integer

    For Kol = 1 To 7
        KolTotal = KolTotal + (Columns(Kol).ColumnWidth)
    Next
    MsgBox KolTotal
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Excel åbner fil i kæmpe format Af Aske i Excel 8 I dag 06:10 I dag 11:56
Summere beløb pr. dato Af TTA i Excel 2 I går 12:37 I går 15:30
Betinget formattering af flere celler vandret og lodret. Af Sussie i Excel 10 30/10/202408:41 30/10/202417:18
Ombrydning af tekst i en celle efter et tegn Af FinnLauridsen i Excel 8 29/10/202411:50 29/10/202414:18
Tidsintervaller i Excel Af Karsten KTL i Excel 3 29/10/202411:47 30/10/202414:20
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 06:10 Excel åbner fil i kæmpe format Af Aske i Excel
I går 22:00 Datafordeler Af Lsk i PHP
I går 12:37 Summere beløb pr. dato Af TTA i Excel
31/1022:44 Tilslutte chassic fans Af viking69 i PC
31/1020:28 LED lysstofrør Af ErikHg i Fri debat
White papers
Flere white papers »


Premium
Teaser billede
Staten vil selv udvikle kæmpe it-system til 650 millioner kroner: Nu tvinges regeringen til at lægge vigtige dokumenter frem
Læs mere »
Det går fantastisk på det danske Dynamics-marked: NNIT-selskabet Scales kan vælge og vrage mellem opgaver
Skelsættende GDPR-sag ændrer definitionen af 'følsomme oplysninger'
Microsoft: Tvungen skift til Windows 11 kan udskydes med et år, hvis du betaler os 200 kroner
Se alle »
Computerworld
Teaser billede
Russisk domstol: Google skal betale 20 kvintilliarder dollar i bøde - fordobles løbende
Læs mere »
Microsoft: Windows-opdateringer bliver nu 45 procent hurtigere
Test: Det er nærmest vanedannede at anvende disse mini-tastaturer
Prøvekørt: Mægtige, magelige Volvo EX90 er den fødte skærgårdskrydser
Se alle »
CIO
Teaser billede
Novo Nordisk satsede på HoloLens, men nu har Microsoft dræbt produktet
Læs mere »
Microsoft: Sådan arbejder Google målrettet på at skade os i det skjulte
Efter markante prisstigninger: VMware-kunder får dummebøder hvis de ikke skifter hurtigt nok til ny licens-ordning
Trods "indlysende ulempe": CIO Torben Ruberg siger nej til at konsolidere Satairs stribe af ERP-systemer
Se alle »
Job & Karriere
Teaser billede
Pludselig exit fra Schultz kom som en overraskelse for Merete Søby: Derfor stoppede samarbejdet
Læs mere »
Merete Søby fratræder med omgående virkning som CEO for Schultz efter blot tre måneder på posten
Danske Aeven flytter hele hovedkontoret med 600 medarbejdere til ny adresse og tager Sentia med
Microsoft klar med ny direktion for den danske forretning: Her er de nye direktører
Se alle »
White paper
Teaser billede
Styrk compliance, sikkerhed og overblik med ét hug
Læs mere »
Sikkerhed uden grænser: Cisco Hypershield
SAP: Skab værdi og minimér omkostninger med effektiv dokumenthåndtering
Informationshåndtering på frontlinjen: Sådan optimerer du med automatisering
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »