kolombreedte

SUVERMO

New Member
Joined
Feb 23, 2019
Messages
2
Beste,


is het mogelijk om een ​​formule te koppelen aan de waarde van een cel?


Bijgevoegd een deel van een werkblad.
Als mannen in kolom BJ, de rijen 1,2,3,4 en 5 wijzigd in NEE, dan verandering de waarde in cel BJ7.
Bedoeling is dat de kolombreedte BI wordt automatisch aangepast aan de celinhoud van BI7.
 

SUVERMO

New Member
Joined
Feb 23, 2019
Messages
2
Kan ij iets voorstellen voor als de cel BJ7 veranderd.

groetjes

Vermonden Frans
 

WinteE

Well-known Member
Joined
Apr 8, 2007
Messages
605
Code:
Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Sheets("Sheet1").Range("B3")) Is Nothing Then
        Selection.ColumnWidth = Range("B3").Value
    End If

End Sub
Deze code wijzigt de kolombreedte van kolom B naar de waarde die wordt ingevoerd in cel B3.
 
Last edited:

Forum statistics

Threads
1,077,778
Messages
5,336,248
Members
399,072
Latest member
abublitz

Some videos you may like

This Week's Hot Topics

Top