Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 32
Default Help for a combo box

I have the following code running for a combobox

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 2

If LCase(myCell.Value) Like LCase(myPfx) Then
Me.ComboBox2.AddItem myCell.Offset(0, 3)
Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 1) = myCell.row
End If

I don't know how to make the combo box show a third column. I want to show
the value of myCell, the offset of myCell, and the row that they come from.
Other than changing the ColumnCount=3 what line of code do I put into the IF
statement to show the value in the order listed above?

This is running in Excel2003.


  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,120
Default Help for a combo box

Do you mean?

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 3

If LCase(myCell.Value) Like LCase(myPfx) Then
Me.ComboBox2.AddItem myCell.Offset(0, 3)
Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 2) = myCell.row
End If


--
HTH

Bob Phillips

"L.White" wrote in message
...
I have the following code running for a combobox

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 2

If LCase(myCell.Value) Like LCase(myPfx) Then
Me.ComboBox2.AddItem myCell.Offset(0, 3)
Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 1) = myCell.row
End If

I don't know how to make the combo box show a third column. I want to show
the value of myCell, the offset of myCell, and the row that they come

from.
Other than changing the ColumnCount=3 what line of code do I put into the

IF
statement to show the value in the order listed above?

This is running in Excel2003.




  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 32
Default Help for a combo box

That was what I needed. My new code looks like....

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 3

If LCase(myCell.Value) Like LCase(myPfx) Then
1) Me.ComboBox2.AddItem myCell.Offset(0, 3)
2) Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 1) = myCell
3) Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 2) = myCell.row
End If

Unfortunately I now have another question. When I view the contents of the
box I see the contents of column 1) completely. Column 3) is small so I can
see the full contents of it as well. Column 2) is not completely visible.
How do I control the size of 2)? When I hit the drop down I want to see the
full contents of the longest cell in the box.

LWhite


"Bob Phillips" wrote in message
...
Do you mean?

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 3

If LCase(myCell.Value) Like LCase(myPfx) Then
Me.ComboBox2.AddItem myCell.Offset(0, 3)
Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 2) = myCell.row
End If


--
HTH

Bob Phillips

"L.White" wrote in message
...
I have the following code running for a combobox

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 2

If LCase(myCell.Value) Like LCase(myPfx) Then
Me.ComboBox2.AddItem myCell.Offset(0, 3)
Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 1) = myCell.row
End If

I don't know how to make the combo box show a third column. I want to
show
the value of myCell, the offset of myCell, and the row that they come

from.
Other than changing the ColumnCount=3 what line of code do I put into the

IF
statement to show the value in the order listed above?

This is running in Excel2003.






  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,120
Default Help for a combo box

You can set the columnwidths via the Columnwidths property, but it affects
all columns, and it isn't dynamic as you seem to ask. You can also widen the
combobox.

--
HTH

Bob Phillips

"L.White" wrote in message
...
That was what I needed. My new code looks like....

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 3

If LCase(myCell.Value) Like LCase(myPfx) Then
1) Me.ComboBox2.AddItem myCell.Offset(0, 3)
2) Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 1) = myCell
3) Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 2) =

myCell.row
End If

Unfortunately I now have another question. When I view the contents of the
box I see the contents of column 1) completely. Column 3) is small so I

can
see the full contents of it as well. Column 2) is not completely visible.
How do I control the size of 2)? When I hit the drop down I want to see

the
full contents of the longest cell in the box.

LWhite


"Bob Phillips" wrote in message
...
Do you mean?

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 3

If LCase(myCell.Value) Like LCase(myPfx) Then
Me.ComboBox2.AddItem myCell.Offset(0, 3)
Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 2) = myCell.row
End If


--
HTH

Bob Phillips

"L.White" wrote in message
...
I have the following code running for a combobox

Me.ComboBox2.Clear
Me.ComboBox2.ColumnCount = 2

If LCase(myCell.Value) Like LCase(myPfx) Then
Me.ComboBox2.AddItem myCell.Offset(0, 3)
Me.ComboBox2.List(Me.ComboBox2.ListCount - 1, 1) =

myCell.row
End If

I don't know how to make the combo box show a third column. I want to
show
the value of myCell, the offset of myCell, and the row that they come

from.
Other than changing the ColumnCount=3 what line of code do I put into

the
IF
statement to show the value in the order listed above?

This is running in Excel2003.








  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 32
Default Help for a combo box

What I have as a sample of the data is the following, each number matching
to part of the combobox.

1) SCREW FOR TOOLING BALL BOXES
2) AS30214.12.7
3) 350

I can currently read all of 1), The 7 gets cut off of 2) and I can read all
of 3). The information above is exactly what I see in my spreadsheet.
Current settings a

column width 300pt
column count 3
bound column 1
column heads false
list rows 8
text column -1
top index -1
misc width 449.25

Are there any other settings I should list for you? Thanks for your help so
far. I really appreciate it.
L.White

"Bob Phillips" wrote in message
...
You can set the columnwidths via the Columnwidths property, but it affects
all columns, and it isn't dynamic as you seem to ask. You can also widen
the
combobox.

--
HTH

Bob Phillips





  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,120
Default Help for a combo box

Afraid I can't see the problem. I put AS30214.12.7 in A1, set myCell to A1,
put 1) in C1, and it all showed as I expected, no truncation.

You don't have any special formatting on the cell by chance?

--
HTH

Bob Phillips

"L.White" wrote in message
...
What I have as a sample of the data is the following, each number matching
to part of the combobox.

1) SCREW FOR TOOLING BALL BOXES
2) AS30214.12.7
3) 350

I can currently read all of 1), The 7 gets cut off of 2) and I can read

all
of 3). The information above is exactly what I see in my spreadsheet.
Current settings a

column width 300pt
column count 3
bound column 1
column heads false
list rows 8
text column -1
top index -1
misc width 449.25

Are there any other settings I should list for you? Thanks for your help

so
far. I really appreciate it.
L.White

"Bob Phillips" wrote in message
...
You can set the columnwidths via the Columnwidths property, but it

affects
all columns, and it isn't dynamic as you seem to ask. You can also widen
the
combobox.

--
HTH

Bob Phillips





Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
linking a form combo box... results from the combo box to another Trey Excel Discussion (Misc queries) 1 July 15th 07 01:58 AM
combo reference on another combo box for picking address etc. kbjin Excel Worksheet Functions 1 December 8th 06 03:29 PM
Combo box values based on other combo box value JCanyoneer Excel Programming 1 April 5th 05 06:41 PM
"Combo Box - getting control combo box to stick in place in worksh ajr Excel Discussion (Misc queries) 1 February 16th 05 02:05 AM
"Combo Box - getting control combo box to stick in place in worksh ajr Excel Discussion (Misc queries) 0 February 15th 05 07:45 PM


All times are GMT +1. The time now is 05:43 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"