infostabil > edb.* > edb.regneark

Toppen (07.01.2020, 16:33)
Er det muligt at lægge en fast kolonnebredde ind i regnearket, forstået på den måde af fx. kolonne "A"=9; Kolonne "B"=11; kolonne "C"=15 osv.?

pfh. tak.

Søren
Jan Kronsell (08.01.2020, 23:42)
On 07-01-2020 15:33, Toppen wrote:
> Er det muligt at lægge en fast kolonnebredde ind i regnearket, forstået på den måde af fx. kolonne "A"=9; Kolonne "B"=11; kolonne "C"=15 osv.?
> pfh. tak.
> Søren


Du er nødt til at sætte kolonnebredderne til det, du vil have dem til i
et tom regneark først. Derefter kan du gemme dette som en skabelon.

Hvis du synes at det er besværligt at tilrette alle kolonner manuelt,
kan denne makro gører det for dig.

Sub kolbred()
Dim bred As Double
bred = 9
For Each col In ActiveSheet.Range("A:AZ").Columns
col.ColumnWidth = bred
bred = bred + 2
Next col
End Sub

Ret selv de kolonner, det skal gøres for. Her alle mellem A og AZ.

Hvis du kun skal bruge det en gang, kan du nøjes med at køre makroen, så
skal du ikke gemme som skabelon.

Jan
Toppen (09.01.2020, 17:04)
Super

Tusind tak. :-)

mvh
Søren
Lignende emner