Gegevensblad kolombreedte wijzigen

Status
Niet open voor verdere reacties.

linkav

Gebruiker
Lid geworden
13 jun 2007
Berichten
465
Beste,

Kan ik in code de kolombreedte wijzigen van 1 of meerdere kolommen in een gegevensblad?
 
Dat kan op 2 manieren:
1. De kolombreedte automatisch aanpassen op basis van de breedte van de kolom(kop)
2. De breedte handmatig instellen.
De tweede optie werkt met twips en vereist dus wat rekenwerk (1 inch = 1440 twips)

Met code, en ik gebruik daarbij beide opties in één routine:
Code:
Private Sub Form_Current()
Dim ctl As Control
    For Each ctl In Me.Controls
        On Error Resume Next
        ctl.ColumnWidth = -2
    Next ctl
    Me.AandachtspuntenID.ColumnWidth = 1000
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan