Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
error (ComboBox-?)
My app is not working as stable. Very often it cannot be
opened and I need to recover it from backup. I'm getting the error message like this: "Excel.exe has generated error and will be closed by Windows. You will need to restart the program. An error log is being created." (I don't know where this file is located.) I suspect the following code I'm using for combobox. Private Sub ComboBox1_Change() On Error GoTo ComboBox1_Change_Err Me.ComboBox1.ListFillRange = "R3:R97" With Worksheets("Legend").Range("a3:a448") .Borders.LineStyle = xlLineStyleNone .Borders.ColorIndex = 2 .Borders.Weight = xlThin Set c = .Find(ComboBox1.Value, LookIn:=xlValues) c.Borders.LineStyle = xlDouble c.Borders.Weight = xlThick c.Borders.Color = RGB(255, 0, 0) c.Activate End With Application.ScreenUpdating = True ComboBox1_Change_exit: Exit Sub ComboBox1_Change_Err: MsgBox Error Resume ComboBox1_Change_exit End Sub Could anybody advise anything? Thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
error (ComboBox-?)
I have had a simular problem with the same error message.
If you find a soluation I would love to hear it. However, I think the problem may be that you are trying to develop an application in an environment where the IT boys have forbidden macros to run. This was happening to me when the client was using Windows 2000 and they didn't have administration rights. Conequently I could have the application I developed working on my machine, 2 test machines but not on the cleints and that message was generated. "Alex" wrote in message ... My app is not working as stable. Very often it cannot be opened and I need to recover it from backup. I'm getting the error message like this: "Excel.exe has generated error and will be closed by Windows. You will need to restart the program. An error log is being created." (I don't know where this file is located.) I suspect the following code I'm using for combobox. Private Sub ComboBox1_Change() On Error GoTo ComboBox1_Change_Err Me.ComboBox1.ListFillRange = "R3:R97" With Worksheets("Legend").Range("a3:a448") .Borders.LineStyle = xlLineStyleNone .Borders.ColorIndex = 2 .Borders.Weight = xlThin Set c = .Find(ComboBox1.Value, LookIn:=xlValues) c.Borders.LineStyle = xlDouble c.Borders.Weight = xlThick c.Borders.Color = RGB(255, 0, 0) c.Activate End With Application.ScreenUpdating = True ComboBox1_Change_exit: Exit Sub ComboBox1_Change_Err: MsgBox Error Resume ComboBox1_Change_exit End Sub Could anybody advise anything? Thanks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
error (ComboBox-?)
Thanks a lot, David.
It could be, but another similar app with macros, which are partly the same, is working in the same folder. Are there any other opinions? Regards, Alex -----Original Message----- I have had a simular problem with the same error message. If you find a soluation I would love to hear it. However, I think the problem may be that you are trying to develop an application in an environment where the IT boys have forbidden macros to run. This was happening to me when the client was using Windows 2000 and they didn't have administration rights. Conequently I could have the application I developed working on my machine, 2 test machines but not on the cleints and that message was generated. "Alex" wrote in message ... My app is not working as stable. Very often it cannot be opened and I need to recover it from backup. I'm getting the error message like this: "Excel.exe has generated error and will be closed by Windows. You will need to restart the program. An error log is being created." (I don't know where this file is located.) I suspect the following code I'm using for combobox. Private Sub ComboBox1_Change() On Error GoTo ComboBox1_Change_Err Me.ComboBox1.ListFillRange = "R3:R97" With Worksheets("Legend").Range("a3:a448") .Borders.LineStyle = xlLineStyleNone .Borders.ColorIndex = 2 .Borders.Weight = xlThin Set c = .Find(ComboBox1.Value, LookIn:=xlValues) c.Borders.LineStyle = xlDouble c.Borders.Weight = xlThick c.Borders.Color = RGB(255, 0, 0) c.Activate End With Application.ScreenUpdating = True ComboBox1_Change_exit: Exit Sub ComboBox1_Change_Err: MsgBox Error Resume ComboBox1_Change_exit End Sub Could anybody advise anything? Thanks . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
fill combobox depending on selection from another combobox | Excel Discussion (Misc queries) | |||
Combobox creates error | Excel Worksheet Functions | |||
Combobox run time error | Excel Programming | |||
VBA ComboBox | Excel Programming | |||
User Form-error 1004 unless opened in sheet w/combobox data | Excel Programming |