vba怎样选中从B1单元格开始的已有数据区域

vba怎样选中从B1单元格开始的已有数据区域,因为A列中也有数据,所以不能用USEDRANGE,想问下要选中从B列(B1)开始的已有数据,用VBA怎么表示

intersect([a1].usedrange,[a1].usedrange.offset(0,1))追问

提示对象不支持该属性或方法
Sub test()
Sheet1.Activate
Intersect(ActiveSheet.UsedRange, [a1].UsedRange.Offset(0, 1)).Select
End Sub

追答

哦,写错了,不好意思
intersect([a1].currentregion,[a1].currentregion.offset(0,1))
看下私信。

温馨提示:内容为网友见解,仅供参考
无其他回答

如何用VBA提取-前面的数据
[b1]=split([a1],"-")(0)

excel求vba 选定任意单元格 复制区域
Sub a()Range(Range(Range("A1").Text), Range(Range("A1").Text).Offset(999, 1)).Copy Range("B1:C1000").Select ActiveSheet.Paste Calculate End Sub 改变A1中的引用,运行下宏即可 宏么用不明白Hi我

excel中用vba排列单元格区域内容的顺序。
选中数据区域——F5——定位——空值。右键某一空单元格,——删除——右侧单元格左移。搞定。

excel中如何通过VBA获取指定范围内鼠标所点击的单元格所在的行数?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)If (Target.Column >= 2 Or Target.Column <= 8) And Target.Row = 1 Then '选定B1:H1时 Range("A1") = Target.Row 'A1显示选定的行数 Range("A2") = Target.Column 'A2显示选定的列数End IfEnd Sub ...

VBA,工作表,如何随机抽取一列数据中的一个单元格的数据?
如果你的列是确定的,只是要这一列的一个单元格,可使用随机数得到:Randomize a=int(Rnd(1)*500)'假设你这一列有500个数据

excel中,如何通过公式,A1单元格内自动记录B1内第一次输入的数据?
公式实现不了,唯有VBA可以解决,VBA的代码如下图:按ALT+F11打开上图界面,双击需要此功能的表格,粘贴下面的代码、调整格式与上图一样即可:Private Sub Worksheet_Change(ByVal Target As Range)If Target.Count = 1 ThenIf Target.Column = 2 ThenIf Target.Offset(0, -1) = "" Then Target...

Excel VBA里面怎么定位到某一个单元格阿
Private Sub Workbook_Open()Sheets(2).Select Range("B100").Select End Sub 用VBA太简单不过的了,上面代码的意思是:1.事件的开始,一打开Excel就执行2.选择第二个工作表3.选择当前工作表的B100单元格4.结束效果就是,一打开Excel就自动选中第二工作表的B100单元格 ...

Excel中如何用vba函数定位任意选区?
将 range("").select 替换成:Set A = Application.InputBox("请选择区域", Type:=8)A.SELECT

vba中单元格定位的问题
这个很简单啊,只要在你给出的图示中,在A3单元格输入公式: =IF(COUNTA(B3:D3),1,"")就可以了.然后下拉 公式. 用这种方法的好处是,你可以任意变动数据的范围(只要将B3:D3改成其它范围就可以了,但注意标号必须是同一行的).

EXCEL vba 取单元格中的某个数
if mid(cells(1,1),2,2)=mid(cells(2,1),2,2)then msgbox "相等"else msgbox "不相等"end if 关键是你怎百么循环!你只给了2个,没给表结构,要度根据表结构来写!实际上你这个不需要用VBA的,直接用问公式就答足够了!=IF(MID(A1,2,1)=MID(A2,2,1),"相等","不相等")=IF(...

相似回答