VB怎么导入鼠标选中的Excel的某个区域的数据
例如,我想导入A1:B5的数据,用鼠标选中这一区域,然后导入VB中。任意区域的数据都能像这样用鼠标选中然后导入VB中,该怎么实现?...
例如,我想导入A1:B5的数据,用鼠标选中这一区域,然后导入VB中。任意区域的数据都能像这样用鼠标选中然后导入VB中,该怎么实现?
展开
展开全部
定义变量
a = Worksheets("Sheet1").Range("a65535").End(xlUp).Row
b = Worksheets("Sheet1").Range("a1").End(xlToRight).Column
那么用以下语句,即可选中A2到行为a,列为b的区域
Range("a2", Cells(a, b)).Select
Selection.Copy
此例中用到了关于Range 的相关知识:
EXCEL Range对象可能是VBA代码中最常用的对象,Range对象可以是某一单元格、某一单元格区域、某一行、某一列、或者是多个连续或非连续的区域组成的区域。
上例中就用到了range中的开始和结果的两个单元格,来表示一个连续的区域,就像选中第一个单元格,然后按住shift,再选择最后一个单元格效果是一样的。
具体表达式为:Range(起始单元格,结束单元格)
a = Worksheets("Sheet1").Range("a65535").End(xlUp).Row
b = Worksheets("Sheet1").Range("a1").End(xlToRight).Column
那么用以下语句,即可选中A2到行为a,列为b的区域
Range("a2", Cells(a, b)).Select
Selection.Copy
此例中用到了关于Range 的相关知识:
EXCEL Range对象可能是VBA代码中最常用的对象,Range对象可以是某一单元格、某一单元格区域、某一行、某一列、或者是多个连续或非连续的区域组成的区域。
上例中就用到了range中的开始和结果的两个单元格,来表示一个连续的区域,就像选中第一个单元格,然后按住shift,再选择最后一个单元格效果是一样的。
具体表达式为:Range(起始单元格,结束单元格)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询