社交媒体 使用VBA创建工作表映射 - 傻瓜

使用VBA创建工作表映射 - 傻瓜

目录:

视频: A01 自动填充的威力 Excel数据处理与分析实战技巧精粹视频教程 2025

视频: A01 自动填充的威力 Excel数据处理与分析实战技巧精粹视频教程 2025
Anonim

上生成的您是否尝试了解一个不熟悉的(并且复杂的)Excel工作簿?查看一张地图可以帮助您查看哪些单元格包含常量,哪些单元格包含值。

您可以创建一个VBA实用程序来生成活动工作表的映射。该地图是在新的工作表上生成的,它由颜色编码的单元格组成,可让您快速识别值,文本和公式。

<! - 1 - >

下面,你会看到这样一个地图的例子。包含文本的单元格为绿色,不包含数值的单元格为黄色,包含公式的单元格为红色。这样的地图可以帮助您发现潜在的错误。例如,如果公式块中的一个公式已被值覆盖,该单元格将在地图视图中脱颖而出(如示例中的单元格Q11所示)。

<! - 2 - >

QuickMap VBA代码

下面列出了生成工作表映射的VBA过程。如果您想使用此实用程序,只需复制代码并将其粘贴到VBA模块。然后,激活工作表并执行QuickMap子程序。

Sub QuickMap()Dim FormulaCells As Variant Dim TextCells As Variant Dim NumberCells As Variant Dim Area As Range If TypeName(ActiveSheet)“Worksheet”Then Exit Sub'为单元格子集创建对象变量On Error Resume Next Set FormulaCells = Range “A1”)。 SpecialCells _(xlFormulas,xlNumbers + xlTextValues + xlLogical)设置TextCells =范围(“A1”)。 SpecialCells(xlConstants,xlTextValues)设置NumberCells =范围(“A1”)。 SpecialCells(xlConstants,xlNumbers)On Error GoTo 0'添加一个新工作表并格式化工作表。添加单元格。 ColumnWidth = 2。大小= 8. Horizo​​ntalAlignment = xlCenter以应用程序结束。 ScreenUpdating = False'做公式单元格如果不是IsEmpty(FormulaCells)那么对于FormulaCells中的每个区域。有ActiveSheet的区域。范围(区域地址)。值=“F”。室内。 ColorIndex = 3结束下一个区域结束如果'做文本单元格如果不是空的(TextCells)那么对于TextCells中的每个区域。有ActiveSheet的区域。范围(区域地址)。值=“T”。室内。 ColorIndex = 4以下一个区域结束结束如果'做数字单元格如果不是IsEmpty(NumberCells)然后为NumberCells中的每个区域。有ActiveSheet的区域。范围(区域地址)。值=“N”。室内。 ColorIndex = 6 End With Next Area End If End Sub

工作原理

<! - 3 - >

该过程首先检查以确保活动工作表是一个工作表。如果不是这样的话,那么快速退出并不需要采取进一步行动。当活动工作表是工作表时,该过程通过使用SpecialCells方法识别各种单元类型来创建三个对象变量。SpecialCells方法非常有用。如果您不熟悉,请在Excel的在线帮助文​​件中查看。注意使用On Error Resume Next。这是为了避免在没有单元格限定的情况下发生的错误 - 例如,如果工作表没有公式。接下来,该过程将添加一个新的工作表,缩小单元格宽度,并将水平对齐设置为居中。这一步是化妆品。然后子关闭屏幕更新,以加快一点点。接下来的三个代码块处理单元。如果没有单元合格,对象变量是空的,所以子测试。然后,例程循环遍历Range对象中的每个Area并格式化单元格。您可以轻松地自定义子程序的这一部分以应用不同的格式。

查看Power Utility Pak加载项以获取此实用程序的更复杂版本。

使用VBA创建工作表映射 - 傻瓜

编辑的选择

10个惊人的Python编程资源 - 傻瓜

10个惊人的Python编程资源 - 傻瓜

您可能对Python编程有很好的开始,需要额外的资源。这里有十个令人惊叹的编程资源,您可以使用它来改善您的开发体验。在线使用Python文档使用Python的一个重要部分就是了解Python中的可用内容...

如何在Python中创建类定义

如何在Python中创建类定义

类不需要特别复杂。实际上,您可以在Python中创建容器和一个类元素,并将其称为一个类。当然,最终得到的类不会有太多的工作,但是你可以实例化它(告诉Python用你的类作为蓝图来构建一个对象),并使用它来处理它...

如何在Python中访问列表 - 傻瓜

如何在Python中访问列表 - 傻瓜

使用Python创建列表后,要访问信息它包含。一个对象不是特别有用,如果你至少不能访问它所包含的信息。以下步骤描述了如何做到这一点。

编辑的选择

如何在Excel 2013中复制自定义样式 - 傻瓜

如何在Excel 2013中复制自定义样式 - 傻瓜

Excel 2013可以轻松复制自定义单元样式您已经将其作为一个工作簿的一部分保存到您当前正在处理的工作簿中。要将自定义样式从一个工作簿复制到另一个工作簿,请按照下列步骤:

如何使用填充柄复制Excel公式 - 虚拟人

如何使用填充柄复制Excel公式 - 虚拟人

您将喜欢填充柄在Excel中。填充句柄是一个快速的方法,只需单击一下鼠标,即可将单元格的内容复制到其他单元格。活动单元格的边界右下方总是有一个小方框。那是填充句柄。当你...

如何比较Excel 2013中的多个工作表 - Excel 2013中的虚拟人数

如何比较Excel 2013中的多个工作表 - Excel 2013中的虚拟人数

,可以拆分单个工作簿到工作表窗口中,然后排列窗口,以便您可以查看屏幕上每个工作表的不同部分。要打开要在不同窗口中比较的工作表,只需插入新的工作簿窗口,然后选择工作表即可...

编辑的选择

监视WebLogic Server - 虚拟机

监视WebLogic Server - 虚拟机

监视服务器是每个WebLogic Server管理员必须处理的重要任务。您将监视您的服务器是否启动以及服务器负载。通过监视,您可以快速查看WebLogic Server不同部分如何执行的概述。通过WebLogic Server,您可以监视以下区域:CORBA ...

测量用于机器学习的矢量之间的相似性 - 虚拟

测量用于机器学习的矢量之间的相似性 - 虚拟

把他们当作一个媒介。以下信息描述了如何测量矢量之间的相似性以执行诸如计算用于学习目的的矢量之间的距离等任务。理解相似性在矢量形式中,您可以在...中看到每个变量。

前10名MATLAB的使用MATLAB

前10名MATLAB的使用MATLAB

MATLAB被许多不同的人使用当谈到数学产品时,可能不一定会想到。事实上,数学的使用方式很多人都没有考虑。工程新的解决方案许多工程学科依靠各种数学来确保...