Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
combobox filling problem
hi ! i have a problem with the filling of a comobobox. first of all a code sniplet: Private Sub Worksheet_Activate() ComboBox1.Clear ComboBox1.AddItem "Fichte/Lärche" ComboBox1.AddItem "Mischwald" ComboBox1.AddItem "Laubwald" ComboBox1.AddItem "Kiefer/Auwald" ComboBox1.Text = ComboBox1.List(0) End Sub the problem: if i open the excel file the combobox is empty or one entry is inside but the others are missing. i can't imagine where the problem is. the code is very simple and clear... do anybody have an idea ? if there are any questions plz take a look at the attached file +-------------------------------------------------------------------+ |Filename: Testfall_A1_Bodenwert.zip | |Download: http://www.excelforum.com/attachment.php?postid=4359 | +-------------------------------------------------------------------+ -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
combobox filling problem
Works OK for me (XL2003). And yours worked if you ativate the sheet by
sitching to sheet2 and then sheet1. "honoluluzulu" wrote: hi ! i have a problem with the filling of a comobobox. first of all a code sniplet: Private Sub Worksheet_Activate() ComboBox1.Clear ComboBox1.AddItem "Fichte/LĂ€rche" ComboBox1.AddItem "Mischwald" ComboBox1.AddItem "Laubwald" ComboBox1.AddItem "Kiefer/Auwald" ComboBox1.Text = ComboBox1.List(0) End Sub the problem: if i open the excel file the combobox is empty or one entry is inside but the others are missing. i can't imagine where the problem is. the code is very simple and clear... do anybody have an idea ? if there are any questions plz take a look at the attached file +-------------------------------------------------------------------+ |Filename: Testfall_A1_Bodenwert.zip | |Download: http://www.excelforum.com/attachment.php?postid=4359 | +-------------------------------------------------------------------+ -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
combobox filling problem
this is true, but is there a possibility to fill the combobox by opening the file ?! so i have to switch to sheet 2 and return to sheet 1 - this is not a good solution.... Toppers Wrote: Works OK for me (XL2003). And yours worked if you ativate the sheet by sitching to sheet2 and then sheet1. "honoluluzulu" wrote: hi ! i have a problem with the filling of a comobobox. first of all a code sniplet: Private Sub Worksheet_Activate() ComboBox1.Clear ComboBox1.AddItem "Fichte/LĂ€rche" ComboBox1.AddItem "Mischwald" ComboBox1.AddItem "Laubwald" ComboBox1.AddItem "Kiefer/Auwald" ComboBox1.Text = ComboBox1.List(0) End Sub the problem: if i open the excel file the combobox is empty or one entry is inside but the others are missing. i can't imagine where the problem is. the code is very simple and clear... do anybody have an idea ? if there are any questions plz take a look at the attached file +-------------------------------------------------------------------+ |Filename: Testfall_A1_Bodenwert.zip | |Download: http://www.excelforum.com/attachment.php?postid=4359 | +-------------------------------------------------------------------+ -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
combobox filling problem
put code in "Thisworkbook" so combobox is filled when workbook is opened
Sub workbook_open() With Worksheets("sheet1") ..ComboBox1.Clear ..ComboBox1.AddItem "Fichte/LĂ€rche" ..ComboBox1.AddItem "Mischwald" ..ComboBox1.AddItem "Laubwald" ..ComboBox1.AddItem "Kiefer/Auwald" End With End Sub "Toppers" wrote: Works OK for me (XL2003). And yours worked if you ativate the sheet by sitching to sheet2 and then sheet1. "honoluluzulu" wrote: hi ! i have a problem with the filling of a comobobox. first of all a code sniplet: Private Sub Worksheet_Activate() ComboBox1.Clear ComboBox1.AddItem "Fichte/LĂ€rche" ComboBox1.AddItem "Mischwald" ComboBox1.AddItem "Laubwald" ComboBox1.AddItem "Kiefer/Auwald" ComboBox1.Text = ComboBox1.List(0) End Sub the problem: if i open the excel file the combobox is empty or one entry is inside but the others are missing. i can't imagine where the problem is. the code is very simple and clear... do anybody have an idea ? if there are any questions plz take a look at the attached file +-------------------------------------------------------------------+ |Filename: Testfall_A1_Bodenwert.zip | |Download: http://www.excelforum.com/attachment.php?postid=4359 | +-------------------------------------------------------------------+ -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
combobox filling problem
See my second reply.
"honoluluzulu" wrote: this is true, but is there a possibility to fill the combobox by opening the file ?! so i have to switch to sheet 2 and return to sheet 1 - this is not a good solution.... Toppers Wrote: Works OK for me (XL2003). And yours worked if you ativate the sheet by sitching to sheet2 and then sheet1. "honoluluzulu" wrote: hi ! i have a problem with the filling of a comobobox. first of all a code sniplet: Private Sub Worksheet_Activate() ComboBox1.Clear ComboBox1.AddItem "Fichte/LĂ€rche" ComboBox1.AddItem "Mischwald" ComboBox1.AddItem "Laubwald" ComboBox1.AddItem "Kiefer/Auwald" ComboBox1.Text = ComboBox1.List(0) End Sub the problem: if i open the excel file the combobox is empty or one entry is inside but the others are missing. i can't imagine where the problem is. the code is very simple and clear... do anybody have an idea ? if there are any questions plz take a look at the attached file +-------------------------------------------------------------------+ |Filename: Testfall_A1_Bodenwert.zip | |Download: http://www.excelforum.com/attachment.php?postid=4359 | +-------------------------------------------------------------------+ -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
combobox filling problem
i already had this idea but if you try Combobox1 is unknown at this point i get an error "subscript out of range" by compiling this code at workbook open action Private Sub Workbook_Open() With Worksheets("Sheet1") ComboBox1.Clear ComboBox1.AddItem "Fichte/Lärche" ComboBox1.AddItem "Mischwald" ComboBox1.AddItem "Laubwald" ComboBox1.AddItem "Kiefer/Auwald" End With End Sub Toppers Wrote: See my second reply. "honoluluzulu" wrote: this is true, but is there a possibility to fill the combobox by opening the file ?! so i have to switch to sheet 2 and return to sheet 1 - this is not a good solution.... Toppers Wrote: Works OK for me (XL2003). And yours worked if you ativate the sheet by sitching to sheet2 and then sheet1. "honoluluzulu" wrote: hi ! i have a problem with the filling of a comobobox. first of all a code sniplet: Private Sub Worksheet_Activate() ComboBox1.Clear ComboBox1.AddItem "Fichte/LĂ€rche" ComboBox1.AddItem "Mischwald" ComboBox1.AddItem "Laubwald" ComboBox1.AddItem "Kiefer/Auwald" ComboBox1.Text = ComboBox1.List(0) End Sub the problem: if i open the excel file the combobox is empty or one entry is inside but the others are missing. i can't imagine where the problem is. the code is very simple and clear... do anybody have an idea ? if there are any questions plz take a look at the attached file +-------------------------------------------------------------------+ |Filename: Testfall_A1_Bodenwert.zip | |Download: http://www.excelforum.com/attachment.php?postid=4359 | +-------------------------------------------------------------------+ -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
combobox filling problem
sorry my fault ;-) i changed the source like this Private Sub Workbook_Open() Sheet1.ComboBox1.Clear Sheet1.ComboBox1.AddItem "Fichte/Lärche" Sheet1.ComboBox1.AddItem "Mischwald" Sheet1.ComboBox1.AddItem "Laubwald" Sheet1.ComboBox1.AddItem "Kiefer/Auwald" End Sub and here we go.. it works ;) give thanks for support ! Toppers Wrote: See my second reply. "honoluluzulu" wrote: this is true, but is there a possibility to fill the combobox by opening the file ?! so i have to switch to sheet 2 and return to sheet 1 - this is not a good solution.... Toppers Wrote: Works OK for me (XL2003). And yours worked if you ativate the sheet by sitching to sheet2 and then sheet1. "honoluluzulu" wrote: hi ! i have a problem with the filling of a comobobox. first of all a code sniplet: Private Sub Worksheet_Activate() ComboBox1.Clear ComboBox1.AddItem "Fichte/LĂ€rche" ComboBox1.AddItem "Mischwald" ComboBox1.AddItem "Laubwald" ComboBox1.AddItem "Kiefer/Auwald" ComboBox1.Text = ComboBox1.List(0) End Sub the problem: if i open the excel file the combobox is empty or one entry is inside but the others are missing. i can't imagine where the problem is. the code is very simple and clear... do anybody have an idea ? if there are any questions plz take a look at the attached file +-------------------------------------------------------------------+ |Filename: Testfall_A1_Bodenwert.zip | |Download: http://www.excelforum.com/attachment.php?postid=4359 | +-------------------------------------------------------------------+ -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 -- honoluluzulu ------------------------------------------------------------------------ honoluluzulu's Profile: http://www.excelforum.com/member.php...o&userid=31569 View this thread: http://www.excelforum.com/showthread...hreadid=512642 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
filling a simple combobox | Excel Programming | |||
Filling combobox with variable length list | Excel Programming | |||
searching for a combobox.value and filling in textboxes from results | Excel Programming | |||
Filling a ComboBox? | Excel Programming | |||
filling a combobox (without being prompted to save the workbook EVERY time its opened | Excel Programming |