Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 175
Default Getting the columnmeads

Hi
I use this to make the values in a combobox
Dim myrange1 As Range

Set myrange1 = Sheets("ark1").Range("navne")
For Each a In myrange1
kurtype.AddItem a.Text
Next

The range("navn") is a namerange there taking all the values in row 1
In my combo box i want to see the values i have this is what i also have
today
but when i choose one value in my combobox i want to get the columnname as a
value in a variable or something like that

Hope someone understand

Regards
Alvin

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35,218
Default Getting the columnmeads

Maybe this'll give you an idea:

Option Explicit
Private Sub CommandButton1_Click()
Unload Me
End Sub
Private Sub CommandButton2_Click()
Dim myRange1 As Range
Set myRange1 = Sheets("ark1").Range("navne")
With kurtype
If .ListIndex < 0 Then
'nothing selected
Else
MsgBox .ListIndex & "--" & .Value & _
vbLf & myRange1.Cells(1).Offset(0, .ListIndex).Column
End If
End With
End Sub
Private Sub UserForm_Initialize()
Dim myRange1 As Range
Dim a As Range
Set myRange1 = Sheets("ark1").Range("navne")
For Each a In myRange1
kurtype.AddItem a.Text
Next
End Sub


alvin Kuiper wrote:

Hi
I use this to make the values in a combobox
Dim myrange1 As Range

Set myrange1 = Sheets("ark1").Range("navne")
For Each a In myrange1
kurtype.AddItem a.Text
Next

The range("navn") is a namerange there taking all the values in row 1
In my combo box i want to see the values i have this is what i also have
today
but when i choose one value in my combobox i want to get the columnname as a
value in a variable or something like that

Hope someone understand

Regards
Alvin


--

Dave Peterson
  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,123
Default Getting the columnmeads

Hi Alvin

I am not sure that I understand you ?
You can use kurtype.Value in your other code to use the value of the selected item in the combobox

--
Regards Ron de Bruin
http://www.rondebruin.nl


"alvin Kuiper" wrote in message ...
Hi
I use this to make the values in a combobox
Dim myrange1 As Range

Set myrange1 = Sheets("ark1").Range("navne")
For Each a In myrange1
kurtype.AddItem a.Text
Next

The range("navn") is a namerange there taking all the values in row 1
In my combo box i want to see the values i have this is what i also have
today
but when i choose one value in my combobox i want to get the columnname as a
value in a variable or something like that

Hope someone understand

Regards
Alvin



  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 175
Default Getting the columnmeads

Hej dave
MAybe i don't explain so good
What i want is the value of where the selected value are
Like is it in column A , b, h , q And so on

Regards
alvin


"Dave Peterson" wrote:

Maybe this'll give you an idea:

Option Explicit
Private Sub CommandButton1_Click()
Unload Me
End Sub
Private Sub CommandButton2_Click()
Dim myRange1 As Range
Set myRange1 = Sheets("ark1").Range("navne")
With kurtype
If .ListIndex < 0 Then
'nothing selected
Else
MsgBox .ListIndex & "--" & .Value & _
vbLf & myRange1.Cells(1).Offset(0, .ListIndex).Column
End If
End With
End Sub
Private Sub UserForm_Initialize()
Dim myRange1 As Range
Dim a As Range
Set myRange1 = Sheets("ark1").Range("navne")
For Each a In myRange1
kurtype.AddItem a.Text
Next
End Sub


alvin Kuiper wrote:

Hi
I use this to make the values in a combobox
Dim myrange1 As Range

Set myrange1 = Sheets("ark1").Range("navne")
For Each a In myrange1
kurtype.AddItem a.Text
Next

The range("navn") is a namerange there taking all the values in row 1
In my combo box i want to see the values i have this is what i also have
today
but when i choose one value in my combobox i want to get the columnname as a
value in a variable or something like that

Hope someone understand

Regards
Alvin


--

Dave Peterson

  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 175
Default Getting the columnmeads

Hi ron
MAybe i'm not xpalin me so good
My value in my combobox come from a row
and mybe from A to Q
What i want is when a choose a value in my combobox
maybe "Teskt1" then i want to see where tekst1 are in the sheet
is it in column A Or column G or .......... And so on

regards

Alvin


"Ron de Bruin" wrote:

Hi Alvin

I am not sure that I understand you ?
You can use kurtype.Value in your other code to use the value of the selected item in the combobox

--
Regards Ron de Bruin
http://www.rondebruin.nl


