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