Set the limit characters length in a cell

[lkikl]

Hi all

I would like to set 15 characters max in cell, i can set this max characters under the "Data Vaildation" . How can i set this function by VBA ?

[Gette]

Hi

try this :

With Selection.Validation

.Delete
.Add Type:=xlValidateTextLength, AlertStyle:=xlValidAlertStop, _
Operator:=xlBetween, Formula1:="0", Formula2:="15"

End With

Regards

Geert

[JOHN H. DAVIS]

Maybe:

Please Login or Register  to view this content.

[lkikl]

Maybe:

Please Login or Register  to view this content.

Hi, Its work, but how to set this on Column B3:B100,D3:D100,F3:F100 ?

[YasserKhalil]

Please Login or Register  to view this content.

[lkikl]

Its work, Thank you very much