How do I change the width of the data validation list box?

I use data validation to select data entries. The width of the list box is
different in some worksheets. How do I control the width to expand when there
is longer text in the list range?

That box's width is determined by the width of the cell that has the
Data|Validation.

Can you widen the column?

Can you (ugh) merge some cells?

Davy Lawson wrote:
>
> I use data validation to select data entries. The width of the list box is
> different in some worksheets. How do I control the width to expand when there
> is longer text in the list range?

--

Dave Peterson

Or, if you can use programming, you could use a SelectionChange event to
temporarily widen the column. There are some instructions here:

http://www.contextures.com/xlDataVal08.html#Wider

Dave Peterson wrote:
> That box's width is determined by the width of the cell that has the
> Data|Validation.
>
> Can you widen the column?
>
> Can you (ugh) merge some cells?
>
> Davy Lawson wrote:
>
>>I use data validation to select data entries. The width of the list box is
>>different in some worksheets. How do I control the width to expand when there
>>is longer text in the list range?
>
>


--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

I went to the contextures link and used the code as it directed, however, I get an error message now.

If I go any of the cells in that column, the VBA code page opens up and I get the following message:

Compile Error:
Ambigous name detected: Worksheet _SelectionChange

and the following vb code is hightlighted:

Private Sub Worksheet_SelectionChange(ByVal Target As Range


The code I have used is:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column = 13 Then
Target.Columns.ColumnWidth = 40
Else
Columns(13).ColumnWidth = 20
End If
End Sub


Anyhelp would be appreciated.

your box is full so my message to you will not go through.
Where do you make a new post?