Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error (empty list box)?
Hi, See VBA macro below: The macro is to find the number of marked entities in the list bo "cboSecondary" which can be found on the worksheet "combo". However there are something wrong with the macro... but I don't kno what.. Tryied for about 2 days now... see error attached. Thanks Sub Update_task_part2() ' This macro adds the tasks picked in the List Box and adds them t the ' Tasks revenue part of the form ' Created by Christian Simonsen 21/03/06 Dim mRows As Long Dim i As Long Dim Msg As String ' hides/unhides the required rows depending on the number of tasks ' picked mRows = 0 With combo.Shapes(cboSecondary) For i = 0 To .ListCount - 1 If .Selected(i) Then mRows = mRows + 1 Next End With Range("list_rev").EntireRow.Hidden = False mRows = 10 - mRows + 1 Range("list_rev").Rows("" & _ mRows & ":10").EntireRow.Hidden = True ' Gets the task numbers for the rows With combo.Shapes(cboSecondary) For i = 0 To .ListCount - 1 If .Selected(i) Then Msg = Msg & .List(i) & vbCrLf End If Next i End With If Len(Msg) = 0 Then Msg = "No items selected" Else MsgBox Msg End If End Su +------------------------------------------------------------------- |Filename: error.jpg |Download: http://www.excelforum.com/attachment.php?postid=4503 +------------------------------------------------------------------- -- Ctec ----------------------------------------------------------------------- Ctech's Profile: http://www.excelforum.com/member.php...fo&userid=2774 View this thread: http://www.excelforum.com/showthread.php?threadid=52525 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error (empty list box)?
Hi
Try Worksheets("combo") - which is an object, instead of combo. regards Paul |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error (empty list box)?
That did not help, as the name of the Worksheet is actually "Template" but I have given it the nickname "combo".... Anyway... Im getting the message that the shape is empty... ( i think -- Ctec ----------------------------------------------------------------------- Ctech's Profile: http://www.excelforum.com/member.php...fo&userid=2774 View this thread: http://www.excelforum.com/showthread.php?threadid=52525 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
#VALUE error with empty cells | Excel Discussion (Misc queries) | |||
#Empty error | Excel Discussion (Misc queries) | |||
Remove empty cells from named list / validation list | Excel Worksheet Functions | |||
error: cannot empty the Clipboard | New Users to Excel |