Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 5799|回复: 3

[已解决]请教关于自动展开数据有效性下拉框的问题。

[复制链接]
发表于 2011-10-1 14:45 | 显示全部楼层 |阅读模式
本帖最后由 iphone4 于 2011-10-1 15:02 编辑

请教如何固定自动展开下拉框的位置

比如我想固定在D3单元格,怎么改???


Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Target.Column = 5 Then Application.SendKeys "%{down}"
End Sub


Book1.rar (7.75 KB, 下载次数: 61)
发表于 2011-10-1 19:05 | 显示全部楼层    本楼为最佳答案   
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$D$3" Then
        Application.SendKeys "%{down}"
    End If
End Sub
回复

使用道具 举报

发表于 2011-10-2 23:47 | 显示全部楼层
爱疯 发表于 2011-10-1 19:05
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$D$3" Then
  ...

"%{down}"请教是什么意思

点评

相当于按alt+方向下键的效果  发表于 2011-10-3 09:07
回复

使用道具 举报

发表于 2011-10-3 13:07 | 显示全部楼层
"%{down}"请教是什么意思
  相当于按alt+方向下键的效果
谢谢爱疯
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 15:03 , Processed in 0.529368 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表