在VBA中Selection的含义

兰色幻想

<p>select是选取的意思，那么selection的意思就是正在被选取。被选取的不仅是单元格，也可以是图表，图表等。</p><p>有了Selection，我们就可以做到用户和VBA程序的互动，因为VBA可以随时处理用户选取的单元格区域或图形等。</p><p>如下句：</p><p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sub test()<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font color="#0f0fce"> Selection</font>.Copy Range("A1")&nbsp;&nbsp; '<font color="#072dc6">把选取的单元格内容复制到A1单元格</font><br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End Sub</p><p>&nbsp;再如下面的语句显示当前选取的区域大小：</p><p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp; Sub test1()<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; With <font color="#0e0ebe">Selection<br/></font>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MsgBox "你选取了" &amp; .Rows.Count &amp; "行" &amp; .Columns.Count &amp; "列的区域"<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End With<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End Sub</p><p>&nbsp;</p>

wayy

沙发，学习了。

hhzjxss

<p>谢谢兰版，学习中.....</p>

laosanjie

<p><font color="#cc3370" size="4">收藏学习了。谢谢兰版！！！</font></p>

sylknb

<strong>一句语句：Selection=XLApp.Range(XLApp.Cells(1,1),XLApp.Cells(1,nCols))</strong><div style="MARGIN-TOP: 10px; FONT-SIZE: 10pt; MIN-HEIGHT: 200px; WORD-BREAK: break-all; TEXT-INDENT: 24px; LINE-HEIGHT: normal; WORD-WRAP: break-word;"><p><strong>一句语句：Selection=XLApp.Range(XLApp.Cells(1,1),XLApp.Cells(1,nCols))</strong></p><p>Selection=XLApp.Range(XLApp.Cells(1,1),XLApp.Cells(1,nCols))&nbsp;&nbsp;&nbsp;&amp;&amp;&nbsp;设定范围为第一行<br/>请教Selection是对象还是变量、属性。我是一个初学者，上述语句不懂，请行家们指教一下。多谢了</p><p>如果SELECTION是变量的话，=后面赋值不能有二个。如果是属性的话好象也不对。到底是什么？请行家指教</p></div>

千里马

<p>学习了。</p>

Scarlett_88

<p>我们可以鼠标移动改变所选项来触发事件。Private Sub Worksheet_SelectionChange(ByVal Target As Range)</p>

lcchensir

凉皮

学习了，这东西还真难理解。。。。

zjyxp

向校长学习Selection