今天来分享下怎么让列表框随着鼠标点击单元格的位置变化，上下移动
工具/原料
excel2010
方法/步骤
1、打开以前已经制作好的表格
2、在功能区点击开发工具，如果功能区没有，可以通过文件选项自定义加入，如图
3、进入后，我们选择设计模式
4、在将鼠标移动到列表框，单击选中，如图
5、单击鼠标右键弹出新的对话框
6、鼠标移动到查看代码位置
7、点击后进入VBA工程页面，如图
8、将如下代码复制到最后边：PrivateSubWorksheet_Selec隋茚粟胫tionChange(ByValTargetAsRan爿讥旌护ge)Me.ListBox1.Top=ActiveCell.TopEndSub
9、在回到工作表，退出设计模式，在点击单元格，就会随着单元格的位置改变而上下移动了