Excel VBA编程 复制动态区域.docx
1页
Excel VBA 编程 复制动态区域在很多情况下，要复制单元格区域时，却不知道该单元格区域的确切行数和列数由于这个 不确定的因素，就会给单元格区域的复制过程造成困难为了解决这一问题，可以使用 Range 对象的 CurrentRegion 属性，该属性用于返回由空白行 和空白列所包围的单元格区域其语法格式如下：格式：表达式.CurrentRegion该属性对于许多自动展开选择以包括整个当前区域的操作很有用，但不能用于被保护的工作 表例如，有一个工作表用于跟踪周销售额和新客户，其中单元格区域由几行组成，而行数每周 都会发生变化因为在任意时刻不能确切地知道单元格区域的地址，所以要编写过程来复制 单元格区域，如图 14-4 所示可以使用下面的过程，将工作表Sheetl中的单元格区域复制到Sheet2中，作为副本使用Sub CRcopy()Dim r1 As RangeWorksheets("sheet1").Activate '激活工作表'选择有数据的单元格区域ActiveCell.CurrentRegion.SelectSet r1 = Selection '将选择的单元格区域赋给r1r1.copy Sheet2.Range("A1")'复制到 Sheet2 中End Sub。
点击阅读更多内容
相似文档 更多>
正为您匹配相似的精品文档
