Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Application Sendkey (when value selected)
Hi
Got the code from this forum (By Ron) how can i define a action after the Application.SendKeys ("%{DOWN}") procedure i mean i want when the value is selected from the DV list by the user, then select Cell Range("$X$8:$Y$8") that is also a marged cell DV list and clearits content complete code is as follows ------------------------------------------------------------------ Private Sub Worksheet_Change(ByVal Target As Range) Dim rngParentCell As Range Dim rngDepCell As Range Dim rngCell As Range Set rngParentCell = Range("$C$6:$T$6") Set rngDepCell = Intersect(Target, rngParentCell) If Not rngDepCell Is Nothing Then Set rngCell = Range("$V$6:$X$6") rngCell.ClearContents rngCell.Select MsgBox _ Title:="Village Name", _ Prompt:="You must now select the 'Village Name'", _ Buttons:=vbInformation + vbOKOnly Application.SendKeys ("%{DOWN}") 'Here i want Code to do following - 'After that when the value is selected from the DV list Select 'select Cell Range("$X$8:$Y$8") and clear its content End If Set rngParentCell = Nothing Set rngDepCell = Nothing Set rngCell = Nothing End Sub ----------------------------------------------------------------------------- any help will be appreciated |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
sendkey help needed | Excel Discussion (Misc queries) | |||
Sendkey | Excel Programming | |||
sendkey problem | Excel Programming | |||
SendKey Question | Excel Programming | |||
Vb Application to locate a worksheet depending on the radio box selected | Excel Programming |