网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索

 
 
 
日一二三四五六
       
       
       
       
       
       

签到排名:今日本吧第个签到,

本吧因你更精彩,明天继续来努力!

本吧签到人数:0

一键签到
成为超级会员,使用一键签到
一键签到
本月漏签0次!
0
成为超级会员,赠送8张补签卡
如何使用?
点击日历上漏签日期,即可进行补签。
连续签到:天  累计签到:天
0
超级会员单次开通12个月以上,赠送连续签到卡3张
使用连续签到卡
03月07日漏签0天
vba吧 关注:17,095贴子:66,966
  • 看贴

  • 图片

  • 吧主推荐

  • 游戏

  • 8回复贴,共1页
<<返回vba吧
>0< 加载中...

求助:offset 与resize 属性小疑问

  • 只看楼主
  • 收藏

  • 回复
  • jnxiaolianghui
  • 仗剑天涯
    3
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
Sub 哈哈()
Set a = Range("b1").Offset(0, -1).Resize(0, 1)
a.Select
End Sub

想知道为什么Range("b1").Offset(0, -1)返回的是一个单元格,单元格后面加上resize的属性理论上没问题,可是一凑就这样了,why?


  • 青水蛙鸣
  • 英雄豪杰
    10
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
resize的第一个、第二个参数不能为零,可以省略
比如
Set a = Range("b1").Offset(0, -1).Resize(, 1)


2026-03-07 07:45:32
广告
不感兴趣
开通SVIP免广告
  • 寥若_晨星2013
  • 初涉江湖
    1
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
resize的最低值是1不是0。这点别搞错了就行。。
resize(,1) 忽略的是1,不是0.所以你的resize(0,1)是错的


  • 青水蛙鸣
  • 英雄豪杰
    10
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
这段sub运算起来本来就是a1,有问题吗?
Sub 哈哈()
dim a as range,rng as range
Set a = Range("b1").Offset(0, -1).Resize(, 3)
if a.count<2 then
msgbox a.address
else
for each rng in a
debug.print rng.address
next
end if
End Sub


  • 青水蛙鸣
  • 英雄豪杰
    10
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
刚到试了一个好玩的
expression.Resize(RowSize, ColumnSize)
rowsize,columnsize可以为一个>0.5的小数,(注意不能<=0.5),系统按4舍五入(准确来说:<1时,是大于5入,大于1时,按四舍五入)的原则取整。
测试版本为win7+office2003企业版。


登录百度账号

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频!
  • 贴吧页面意见反馈
  • 违规贴吧举报反馈通道
  • 贴吧违规信息处理公示
  • 8回复贴,共1页
<<返回vba吧
分享到:
©2026 Baidu贴吧协议|隐私政策|吧主制度|意见反馈|网络谣言警示