VBA格式|如何使用VBA格式功能? (例子)

Excel VBA格式功能

VBA中的格式化功能 用于将给定值格式化为所需格式,此函数可用于格式化日期或数字或任何三角函数值,该函数基本上具有两个强制性参数,一个是输入,采用字符串形式,而第二个参数是我们要使用的格式类型,例如,如果我们使用Format(.99,“ Percent”),则结果将为99%。

在VBA中,我们需要使用称为“ FORMAT”的功能来将格式应用于单元格。 Excel格式是要掌握的重要概念之一。我们在日常工作中都使用的常见格式设置技术是“日期格式,时间格式,数字格式和其他重要的格式代码”。在常规的excel工作表中,我们只需点击excel格式的单元格选项,然后通过应用适当的格式代码来执行格式设置任务即可。但是,在VBA中,这不像我们的工作表技术那样简单。

句法

  • 表达: 这不过是我们要格式化的值。在VAB技术上,它称为表达式。
  • [格式]: 您想要将什么格式应用于 表达 您已选择?这里有两种格式,一种是用户定义的格式,另一种是内置格式。

    这里有VBA日期格式,数字格式和文本格式。

    VBA日期格式具有短日期,长日期,中日期和一般日期。

    数字格式具有货币,标准,百分比,科学,是或否,对或错,开或关

  • [一周的第一天]: 您一周的第一天是几点?我们可以从列表中选择任何一天。以下是日期和相应代码的列表。

  • [一年的第一周]: 一年的第一周是几号?这指定应该用作一年的第一周的一周。

如何使用?

您可以在此处下载此VBA格式模板– VBA格式模板

好的,让我们实际应用此功能来了解FORMAT函数的功能。假设您的电话号码为8072.56489,并且您希望对其应用数字格式。请按照以下步骤对其应用数字格式。

步骤1: 启动excel宏,然后将变量定义为“细绳“ 数据类型。

代码:

 Sub Worksheet_Function_Example1()Dim K作为字符串结尾Sub 

第2步: 给k赋一个值作为我们的数字,即 8072.56489

代码:

 Sub Worksheet_Function_Example1()Dim K作为字符串K = 8072.56489 End Sub 

第三步: 展示 ”ķVBA消息框中的“”值。

代码:

 Sub Worksheet_Function_Example1()Dim K作为字符串K = 8072.56489 MsgBox K End Sub 

第4步: 如果您运行此宏,我们将得到以下结果。

结果就是我们将值分配给变量“ k”。但是我们需要对该数字应用某种格式以使其美观。

步骤5: 而不是直接为“ķ”,让我们使用FORMAT函数。

代码:

 Sub Worksheet_Function_Example1()Dim K As String K = Format(MsgBox K End Sub 

步骤6: 现在为Expression指定编号 8072.56489.

代码:

 Sub Worksheet_Function_Example1()Dim K作为字符串K =格式(8072.56489,MsgBox K End Sub 

步骤7: 在格式选项中,我们可以使用内置格式,也可以使用我们自己的格式代码。现在,我将使用内置的格式设置样式为“标准”.

代码:

 Sub Worksheet_Function_Example1()Dim K作为字符串K =格式(8072.56489,“标准”)MsgBox K结束Sub 

步骤8: 现在运行此代码,并查看消息框的结果。

好的,我们用逗号(,)作为千位分隔符,十进制仅四舍五入至两位数。

这样,我们可以使用许多其他内置的格式设置样式来应用格式设置。以下是我已应用的一些代码。

#1 –货币格式

代码:

 Sub Worksheet_Function_Example2()Dim K As String K = Format(8072.56489,“ Currency”)MsgBox K End Sub 

结果:

#2 –固定格式

代码:

 Sub Worksheet_Function_Example3()Dim K As String K = Format(8072.56489,“ Fixed”)MsgBox K End Sub 

结果:

#3 –百分比格式

代码:

 Sub Worksheet_Function_Example4()Dim K As String K = Format(8072.56489,“ Percent”)MsgBox K End Sub 

结果:

#4 –用户定义的格式

好的,现在我们将看到一些用户定义的格式。

代码:

 Sub Worksheet_Function_Example5()Dim K作为字符串K =格式(8072.56489,“#。##”)MsgBox K End Sub 

结果:

代码:

 Sub Worksheet_Function_Example5()Dim K作为字符串K =格式(8072.56489,“#,##。##”)MsgBox K End Sub 

结果:

#5 –日期格式

我们已经看到了一些重要的格式化技术。现在我们将不得不使用FORMAT函数在VBA中格式化日期。

我已经编写了代码以通过变量显示日期的结果。

代码:

 Sub Worksheet_Function_Example6()Dim K作为字符串K = 13-3-2019 MsgBox K End Sub 

当我运行这段代码时,我不会得到准确的日期,而是可悲的结果。

为了获得准确的日期,我们需要为其指定日期格式。首先,我们需要做的是用双引号提供日期并应用日期格式。

代码:

 Sub Worksheet_Function_Example6()Dim K As String K = Format(“ 10-3-2019”,“ Long Date”)MsgBox K End Sub 

如果现在运行此代码,我将获得适当的长约会。

“长日期”是一种内置格式,类似地,您可以使用“短日期”和“中日期”选项。

要记住的事情

  • FORMAT函数返回的值是字符串。
  • 我们还可以使用自己的日期,时间和数字格式代码,例如在工作表格式中的用法。
  • FORMAT是VBA函数,仅在VBA中可用,而在工作表中不可用。