Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
combo coding
can someone please examine this code and confirm that it makes Th
contents of asecond combo box dependant on the value selected in th first combo box. Sub SelectCorrectList() Dim CellLink As Integer Application.ScreenUpdating = False Range(“E10”).Select CellLink = Range(“E10”) Select Case CellLink Case Is = 1 Range(“F1:F5”).Select Selection.Copy Range(“C1”).Select ActiveCell.PasteSpecial Application.CutCopyMode = False Case Is = 2 Range(“G1:G5”).Select Selection.Copy Range(“C1”).Select ActiveCell.PasteSpecial Application.CutCopyMode = False Case Is = 3 Range(“H1:H5”).Select Selection.Copy Range(“C1”).Select ActiveCell.PasteSpecial Application.CutCopyMode = False Case Is = 4 Range(“I1:I5”).Select Selection.Copy Range(“C1”).Select ActiveCell.PasteSpecial Application.CutCopyMode = False Case Is = 5 Range(“J1:J5”).Select Selection.Copy Range(“C1”).Select ActiveCell.PasteSpecial Application.CutCopyMode = False End Select End Su -- Message posted from http://www.ExcelForum.com |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
combo coding
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
combo coding
Does your 2nd combo box gets its details frm c1 to c5?
To simplify your posted code Try this Sub SelectCorrectList() Application.ScreenUpdating = False Select Case Range("E10") Case Is = 1 Range("F1:F5").Copy Case Is = 2 Range("G1:G5").Copy Case Is = 3 Range("H1:H5").Copy Case Is = 4 Range("I1:I5").Copy Case Is = 5 Range("J1:J5").Select Case Else Exit Sub End Select Range("C1").PasteSpecial Application.CutCopyMode = False End Sub --- Message posted from http://www.ExcelForum.com/ |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
combo coding
Yes it does, the following is the same as yours without the extra steps
Sub SelectCorrectList() Dim CellLink As Integer CellLink = Range("E10") Select Case CellLink Case 1 Range("F1:F5").Copy Range("C1") Case 2 Range("G1:G5").Copy Range("C1") Case 3 Range("H1:H5").Copy Range("C1") Case 4 Range("I1:I5").Copy Range("C1") Case 5 Range("J1:J5").Copy Range("C1") End Select End Sub "Noctos" wrote in message ... can someone please examine this code and confirm that it makes The contents of asecond combo box dependant on the value selected in the first combo box. Sub SelectCorrectList() Dim CellLink As Integer Application.ScreenUpdating = False Range("E10").Select CellLink = Range("E10") Select Case CellLink Case Is = 1 Range("F1:F5").Select Selection.Copy Range("C1").Select ActiveCell.PasteSpecial Application.CutCopyMode = False Case Is = 2 Range("G1:G5").Select Selection.Copy Range("C1").Select ActiveCell.PasteSpecial Application.CutCopyMode = False Case Is = 3 Range("H1:H5").Select Selection.Copy Range("C1").Select ActiveCell.PasteSpecial Application.CutCopyMode = False Case Is = 4 Range("I1:I5").Select Selection.Copy Range("C1").Select ActiveCell.PasteSpecial Application.CutCopyMode = False Case Is = 5 Range("J1:J5").Select Selection.Copy Range("C1").Select ActiveCell.PasteSpecial Application.CutCopyMode = False End Select End Sub --- Message posted from http://www.ExcelForum.com/ |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
combo coding
Previewed your reply and didn't see the simpler coding.
"mudraker" wrote in message ... Does your 2nd combo box gets its details frm c1 to c5? To simplify your posted code Try this Sub SelectCorrectList() Application.ScreenUpdating = False Select Case Range("E10") Case Is = 1 Range("F1:F5").Copy Case Is = 2 Range("G1:G5").Copy Case Is = 3 Range("H1:H5").Copy Case Is = 4 Range("I1:I5").Copy Case Is = 5 Range("J1:J5").Select Case Else Exit Sub End Select Range("C1").PasteSpecial Application.CutCopyMode = False End Sub --- Message posted from http://www.ExcelForum.com/ |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
combo coding
so how exactly would i set out getting the 2nd combo box to be dependant
on the first one with this code where would this code be placed --- Message posted from http://www.ExcelForum.com/ |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
combo coding
should the code be in the form of a macro assigned to the 2nd combo box
or in open work book. --- Message posted from http://www.ExcelForum.com/ |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
linking a form combo box... results from the combo box to another | Excel Discussion (Misc queries) | |||
combo reference on another combo box for picking address etc. | Excel Worksheet Functions | |||
Can one combo box control the data in a different combo box | Excel Discussion (Misc queries) | |||
"Combo Box - getting control combo box to stick in place in worksh | Excel Discussion (Misc queries) | |||
"Combo Box - getting control combo box to stick in place in worksh | Excel Discussion (Misc queries) |