首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

即使excel vba中间有空单元格,也要查找包含在最后一个非空单元格中的值。

在Excel VBA中,如果中间存在空单元格,但我们仍然想要查找最后一个非空单元格中的值,可以使用以下代码:

代码语言:txt
复制
Sub FindLastNonEmptyCell()
    Dim lastRow As Long
    Dim lastColumn As Long
    Dim lastValue As Variant
    
    ' 获取最后一个非空单元格的行号
    lastRow = Cells(Rows.Count, 1).End(xlUp).Row
    
    ' 获取最后一个非空单元格的列号
    lastColumn = Cells(1, Columns.Count).End(xlToLeft).Column
    
    ' 获取最后一个非空单元格的值
    lastValue = Cells(lastRow, lastColumn).Value
    
    ' 在Immediate窗口中打印最后一个非空单元格的值
    Debug.Print lastValue
End Sub

这段代码首先使用Cells(Rows.Count, 1).End(xlUp).Row来获取最后一个非空单元格的行号,Cells(1, Columns.Count).End(xlToLeft).Column来获取最后一个非空单元格的列号。然后使用Cells(lastRow, lastColumn).Value获取最后一个非空单元格的值,并将其打印在Immediate窗口中。

这个方法适用于在单个列或单个行中查找最后一个非空单元格的值。如果要在整个工作表中查找最后一个非空单元格的值,可以将Cells替换为ActiveSheet.UsedRange

这个方法可以应用于各种情况,例如在数据处理、报表生成、数据分析等场景中,当我们需要获取最后一个非空单元格的值时,可以使用这个方法。

腾讯云相关产品和产品介绍链接地址:

  • 腾讯云对象存储(COS):提供安全、稳定、低成本、高可扩展的云端存储服务。产品介绍链接
  • 腾讯云云服务器(CVM):提供弹性计算能力,帮助用户快速构建稳定可靠的应用。产品介绍链接
  • 腾讯云数据库MySQL版(TencentDB for MySQL):提供高性能、可扩展、高可用的云数据库服务。产品介绍链接
  • 腾讯云人工智能(AI):提供丰富的人工智能服务,包括图像识别、语音识别、自然语言处理等。产品介绍链接
  • 腾讯云物联网(IoT):提供全面的物联网解决方案,帮助用户连接、管理和分析物联网设备。产品介绍链接
  • 腾讯云移动开发(Mobile):提供移动应用开发和运营的一站式解决方案,包括移动后端云服务、移动推送等。产品介绍链接
  • 腾讯云区块链(Blockchain):提供安全、高效、易用的区块链服务,支持企业级应用场景。产品介绍链接
  • 腾讯云视频处理(VOD):提供视频上传、转码、截图、水印等功能,帮助用户实现视频处理需求。产品介绍链接
  • 腾讯云音视频通信(TRTC):提供高品质、低延迟的音视频通信服务,支持实时音视频通话和互动直播。产品介绍链接
  • 腾讯云云原生应用引擎(Tencent Serverless Framework):提供无服务器架构的云原生应用开发和部署服务。产品介绍链接
  • 腾讯云网络安全(Security):提供全面的网络安全解决方案,包括DDoS防护、Web应用防火墙等。产品介绍链接
  • 腾讯云存储(Cloud Storage):提供安全、可靠、低成本的云端存储服务,适用于各种数据存储需求。产品介绍链接
  • 腾讯云元宇宙(Metaverse):提供虚拟现实(VR)和增强现实(AR)技术支持,帮助用户构建元宇宙应用。产品介绍链接
  • 腾讯云软件测试(Testing):提供全面的软件测试解决方案,包括自动化测试、性能测试等。产品介绍链接
  • 腾讯云服务器运维(Cloud Operation):提供服务器运维服务,帮助用户管理和维护云服务器。产品介绍链接
  • 腾讯云网络通信(Cloud Communication):提供全球覆盖的云通信服务,包括短信、语音、视频通话等。产品介绍链接
  • 腾讯云数据库(TencentDB):提供多种类型的云数据库服务,包括关系型数据库、NoSQL数据库等。产品介绍链接
页面内容是否对你有帮助?
有帮助
没帮助

相关·内容

没有搜到相关的沙龙

领券