如何在 VBA 中从两个范围创建一个范围?

2023-12-11

我有两个范围,每个范围包含一个单元格(例如“A1”和“C3”)。

如何获得包含这两个之间的所有单元格的新范围(“A1:C3”)?

我试过这个:

Set NewRange = Range(Range1.Address:Range2.Address)

另外,如何设置 R1C1 格式的范围?我想使用类似 Range("R1C2") 而不是 Range("A2") 的东西。


像这样?

Sub Sample()
    Dim rng1 As Range, rng2 As Range
    Dim NewRng As Range

    With ThisWorkbook.Sheets("Sheet1")
        Set rng1 = .Range("A1")
        Set rng2 = .Range("C3")

        Set NewRng = .Range(rng1.Address & ":" & rng2.Address)

        Debug.Print NewRng.Address
    End With
End Sub

使用 R1C1 格式代替Cells(r,c)。这会给你更多的灵活性和控制力

So Range("A2")可以写成Cells(2,1)

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

如何在 VBA 中从两个范围创建一个范围? 的相关文章

随机推荐

  • 在后面的 C# 代码中显示“是/否”警报框

    我正在尝试从 C 代码隐藏中显示 是 否 消息框 如果用户单击 是 我想调用 AddRecord 过程 如果用户单击 否 则不执行任何操作 理想情况下 我想使用下面的代码 但来自代码隐藏 OnClientClick return confi
  • NSData 到 Java 字符串

    我最近一直在编写一个与 iPhone 交互的 Web 应用程序 iPhone iphone实际上会以plist的形式向服务器发送信息 所以 类似的事情并不少见
  • 如何在托管库中正确构建回调 URL 的状态令牌?

    我在使用 Google Apps 脚本时遇到问题状态代币从托管库调用时 这意味着一个The state token is invalid or has expired Please try again 如果状态令牌是从子函数创建的 则始终会
  • 错误 1052 (23000):where 子句中的列“course_id”不明确

    我是 MySQL 新手 所以请告诉我我的问题是否缺少信息 我有一个运行良好的查询 select au email sm created sm grade sm max grade from auth user au courseware s
  • iOS - 如何保证 applicationWillTerminate 将被执行

    有没有办法保证applicationWillTerminate方法中的AppDelegate代表会被打吗 像 info plist 文件中的密钥之类的东西 我的目标 我正在一个信标应用程序中工作 这段代码位于本文 我的问题是 即使我在信标旁
  • 如何以编程方式将图片(位图)分配给联系人?

    我有一个位图类型的变量 我想将其作为 CalledID 图片分配给我的联系人列表中的联系人 我该怎么做 您必须为这些创建自己的哑剧类型 下面是一个将布尔值作为我的自定义 MIME 类型保存到联系人的示例 它使用最新的SDK 2 1 重要的
  • 检查有效的 html C#

    C 中是否有一种简单的方法来验证 html 文件 htm 你可以试试这篇文章C 验证 XHTML在 Dot Net Perls 上 如果您不习惯在 C 中执行此操作 那么通常验证 HTML 的最佳方法是使用W3C 验证服务 当然 如果对您的
  • Groovy 脚本获取请求 xml

    我可以使用 Groovy 脚本获取响应 xml 我需要获取请求 XML 因为我需要将 断言脚本 添加到我的soap ui 测试中 我使用以下代码来获取响应 xml def response new XmlHolder messageExch
  • python win32print 不打印

    我需要直接打印一些信息 无需用户确认 并且我正在使用 Python 和win32print模块 我已经读完了全文蒂姆 戈尔登 win32打印页 甚至阅读win32打印文档 很小 我使用的是他自己在那里写的相同示例 但我什么也没打印 如果我进
  • oracle rowid 内部是如何生成的?

    我想知道oracle中的ROWID是增量生成的吗 如果我尝试下面的查询 select min ROWID from table 我是否总是会获得表中第一个插入行的 ROWID 还是最终可能会获得任何随机行的 ROWID 如果有人能阐明这一点
  • 如何有选择地转义 Python 字符串中的百分比 (%)?

    我有以下代码 test have it break selectiveEscape Print percent in sentence and not s test print selectiveEscape 我想得到输出 Print pe
  • NHibernate SchemaExport 和Configure() catch-22

    我想用DDD在一个新项目中 首先对我的类进行建模 然后根据类库生成数据库模式 我的计划是使用 NHibernate hbm2ddl 工具来完成此操作SchemaExport 问题是我无法得到SchemaExport因为一个奇怪的第 22 条
  • 使用 Mongoose 填充其他集合中的记录计数

    我有 2 个 Mongoose 模型 Book 和 Users 我想这样做 当查找一本书时 我想获取当前图书用户的数量 这是书籍模型 var mongoose require mongoose var Users require users
  • 使用 Spring Boot 时出现 403,但与邮递员配合良好[重复]

    这个问题在这里已经有答案了 我在 url 上使用邮递员进行 api 调用 https cex io api order book BTC USD 普通 GET 没有标头 没有参数 什么也没有 但对于java也是一样 RestTemplate
  • Django Oscar 更改 URL 模式

    我已经设置了 django oscar 项目 并且正在尝试配置 U RL 我的目标是改变 catalogue to catalog 根据我添加的文档app py in myproject app py myproject app py fr
  • 访问 ANTLR 4 中的通道并单独解析它们

    我已将我的评论添加到 ANTLR 4 中的一个单独频道中 在我的例子中 它是频道 2 这是我的词法分析器语法 COMMENT gt channel 2 我想访问这个频道 2 并在这个频道上进行解析以积累评论 所以我将其包含在解析语法中 如下
  • 服务器不愿意处理请求

    我正在尝试使用 powershell 在名为 Branches 的 OU 下添加名为 Calder 的 OU 但我不断收到错误New ADOrganizationalUnit The server is unwilling to proce
  • IOS 中的 HTTPS post 请求

    我尝试使用以下代码发出 https post 请求 NSURL url NSURL URLWithString https portkey formspring me login initialize a request from url
  • CopyFileEx 具有多个文件,但只有一个复制对话框

    我已经在网络和 stackoverflow 上搜索过这个 我想将多个文件从多个源复制到多个目标 我还没有为 UnauthorizedAccessExceptions 烦恼 这些文件很可能无论如何都不会被使用 我可以使用 CopyFileEx
  • 如何在 VBA 中从两个范围创建一个范围?

    我有两个范围 每个范围包含一个单元格 例如 A1 和 C3 如何获得包含这两个之间的所有单元格的新范围 A1 C3 我试过这个 Set NewRange Range Range1 Address Range2 Address 另外 如何设置