Dzwebs.Net

撰写电脑技术杂文十余年

VBA判断Excel选择区域是否有合并单元格

Admin | 2011-10-19 10:38:04 | 被阅次数 | 13962

温馨提示!

如果未能解决您的问题,请点击搜索;登陆可复制文章,点击登陆

  通过VBA,我们可以判断Excel选择区域内是否有合并单元格,如下为相应的两种VBA代码,请择其一二使用。

  要想判断合并单元格,得分为两种情况:

  ①:当前选中的单元格为合并单元格;

  ②:选区内有合并单元格;

  代码一:

  If Selection.MergeCells or IsNull(Selection.MergeCells) Then
   MsgBox "选区内有合并单元格"
  Else
   MsgBox "选区内没有合并单元格"
  End If

  代码二:

  Flag = False
  For Each Rng In Selection
  If Rng.MergeCells Then
    Flag = True
    Exit For
  End If
  Next
  If Flag Then
   MsgBox "选区内有合并单元格"
  Else
   MsgBox "选区内没有合并单元格"
  End If

  经过测试验证,代码一比代码二更具有效率。在使用的时候,将如上的代码放到过程里面即可直接使用。


该杂文来自: Excel杂文

上一篇:Excel相减函数的换位思考

下一篇:VBA改变应用程序显示模式之WindowState属性

网站备案号:

网站备案号:滇ICP备11001339号-7

版权属性:

Copyright 2007-2021-forever Inc. all Rights Reserved.

联系方式:

Email:dzwebs@126.com QQ:83539231 访问统计