Sendkey to show me the dropdown:

[pedie]

My current code as below: in m5 i have a validation drop down....
'm trying to use sendkey to show me the drop down when i execute this code but for now no error msg...but it didnt even work as i thought it might work..
'm using this sendkey because when we hit alt and down arrow it shows us the drop down if available in cell...


Please correct my code:

Thanks for helping
Pedie

Sub try()
Sheet1.Range("M5").Select
Application.sendkeys "%+({DOWN})"
End Sub

 

[pedie]

this seems to work but why is it not showing me the validation drop down?

Sub try()
Sheet1.Range("M5").Select
sendkeys "%+({DOWN})"
End Sub

 

[Norie]

Why the +?

SendKeys "%{DOWN}"

 

[pedie]

Norie, works perfect now. Thanks alot!

 

[Peter_SSs]

Try using this Worksheet_SelectionChange event code

<font face=Courier New><br><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> Worksheet_SelectionChange(<SPAN style="color:#00007F">ByVal</SPAN> Target <SPAN style="color:#00007F">As</SPAN> Range)<br>    <SPAN style="color:#00007F">If</SPAN> Target.Address = "$M$5" <SPAN style="color:#00007F">Then</SPAN><br>        SendKeys "%{down}"<br>    <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">If</SPAN><br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN><br></FONT>

 

[pedie]

Thanks Peter, cool!