作者：乔山办公网日期：
返回目录：excel表格制作
Set Basewks = Dbbook.Worksheets(1)
Basewks.Select
Nrow = Basewks.UsedRange.Rows.Count
Finalrow = Basewks.UsedRange.Rows(Nrow).Row
Ncol = Basewks.UsedRange.Columns.Count
Finalcol = Basewks.UsedRange.Columns(Ncol).Column
Set Sourcerange = Basewks.Range(Basewks.Cells(1, 1), Basewks.Cells(Finalrow, Finalcol))
引用一个区域可以使用Range对象。Range对象代表某一单元格、某一行、百某一列、某一选定区域（该区域可包含一个或若干连续单度元格区域），或者某一三维区域。
可以使用WorkSheet的Range方法来返回一个Range对象，问下例将单元格 A1 中的值赋给单元格 A5：
Worksheets("Sheet1").Range("A5").Value =
Worksheets("Sheet1").Range("A1").Value在不带对象识别符（句点左边的对象）的情况下答使用 Range 属性，该属性会返回活动表上的一个区域。使用前需要用WorkSheet的Activate方法来使一回个工作表成为活动表。答下例设置A1:H8的公式：
Worksheets("Sheet1").Activate
Range("A1:H8").Formula = "=Rand()"也可以用WorkSheet的Cells方法来返回一个单元格，其为Range对象
Worksheets(1).Cells(1, 1).Value = 24
方法/步骤
1、在使用Excel的时候快速选择区域有几种不同的方法。首先，我们在百Excel空白单元格建立测试数据(我们要保持文字部分不变，数字部分改变)。
2、然后我们按住Ctrl键，选中测试度数据文字部分的单元格，然问后，单击“插入——名称——定义”。
3、接着，我们在弹出的对话框内输入“固定区域”，按回车键，确认。
4、然后我们选中测试数据中未加粗的部分，然后，同样依次答单击“插入-名称-定义”或者直接在文档左上角地址栏直接输入一个名称，这里我们输入“删除专”，按回车键确认。
5、接着，我们只需要在左上角地址栏直接单击刚才我们定义的“删除区域”。
6、这样就可以快速选中此区域，然后按键盘上的del键删除，再输入需要的新内容即可完成(如图所属示，内容已被删除)。
如果EXCEL细胞功能，行和列函数返回一个选定的区域？行数和列数，不是一个地区。如果你不想用字母，下面的方法是，用数量的方式来完成介绍信的公zd式：
假设作为一个可能的区域AE1到专AD的参考可以作为起始行数（如标题：1），AE2终止列数（30），
AE3型公式：= IF（INT（AE1/26）<1，选择（MOD（AE1，26 ），“属A”，“B”，“C”，“D”，“F”，“G”，“H”，“我”，“J”，“K”，“L”，“M”的，“N”，“O”，“P”，“Q”，“R”，“S”，“T”，“U”，“V”，“W”，“X”，“Y” ，“Z”）中，选择（INT（AE1/26），“A”，“B”，“C”，“D