"alvin Kuiper" wrote in message ...
Hi
I use this to make the values in a combobox
Dim myrange1 As Range

Set myrange1 = Sheets("ark1").Range("navne")
For Each a In myrange1
kurtype.AddItem a.Text
Next

The range("navn") is a namerange there taking all the values in row 1
In my combo box i want to see the values i have this is what i also have
today
but when i choose one value in my combobox i want to get the columnname as a
value in a variable or something like that

Hope someone understand

Regards
Alvin






  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,123
Default Getting the columnmeads

You can use the index from the combobox

Try this

MsgBox Cells(1, Me.kurtype.Value + 1).Address


--
Regards Ron de Bruin
http://www.rondebruin.nl


"alvin Kuiper" wrote in message ...
Hi ron
MAybe i'm not xpalin me so good
My value in my combobox come from a row
and mybe from A to Q
What i want is when a choose a value in my combobox
maybe "Teskt1" then i want to see where tekst1 are in the sheet
is it in column A Or column G or .......... And so on

regards

Alvin


"Ron de Bruin" wrote:

Hi Alvin

I am not sure that I understand you ?
You can use kurtype.Value in your other code to use the value of the selected item in the combobox

--
Regards Ron de Bruin
http://www.rondebruin.nl


"alvin Kuiper" wrote in message
...
Hi
I use this to make the values in a combobox
Dim myrange1 As Range

Set myrange1 = Sheets("ark1").Range("navne")
For Each a In myrange1
kurtype.AddItem a.Text
Next

The range("navn") is a namerange there taking all the values in row 1
In my combo box i want to see the values i have this is what i also have
today
but when i choose one value in my combobox i want to get the columnname as a
value in a variable or something like that

Hope someone understand

Regards
Alvin






  #7   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,123
Default Getting the columnmeads

Oops Typo

Use Me.kurtype.ListIndex



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
You can use the index from the combobox

Try this

MsgBox Cells(1, Me.kurtype.Value + 1).Address


--
Regards Ron de Bruin
http://www.rondebruin.nl


"alvin Kuiper" wrote in message ...
Hi ron
MAybe i'm not xpalin me so good
My value in my combobox come from a row
and mybe from A to Q
What i want is when a choose a value in my combobox
maybe "Teskt1" then i want to see where tekst1 are in the sheet
is it in column A Or column G or .......... And so on

regards

Alvin


"Ron de Bruin" wrote:

Hi Alvin

I am not sure that I understand you ?
You can use kurtype.Value in your other code to use the value of the selected item in the combobox

--
Regards Ron de Bruin
http://www.rondebruin.nl


"alvin Kuiper" wrote in message
...
Hi
I use this to make the values in a combobox
Dim myrange1 As Range

Set myrange1 = Sheets("ark1").Range("navne")
For Each a In myrange1
kurtype.AddItem a.Text
Next

The range("navn") is a namerange there taking all the values in row 1
In my combo box i want to see the values i have this is what i also have
today
but when i choose one value in my combobox i want to get the columnname as a
value in a variable or something like that

Hope someone understand

Regards
Alvin








  #8   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 175
Default Getting the columnmeads

yes yes yes
Thanks Ron

regards
alvin


"Ron de Bruin" wrote:

Oops Typo

Use Me.kurtype.ListIndex



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
You can use the index from the combobox

Try this

MsgBox Cells(1, Me.kurtype.Value + 1).Address


--
Regards Ron de Bruin
http://www.rondebruin.nl


"alvin Kuiper" wrote in message ...
Hi ron
MAybe i'm not xpalin me so good
My value in my combobox come from a row
and mybe from A to Q
What i want is when a choose a value in my combobox
maybe "Teskt1" then i want to see where tekst1 are in the sheet
is it in column A Or column G or .......... And so on

regards

Alvin


"Ron de Bruin" wrote:

Hi Alvin

I am not sure that I understand you ?
You can use kurtype.Value in your other code to use the value of the selected item in the combobox

--
Regards Ron de Bruin
http://www.rondebruin.nl


"alvin Kuiper" wrote in message
...
Hi
I use this to make the values in a combobox
Dim myrange1 As Range

Set myrange1 = Sheets("ark1").Range("navne")
For Each a In myrange1
kurtype.AddItem a.Text
Next

The range("navn") is a namerange there taking all the values in row 1
In my combo box i want to see the values i have this is what i also have
today
but when i choose one value in my combobox i want to get the columnname as a
value in a variable or something like that

Hope someone understand

Regards
Alvin









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



All times are GMT +1. The time now is 09:05 AM.

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"