I need to attach a macro to a drop-down list in a cell on a worksheet to direct the user to the next stage (Cell) of the process when filling in a form. All action takes place on the same worksheet. I am using Excel 2010. After the user has selected from the list, I want automatically move to the next required cell, which will then be highlighted by the border being coloured.
The code I am using is:
If Range("F10") <> "" Then
MsgBox "Now set the Calendar for your Workbook"
Range("B13").Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Color = -317143
.TintAndShade = 0
.Weight = xlThick
End With
With Selection.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Color = -317143
.TintAndShade = 0
.Weight = xlThick
End With
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Color = -317143
.TintAndShade = 0
.Weight = xlThick
End With
With Selection.Borders(xlEdgeRight)
.LineStyle = xlContinuous
.Color = -317143
.TintAndShade = 0
.Weight = xlThick
End With
Selection.Borders(xlInsideVertical).LineStyle = xlNone
Selection.Borders(xlInsideHorizontal).LineStyle = xlNone
End If
Any ideas?
Bookmarks