Excel单元格转换教程——转换单位、文本和数字、货币、时区等。-英雄云拓展知识分享

Excel单元格转换教程——转换单位、文本和数字、货币、时区等。

在 Excel 中处理数据时，有时您可能需要对单元格进行一些数据转换，例如单位转换、货币转换、时区转换等。 在这里，本教程搜集了您在平常 Excel 工作中可能遇到的不同类型的单元格转换，并提供了分步详细的解决方案，以帮助您轻鬆处理任务。

本教程主要介绍： （单击下面或右侧的目录中的任何标题，以导航到相应的内容。）

1. Excel中各种单位度量之间的转换

通常，我们使用 CONVERT 功能 将数字从一种计量单位转换为另外一种计量单位。 但是，对某些单位转换，CONVERT 函数不起作用。

下面的例子演示了 CONVERT 功能 和不同的公式，以帮助在单元格中的各种丈量单位之间进行转换。

1.1 使用 CONVERT 功能在各种单位丈量之间进行转换

Excel 提供了一个内置函数“插入评论”来帮助您轻鬆地向 Excel 中的单元格添加批注。

以下图所示，要将 B3:B10 范围内列出的英寸分别转换为英尺、厘米和毫米，您可以利用 CONVERT 函数来完成。

句法

CONVERT(number, from_unit, to_unit)

参数

在 Excel 中，有许多丈量单位。 要查看可利用于“来自_unit“和”至单位” CONVERT 函数的参数，请点击 这里.

转换英寸到英尺:

选择一个单元格（在本例中为 D3），复制或输入以下公式，然后按 Enter 取得第一个结果的关键。 选择此结果单元格，然后向下拖动其自动填充句柄以获得其余结果。 看截图：

=CONVERT(B3,"in","ft")

将英寸转换为厘米:

选择一个单元格（在本例中为 E3），复制或输入以下公式，然后按 Enter 取得第一个结果的关键。 选择此结果单元格，然后向下拖动其自动填充句柄以获得其余结果。

=CONVERT(B3,"in","cm")

将英寸转换为毫米:

选择一个单元格（在本例中为 F3），复制或输入以下公式，然后按 Enter 取得第一个结果的关键。 选择此结果单元格，然后向下拖动其自动填充句柄以获得其余结果。

=CONVERT(B3,"in","mm")

笔记：

1.2 在 Excel 中使用公式将 CM（厘米）转换为英尺和英寸

有一些单位转换 CONVERT 函数没法处理，例如将厘米或米转换为英尺和英寸，以下图所示。 您需要利用下面的公式来完成它。

1.选择一个空白单元格（在这类情况下说D2），输入下面的公式并按 Enter 得到第一个结果。 选择此结果单元格并向下拖动其自动填充句柄以取得其他结果。

=TRUNC(B2/2.54/12)&"' "&ROUND(MOD(B2/2.54,12),0)&""""

注意： 要为英寸保存 2 位小数，您可以利用以下公式。

=INT(CONVERT(B2,"cm","ft")) & "' " & TEXT(12*(CONVERT(B2,"cm","ft")-INT(CONVERT(B2,"cm","ft"))),"0.00") & """"

1.3 在 Excel 中使用公式将 M（米）转换为英尺和英寸

要将米转换为英尺和英寸，以下面的屏幕截图所示，以下公式可以提供帮助。

1.选择一个空白单元格，例如D2，输入以下公式并按 Enter 得到第一个结果。 选择此结果单元格并向下拖动其自动填充手柄以取得其他英尺和英寸。

=TRUNC(B2*100/2.54/12)&"' "&ROUND(MOD(B2*100/2.54,12),0)&""""

注意： 要在转换后为英寸保存 2 位小数，您可以利用以下公式。

=INT(CONVERT(B2,"m","ft")) & "' " & TEXT(12*(CONVERT(B2,"m","ft")-INT(CONVERT(B2,"m","ft"))),"0.00") & """"

1.4 用公式将英尺和英寸转换为英寸，反之亦然

以下面的屏幕截图所示，如果您想在 Excel 中将英尺和英寸的丈量值仅转换为英寸，反之亦然，请尝试以下公式。

将英尺和英寸转换为英寸

要将英尺和英寸的丈量值转换为英寸，您可以利用基于 左，查找，中 及 替换 功能以下。

选择要输出第一英寸的单元格，复制或输入以下公式并按 Enter 钥匙。 选择此结果单元格并向下拖动其自动填充句柄以获得所有英寸。

=LEFT(B3,FIND("'",B3)⑴)*12+SUBSTITUTE(MID(B3,FIND("'",B3)+1,LEN(B3)),"""","")

将英寸转换为英尺和英寸

要将英寸转换为英尺和英寸，请履行以下操作。

选择一个单元格，在其中输入以下公式，然后按 Enter 得到第一个结果。 选择此单元格并向下拖动其自动填充手柄以获得所有英尺和英寸。 看截图：

=INT(B3/12)&"' "&MOD(B3,12)&""""

1.5 用公式转换度数和弧度之间的角度

本节将向您展现如何在 Excel 中转换角度和弧度之间的角度。

将度数转换为弧度

要将度数转换为弧度，以下面的屏幕截图所示，RADIANS 函数可以帮您一个忙。

句法

=RADIANS(angle)

争辩

选择一个空白单元格（在本例中为 D3），输入以下公式并按 Enter 键返回第一个弧度。 选择此结果单元格并向下拖动其自动填充手柄以获得其余的弧度。

=RADIANS(B3)

将弧度转换为度

Excel 有一个 DEGREE 函数，可用于将弧度转换为度数。 请履行以下操作。

句法

=DEGREES(angle)

争辩

选择一个空白单元格（在本例中为 D3），输入以下公式并按 Enter 返回第一度的键。 选择此结果单元格并向下拖动其自动填充句柄以获得其余的度数。

=DEGREES(B3)

注意： 或你可以直接使用以下公式。

=B3*180/PI()

在哪里 PI 函数返回名为 pi 的数学常数的数字 3.14159265358979。 单击以了解有关此 PI 功能的更多信息.

1.6 使用奇异的工具轻鬆转换各种单位丈量值

在这里我们推荐一个方便的功能—— 单位换算 of Excel的tools. 它在对话框中搜集各种单位丈量值，以帮助您轻鬆地将数字从一种丈量系统转换为另外一种丈量系统。 您可以履行以下操作以了解如何使用它。

它包括以下丈量系统：

1. 选择包括要从一种丈量系统转换为另外一种丈量系统的数字的单元格范围，然后单击启用单位转换功能 库工具 > 内容 转化 在不同的工具栏模式中）> 单位换算。 看截图：

2。 在里面 单位换算 对话框，请进行以下配置。

在这类情况下，我要将天使从度数转换为弧度，所以我选择 角 从下拉列表中，选择 学位 及 弧度 分别从左右单位框中，然后单击 OK 按钮。

提示：

2.在Excel中将数字转换为不同的数字系统

本节演示如何在 Excel 中将数字转换为不同的数字系统。

2.1 使用内置函数将数字转换为不同的数制

Excel 有几个函数可用于在不同的数字系统之间进行转换。 举例来看，您可使用 102进制 函数将10进制数转换为106进制数或使用 DEC2BIN 函数将10进制数转换为2进制数。 本节将向您展现如何使用这些内置函数在 Excel 中的不同数字系统之间进行转换。

将10进制数转换为106进制

要将10进制数转换为106进制数，您可以利用 DEC2HEX 函数来完成它。

句法

DEC2HEX(number, [places])

参数

选择一个单元格，输入下面的公式，然后按 Enter 获得第一个106进制数的键。 选择此结果单元格并将其向下拖动 AutoFill Handle 以获得其余的106进制数字。

=DEC2HEX(B3)

下表列出了可用于将数字转换为不同数字系统的函数。

选择您需要的功能并依照上述步骤利用它。

2.2 使用奇异的工具轻鬆将数字转换为不同的数字系统

虽然上述每一个功能都很容易使用，但它们也很容易混淆。 这里， Excel的tools是 数制转换 功能在一个对话框中搜集所有数字系统，当您需要将数字从一种数字系统转换为另外一种数字系统时，可帮助您轻鬆地在数字系统之间导航。

1. 选择要将数字从一个系统转换为另外一个系统的单元格范围，然后单击启用该功能 库工具 > 内容 转换） > 数制转换.

2。 在里面 数制转换 对话框，您需要配置以下。

在这类情况下，我需要将10进制数转换为106进制，所以我选择 10进制 及 106进制 分别从左边和右边框中。

提示：

3. Excel中数字和文本之间的转换（数字存储为文本）

本节将向您展现如何在 Excel 中将数字转换为文本或将文本转换为数字。

3.1 Excel中将数字转换为文本（数字存储为文本）

有时您可能需要将数字转换为文本。 举例来看，您需要在电子表格中存储一个超过 11 位的长数字，您需要将该数字转换为文本，以防 Excel 将其更改成科学通知。 在这里，我们提供了3种方法来帮助您详细地将数字转换为文本。

3.1.1 使用 TEXT 函数将数字转换为文本

要将下表中的数字转换为文本，可使用 TEXT 函数来完成。

1. 选择一个单元格（在本例中为 D3），输入下面的公式，然后按 Enter 取得第一个结果的关键。 选择此结果单元格并向下拖动其自动填充句柄以获得其余结果。

=TEXT(B3,"0")

点击 这里 了解更多关于 TEXT Excel中的功能。

现在您需要将公式转换为值。

3. 选择所有结果单元格，按 按Ctrl + C 键复制它们，然后按 按Ctrl + 其他 + V， 或 其他 + E + S 同时显示 选择性粘贴 对话框。

4。 在里面 选择性粘贴 对话框中，选择 价值观 在选项 贴 部份，然后单击 OK 保存更改。 看截图：

然后你可以看到选择中每一个单元格的左上角出现一个小的绿色3角形。 数字现在转换为文本。 看截图：

笔记：

3.1.2 使用单元格格式命令将数字转换为文本

您还可使用内置的将一系列数字转换为文本 单元格格式 Excel 中的命令。

1. 选择要转换为文本的数字范围。

2.右键单击选择，然后选择 单元格格式 从上下文菜单。

3.在开幕 单元格格式 对话框当选择 文本 在 种别 下框 联繫电话 选项卡，最后单击 OK 按钮保存更改。

然后选定的单元格被格式化为文本。

3.1.3 使用 Text to Columns 命令将数字转换为文本

Text to Columns 命令还可以帮助将一系列数字转换为 Excel 中的文本。 请履行以下操作。

1. 选择要转换为文本的数字范围。

2。 点击 数据 > 文本到列.

3.在开幕 将文本转换为列嚮导 对话框中，单击 下一页 按钮经过 步骤 1 及 步骤 2 对话框。 在里面 步骤 3 对话框中，选择 文本 在选项 列数据格式 部份，然后单击 完 按钮。 看截图：

您可以看到所选数字已转换为文本，并在每一个数字前添加撇号。

3.1.4 使用奇异的工具将数字转换为文本

除以上方法， tools for Excel's 在文字和数字之间转换 功能可以帮助您轻鬆地将一系列数字转换为文本。 请安装它并尝试以下。

1. 选择要转换为文本的数字范围。

2。 点击 库工具 > 内容 转换） > 在文字和数字之间转换.

3。 在里面 在文字和数字之间转换 对话框中，选择 联繫电话 到文本 选项，然后单击 OK 按钮。

然后所有选定的数字都将转换为文本，以下面的屏幕截图所示。

3.2 在Excel中将文本（数字存储为文本）转换为数字

有时工作表中的值看起来像数字，但它们是文本值，可能不会用于计算。 本节提供了几种方法来帮助您在 Excel 中将文本转换为数字。

3.2.1 使用转换为数字选项将文本转换为数字

如果文本格式单元格的左上角出现一个小的绿色3角形，您可以利用转换为数字命令将其轻鬆转换为数字。

1. 选择要转换为数字的文本单元格。

2. 点击正告标誌，然后选择 转换成数字 从下拉菜单当选择。

然后选定的文本将转换为数字，以下面的屏幕截图所示。

3.2.2 使用选择性粘贴命令将文本转换为数字

对标有绿色3角形的单元格，您还可以利用粘贴特殊命令将它们转换为数字。

1. 选择一个空白单元格，按 按Ctrl + C 键复制它。

2. 选择要转换为数字的单元格区域，然后按 按Ctrl + 其他 + V， 或 其他 + E + S 键同时。

3。 在里面 选择性粘贴 对话框当选择 价值观 在 贴 部份中，选择 加入 在 手术 部份，然后单击 OK 按钮。

看下面的截图：

然后选定的单元格立即转换为数字。

3.2.3 经过更改单元格格式将文本转换为数字

如果数字已被格式化为文本，以下面的屏幕截图所示（单元格的左上角没有出现小的绿色3角形），您可以手动将单元格格式更改成数字以完成转换。

1. 选择要转换为常规数字的文本格式数字范围。

2.右键单击选择并选择 单元格格式 从上下文菜单。

3.在开幕 单元格格式 对话框，留在 联繫电话 选项卡，然落后行以下配置。

然后将选定的文本格式的数字转换为常规数字。

3.2.4 使用奇异的工具轻鬆将文本转换为数字

在这里我们推荐一个方便的工具—— Excel的tools“ 在文字和数字之间转换 特徵。 使用此功能，您可以轻鬆地将选择或多个选择中的文本轻鬆转换为数字。

请履行以下操作以利用此功能。

1. 选择要转换为数字的文本单元格。

2。 点击 库工具 > 内容 转换） > 在文字和数字之间转换.

3。 在里面 在文字和数字之间转换 对话框中，选择 文字转数字 选项，然后单击 OK 按钮。

然后所选范围内的文本立即转换为数字。

4. 在 Excel 中转换货币

假定您有一份以美元为单位的大型货币报告，并且您想将美元转换为您所在国家/地区的货币，例如欧元。 默许情况下，Excel 不包括任何用于转换货币的内置工具。 在本节中，您将学习如何使用两类方法在 Excel 中的任意两类货币之间进行转换。

4.1 在 Excel 中使用汇率在任意两类货币之间进行转换

在使用此方法之前，您需要了解两类货币之间确当前汇率。 在这类情况下，我需要将美元转换为欧元，所以我使用美元和欧元之间确当前汇率：1 美元 = 0.95 欧元。

1.在空白单元格中输入交换范围0.95，例如本例中的D3。

2.选择顶部单元格E3，输入以下公式并按 Enter 将第一个美元转换为欧元的关键。 选择此结果单元格，然后向下拖动其自动填充句柄以获得其余结果。

=C3*$D$3

现在所有美元都转换为欧元，如上面的屏幕截图所示。

4.2 使用奇异的工具轻鬆转换任意两类货币

每次需要在两类货币之间进行转换时，要找出两类货币之间确当前汇率，这很烦人。 Excel的tools“ 货币兑换 功能在一个对话框中搜集所有货币。 有了它，您可使用当前汇率轻鬆地将一种货币转换为另外一种货币。

1. 选择要转换为其他货币的货币格式数字范围。

2。 点击 库工具 > 内容 转换） > 货币兑换.

2.在开幕 货币兑换 对话框，需要做以下设置。

注意： 上述设置将用结果覆盖原始数字。 如果需要，您可以将结果作为注释输出：单击 填充选项 按钮在 货币兑换 对话框。 在里面 填充选项 对话框中，选择 仅评论 只注意) 选项，指定注释或注释将包括的信息，然后关闭对话框。

5. Excel中时区之间的转换

本节将向您展现如何将时间从一个时区转换为另外一个时区。 以下图所示，要将C3:C8范围内的北京时间转换为不同城市的时间，可以试试下面的方法。

5.1 使用公式将时间从一个时区转换为另外一个时区

以下公式可以帮助针对给定的时差将时间从一个时区转换为另外一个时区。

1、首先要弄清楚两个时区的时差。

在这类情况下，我在 F3:F8 范围的每一个单元格中输入相应的时间差。

举例来看，由于中国北京比美利坚合众国纽约早 12 小时，我将时差 ⑴2 输入到纽约旁边的单元格中。 看截图：

2. 选择一个单元格，输入以下公式，然后按 Enter 取得纽约时间的关键。 选择此结果单元格并向下拖动其自动填充句柄以获得其他城市的时间。

=MOD(C3+(F3/24),1)

注意： 当使用包括日期和时间的日期时，例如 5 年 10 月 2022 日下午 2:55:00，您可以利用以下公式。

=datetime+(hours/24)

6.在Excel中转换阿拉伯数字和罗马数字

要在 Excel 中转换阿拉伯数字和罗马数字，以下方法可以帮到您。

6.1 使用罗马函数将阿拉伯数字转换为罗马数字

Excel 内置 ROMAN 函数可以将阿拉伯数字转换为罗马文本。

句法

ROMAN(number, [form])

参数

要将下表中的数字转换为罗马数字，您可以利用 ROMAN 函数，以下所示。

1.选择一个单元格，输入以下公式并按 Enter 将第一个阿拉伯语转换为罗马。 选择此单元格并向下拖动其自动填充句柄以取得其他结果。

=ROMAN(B3)

提示： 点击便可 了解更多关于这个 ROMAN 函数.

6.2 用公式将罗马数字转换为阿拉伯数字

使用 ROMAN 函数很容易将阿拉伯数字转换为罗马数字。 但是，如果要将罗马数字转换为阿拉伯数字，则需要一个更复杂的公式才能完成。 请履行以下操作。

1.选择一个空白单元格，例如本例中的D3，输入以下公式并按 Enter 取得第一个结果的关键。 选择此结果单元格并向下拖动其自动填充句柄以获得其余结果。

=MATCH(B3,INDEX(ROMAN(ROW(INDIRECT("1:4000"))),0),0)

注意： 在公式中，B3 是包括要转换为罗马数字的阿拉伯数字的单元格。

6.3 使用奇异的工具轻鬆转换阿拉伯数字和罗马数字

记住Excel中阿拉伯数字和罗马数字之间转换的不同公式可能对我们来讲很麻烦。 这是一个方便的工具 - Excel的tools。 随着它 在罗马和数字之间转换 实用程序，只需单击几下，您就能够轻鬆地在阿拉伯数字和罗马数字之间进行转换。

1. 选择要转换的阿拉伯数字或罗马数字的范围。

2。 点击 库工具 > 内容 转换） > 在罗马和数字之间转换.

3。 在里面 在罗马和数字之间转换 对话框中，选择 罗马数字 or 罗马数字 选项，取决于您选择的原始数据，然后单击 肯定。 见截图：

然后所选数据将立即转换为罗马数字或阿拉伯数字。

7. 将公式转换为 Excel 中的结果

将一系列公式单元格复制并粘贴到新位置时，结果会随着单元格援用而动态更改。 如果要在将公式复制并粘贴到新位置时保持结果不变，则需要将公式转换为其结果。 本节演示了两类有助于将 Excel 中的公式替换为结果的方法。

7.1 使用选择性粘贴命令将公式转换为结果

您可使用 选择性粘贴 Excel 中的命令。

1. 选择带有要转换为结果的公式的单元格，然后按 Ct+ C 键复制它。

2.如果要直接用结果替换选择中的公式，请选择所选范围的第一个单元格。 要将结果输出到新位置，只需在新范围当选择一个单元格。 然后右键单击选定的单元格并从上下文菜单当选择值。

然后您可以看到公式已转换为它们的结果，以下面的屏幕截图所示。

7.2 一键快捷将公式转换为结果

如果你有 Excel的tools 已安装，您可以利用它的 到实际 只需单击一下便可将所有公式转换为结果的功能。

1. 选择一个或多个包括要转换的公式的范围。

2。 点击 库工具 > 到实际.

然后，所选范围内的所有公式都会立即转换为它们的结果。

8. 在 Excel 中将数字转换为序数

以下图所示，要将 B3:B12 中列出的数字转换为序数，本节提供了3种方法来帮助您完成。

8.1 用公式将数字转换为序数

您可以利用以下公式将数字转换为 Excel 中对应的序数。 请履行以下操作。

1.选择一个空白单元格（本例中为C3），复制或输入下面的公式并按 Enter 获得第一个数字的序数。 选择此结果单元格并向下拖动其自动填充句柄以获得其余的序数。

=B3&IF(OR(--RIGHT(B3,2)={11,12,13}),"th",IFERROR(CHOOSE(RIGHT(B3),"st","nd","rd"),"th"))

注意： B3 是包括要转换为其序数的数字的范围的第一个单元格。 您可以针对需要更改它。

8.2 使用自定义内涵函数将数字转换为序数

如果上面的公式对您来讲很复杂，您可以利用以下用户定义内涵的函数在 Excel 中将数字转换为序数。

1。 按 其他 + F11 同时打开 Microsoft Visual Basic for Applications 窗口。

2.在开幕 Microsoft Visual Basic for Applications 窗口中，单击 插入 > 模块 然后将以下 VBA 代码复制到模块窗口中。

VBA 代码：在 Excel 中将数字转换为序数

Function Addth(pNumber As String) As String
'Updateby20220516
Select Case CLng(VBA.Right(pNumber, 1))
Case 1
Addth = pNumber & "st"
Case 2
Addth = pNumber & "nd"
Case 3
Addth = pNumber & "rd"
Case Else
Addth = pNumber & "th"
End Select
Select Case VBA.CLng(VBA.Right(pNumber, 2))
Case 11, 12, 13
Addth = pNumber & "th"
End Select
End Function

3。 按 其他 + Q 关闭键 Microsoft Visual Basic for Applications 窗口。

4. 选择要转换为序数的第一个数字旁边的空白单元格，输入下面的公式，然后按 Enter 取得结果的关键。 选择此结果单元格，向下拖动其自动填充句柄以获得其余结果。

=Addth(B3)

8.3 一键快捷将数字转为序数

对Excel新手来讲，以上两类方法可能不太好处理。 在这里我们推荐 将数字转换为序数 的功效 Excel的tools. 使用此功能，您只需单击一下便可将一系列数字批量转换为序数。

如以下演示所示，您只需选择要将数字转换为序数的单元格范围，然后单击 库工具 > 内容 > 将数字转换为序数.

然后将所有选定的数字转换为序数。 同时，会弹出一个对话框告知您已成功转换了多少个单元格，单击 OK 按钮。

单击以了解有关此功能的更多信息.

9. 在 Excel 中将数字转换为单词

在本节中，您将完全了解如何在 Excel 中将数字转换为单词。

9.1 使用自定义内涵函数将数字转换为英文单词

以下图所示，要在 Excel 中将数字显示为英文单词，下面的自定义内涵函数可以帮到你。 请试一试。

1。 按 其他 + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2.在开幕 Microsoft Visual Basic for Applications 窗口中，单击 插入 > 模块 然后将以下 VBA 代码复制到模块窗口中。

VBA 代码：将数字转换为英文单词

Function NumberstoWords(ByVal MyNumber)
'Update by  20220516
Dim xStr As String
Dim xFNum As Integer
Dim xStrPoint
Dim xStrNumber
Dim xPoint As String
Dim xNumber As String
Dim xP() As Variant
Dim xDP
Dim xCnt As Integer
Dim xResult, xT As String
Dim xLen As Integer
On Error Resume Next
xP = Array("", "Thousand ", "Million ", "Billion ", "Trillion ", " ", " ", " ", " ")
xNumber = Trim(Str(MyNumber))
xDP = InStr(xNumber, ".")
xPoint = ""
xStrNumber = ""
If xDP > 0 Then
xPoint = " point "
xStr = Mid(xNumber, xDP + 1)
xStrPoint = Left(xStr, Len(xNumber) - xDP)
For xFNum = 1 To Len(xStrPoint)
xStr = Mid(xStrPoint, xFNum, 1)
xPoint = xPoint & GetDigits(xStr) & " "
Next xFNum
xNumber = Trim(Left(xNumber, xDP - 1))
End If
xCnt = 0
xResult = ""
xT = ""
xLen = 0
xLen = Int(Len(Str(xNumber)) / 3)
If (Len(Str(xNumber)) Mod 3) = 0 Then xLen = xLen - 1
Do While xNumber <> ""
If xLen = xCnt Then
xT = GetHundredsDigits(Right(xNumber, 3), False)
Else
If xCnt = 0 Then
xT = GetHundredsDigits(Right(xNumber, 3), True)
Else
xT = GetHundredsDigits(Right(xNumber, 3), False)
End If
End If
If xT <> "" Then
xResult = xT & xP(xCnt) & xResult
End If
If Len(xNumber) > 3 Then
xNumber = Left(xNumber, Len(xNumber) - 3)
Else
xNumber = ""
End If
xCnt = xCnt + 1
Loop
xResult = xResult & xPoint
NumberstoWords = xResult
End Function
Function GetHundredsDigits(xHDgt, xB As Boolean)
Dim xRStr As String
Dim xStrNum As String
Dim xStr As String
Dim xI As Integer
Dim xBB As Boolean
xStrNum = xHDgt
xRStr = ""
On Error Resume Next
xBB = True
If Val(xStrNum) = 0 Then Exit Function
xStrNum = Right("000" & xStrNum, 3)
xStr = Mid(xStrNum, 1, 1)
If xStr <> "0" Then
xRStr = GetDigits(Mid(xStrNum, 1, 1)) & "Hundred "
Else
If xB Then
xRStr = "and "
xBB = False
Else
xRStr = " "
xBB = False
End If
End If
If Mid(xStrNum, 2, 2) <> "00" Then
xRStr = xRStr & GetTenDigits(Mid(xStrNum, 2, 2), xBB)
End If
GetHundredsDigits = xRStr
End Function
Function GetTenDigits(xTDgt, xB As Boolean)
Dim xStr As String
Dim xI As Integer
Dim xArr_1() As Variant
Dim xArr_2() As Variant
Dim xT As Boolean
xArr_1 = Array("Ten ", "Eleven ", "Twelve ", "Thirteen ", "Fourteen ", "Fifteen ", "Sixteen ", "Seventeen ", "Eighteen ", "Nineteen ")
xArr_2 = Array("", "", "Twenty ", "Thirty ", "Forty ", "Fifty ", "Sixty ", "Seventy ", "Eighty ", "Ninety ")
xStr = ""
xT = True
On Error Resume Next
If Val(Left(xTDgt, 1)) = 1 Then
xI = Val(Right(xTDgt, 1))
If xB Then xStr = "and "
xStr = xStr & xArr_1(xI)
Else
xI = Val(Left(xTDgt, 1))
If Val(Left(xTDgt, 1)) > 1 Then
If xB Then xStr = "and "
xStr = xStr & xArr_2(Val(Left(xTDgt, 1)))
xT = False
End If
If xStr = "" Then
If xB Then
xStr = "and "
End If
End If
If Right(xTDgt, 1) <> "0" Then
xStr = xStr & GetDigits(Right(xTDgt, 1))
End If
End If
GetTenDigits = xStr
End Function
Function GetDigits(xDgt)
Dim xStr As String
Dim xArr_1() As Variant
xArr_1 = Array("Zero ", "One ", "Two ", "Three ", "Four ", "Five ", "Six ", "Seven ", "Eight ", "Nine ")
xStr = ""
On Error Resume Next
xStr = xArr_1(Val(xDgt))
GetDigits = xStr
End Function

3。 按 其他 + Q 关闭键 Microsoft Visual Basic for Applications 窗口。

4. 选择一个空白单元格输出第一个结果，例如本例中的 D3。 输入以下公式并按 进入。 选择此结果单元格，向下拖动其自动填充句柄以获得其余结果。

=NumberstoWords(B3)

9.2 使用自定义内涵函数将数字转换为通货词

在处理金融相干的数字时，您可能需要数字的单词情势（见下面的屏幕截图）。 在这里，我们演示了一个用户定义内涵的函数，可帮助您将数字转换为 Excel 中与其等效的英文货币单词。

1。 按 其他 + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2.在开幕 Microsoft Visual Basic for Applications 窗口中，单击 插入 > 模块 然后将以下 VBA 代码复制到模块窗口中。

VBA代码：将数字转换为英文货币单词

Function SpellNumberToCurrency(ByVal pNumber)
'Update by  20220516
Dim Dollars, Cents
arr = Array("", "", " Thousand ", " Million ", " Billion ", " Trillion ")
pNumber = Trim(Str(pNumber))
xDecimal = InStr(pNumber, ".")
If xDecimal > 0 Then
Cents = GetTens(Left(Mid(pNumber, xDecimal + 1) & "00", 2))
pNumber = Trim(Left(pNumber, xDecimal - 1))
End If
xIndex = 1
Do While pNumber <> ""
xHundred = ""
xValue = Right(pNumber, 3)
If Val(xValue) <> 0 Then
xValue = Right("000" & xValue, 3)
If Mid(xValue, 1, 1) <> "0" Then
xHundred = GetDigit(Mid(xValue, 1, 1)) & " Hundred "
End If
If Mid(xValue, 2, 1) <> "0" Then
xHundred = xHundred & GetTens(Mid(xValue, 2))
Else
xHundred = xHundred & GetDigit(Mid(xValue, 3))
End If
End If
If xHundred <> "" Then
Dollars = xHundred & arr(xIndex) & Dollars
End If
If Len(pNumber) > 3 Then
pNumber = Left(pNumber, Len(pNumber) - 3)
Else
pNumber = ""
End If
xIndex = xIndex + 1
Loop
Select Case Dollars
Case ""
Dollars = "No Dollars"
Case "One"
Dollars = "One Dollar"
Case Else
Dollars = Dollars & " Dollars"
End Select
Select Case Cents
Case ""
Cents = " and No Cents"
Case "One"
Cents = " and One Cent"
Case Else
Cents = " and " & Cents & " Cents"
End Select
SpellNumberToEnglish = Dollars & Cents
End Function
Function GetTens(pTens)
Dim Result As String
Result = ""
If Val(Left(pTens, 1)) = 1 Then
Select Case Val(pTens)
Case 10: Result = "Ten"
Case 11: Result = "Eleven"
Case 12: Result = "Twelve"
Case 13: Result = "Thirteen"
Case 14: Result = "Fourteen"
Case 15: Result = "Fifteen"
Case 16: Result = "Sixteen"
Case 17: Result = "Seventeen"
Case 18: Result = "Eighteen"
Case 19: Result = "Nineteen"
Case Else
End Select
Else
Select Case Val(Left(pTens, 1))
Case 2: Result = "Twenty "
Case 3: Result = "Thirty "
Case 4: Result = "Forty "
Case 5: Result = "Fifty "
Case 6: Result = "Sixty "
Case 7: Result = "Seventy "
Case 8: Result = "Eighty "
Case 9: Result = "Ninety "
Case Else
End Select
Result = Result & GetDigit(Right(pTens, 1))
End If
GetTens = Result
End Function
Function GetDigit(pDigit)
Select Case Val(pDigit)
Case 1: GetDigit = "One"
Case 2: GetDigit = "Two"
Case 3: GetDigit = "Three"
Case 4: GetDigit = "Four"
Case 5: GetDigit = "Five"
Case 6: GetDigit = "Six"
Case 7: GetDigit = "Seven"
Case 8: GetDigit = "Eight"
Case 9: GetDigit = "Nine"
Case Else: GetDigit = ""
End Select
End Function

3。 按 其他 + Q 关闭键 Microsoft Visual Basic for Applications 窗口。

4. 选择一个空白单元格输出第一个结果，例如本例中的 D3。 输入以下公式并按 Ent呃。 选择此结果单元格，向下拖动其自动填充句柄以获得其余结果。

=SpellNumberToCurrency(B3)

9.3 使用奇异的工具轻鬆将数字转换为英语/货币单词

以上代码对 Excel 新手来讲有些麻烦。 如果你有 Excel的tools 安装后，可以利用它 数字到单词 只需单击几下，便可针对需要轻鬆将一系列数字转换为英语单词或英语货币单词。

1. 选择您要将数字转换为英文单词或英文货币单词的单元格范围，然后单击 库工具 > 内容 > 数字到单词。 看截图：

2。 在里面 数字到货币单词 对话框，您需要配置以下。

将所选数字转换为英文单词:

将所选数字转换为英文货币单词:

然后针对您的配置将所选数字转换为英文单词或英文货币单词。

单击以了解有关此功能的更多信息.

10. 在 Excel 中将数字转换为日期

本节提供一些方法来帮助您在 Excel 中将序列号或 8 位数字转换为 Excel 可辨认的日期。

10.1 在 Excel 中将序列号转换为日期

有时，Excel 会返回一个序列号（5 位数字）而不是您输入的日期（参见下面的屏幕截图）。 这是由于 Excel 将日期和时间作为序列号存储在后端。 要在 Excel 中将序列号转换为日期，您可以尝试以下3种方法之一。

10.1.1 使用单元格格式功能将序列号转换为日期

您可以经过更改单元格的格式轻鬆地将一系列序列号转换为日期。 请履行以下操作。

1.选择要将序列号转换为日期的单元格范围，右键单击选择并选择 单元格格式 从上下文菜单。

2。 在里面 单元格格式 对话框，您需要：

然后将选定的序列号转换为日期，以下面的屏幕截图所示。

10.1.2 使用公式将序列号转换为日期

您还可以利用以下公式将序列号转换为 Excel 中的日期。

1. 选择一个单元格，输入以下公式，然后按 Enter 键将第一个序列号转换为日期。 选择此结果单元格，向下拖动其自动填充句柄以获得其他日期。

=TEXT(B3,"m/d/yyyy")

注意： 在公式中，您可以更改“m / d / yyyy” 针对需要转换为其他日期格式。

10.1.3 使用奇异的工具轻鬆将序列号转换为日期

您是不是尝试过利用第3方工具来处理 Excel 任务？ 如果您想提高工作效力并节省工作时间，我们推荐 套用日期格式 of Excel的tools. 此功能有助于将一个或多个范围内的序列号转换为您需要的日期格式。

1. 选择一个或多个包括要转换为日期的序列号的范围。

2。 点击 库工具 > 格式 > 套用日期格式.

3。 在里面 套用日期格式 对话框，您需要：

注意： 您可以在 预览 选择日期格式后的框。

然后，选定范围内的所有选定数字都会立即转换为日期。

单击以了解有关此功能的更多信息.

10.2 将 8 位数字转换为 Excel 可辨认的日期

10.2.1 使用公式将 8 位数字转换为日期

要将 8 位数字转换为 Excel 可辨认的日期，您可以利用 DATE 功能结合 对， LE金融时报和 MID 职能。 请履行以下操作。

1. 选择一个单元格，输入以下公式，然后按 Enter 键将前 8 位数字转换为日期。 选择此结果单元格，向下拖动其自动填充句柄以获得其余日期。

=DATE(LEFT(B3,4),MID(B3,5,2),RIGHT(B3,2))

10.2.2 使用 Text to Columns 命令将 8 位数字转换为日期

内置的 文本到列 命令可以帮助将一系列 8 位数字转换为 Excel 可辨认的日期。

1.选择8位数字的范围，点击 日期 > 文本到列.

2。 在里面 将文本转换为列 对话框，您需要配置以下：

然后将所有选定的 8 位数字转换为 Excel 可辨认的日期。

10.2.3 使用奇异的工具轻鬆将 8 位数字转换为日期

这里我们介绍 转换为日期 的功效 tools for Outlook 帮助您一键轻鬆将一个或多个范围内的 8 位数字转换为 Excel 中的 Excel 辨认日期。

1. 选择一个或多个范围的 8 位数字。

2。 点击 库工具 > 内容 > 转换为日期. 然后所有选定的数字都会立即转换为日期，以下面的演示所示。

单击以了解有关此功能的更多信息.

11.在Excel中将数字转换为时间，反之亦然

在本节中，您将学习如何在 Excel 中将数字转换为时间，反之亦然。

11.1 在 Excel 中将数字转换为时间 (hh:mm:ss)

要将10进制格式的小时、分钟或秒转换为行之有效的的 Excel 时间，您可以尝试下面提供的相应方法。

11.1.1 将10进制小时转换为时间 (hh:mm;ss)

要将10进制格式的小时转换为 hh:mm:ss Excel 时间格式，需要将数字除以 24（表示一天中的总小时数），然后将单元格格式化为时间。 请履行以下操作。

1. 选择一个单元格，输入以下公式，然后按 Enter 钥匙。 选择此结果单元格并将其自动填充句柄向下拖动到要利用相同公式的单元格。

=B3/$C$3

在这类情况下，我在单元格 C24 中输入了数字 3。 可以直接在公式中输入数字 24，如：

=B3/24

2. 选择所有结果单元格，然后按 按Ctrl + 1 同时打开 单元格格式 对话框。

3。 在里面 单元格格式 对话框，您需要：

然后将结果格式化为时间格式 hh:mm:ss，以下面的屏幕截图所示。

11.1.2 将10进制分钟转换为时间 (hh:mm;ss)

要将10进制格式的分钟转换为 hh:mm:ss Excel 时间格式，需要将数字除以 1440（表示一天中的总分钟数），然后将单元格格式化为时间。 步骤与上述相同。

1. 选择一个单元格，输入以下公式，然后按 Enter 取得第一个结果的关键。 选择此结果单元格并将其自动填充句柄向下拖动到要利用相同公式的单元格。

=B3/$C$3

在这类情况下，我在单元格 C1440 中输入了数字 3。 可以直接在公式中输入数字 24，如：

=B3/1440

2.然后将结果单元格格式化为时间。 请 参考以上步骤.

最后，您将取得下面屏幕截图中显示的时间。

11.1.3 将10进制秒转换为时间 (hh:mm;ss)

将10进制格式的秒转换为 hh:mm:ss Excel 时间格式的步骤同上。 您只需将除数更改成 86400（表示一天中的总秒数），然后将单元格格式化为时间。

在这类情况下，公式以下：

=B3/$C$3

or

=B3/86400

然后将结果单元格格式化为时间。 请 参考以上步骤.

最后，您将取得下面屏幕截图中显示的时间。

11.2 在 Excel 中将时间 (hh:mm:ss) 转换为10进制数

本节演示了在 Excel 中将时间转换为小时、分钟、秒的不同公式。

11.2.1 使用公式将时间转换为小时

与上述方法相反，所不同的是，要将时间转换为小时，需要将时间乘以 24（表示一天中的小时数）。

1. 利用以下公式：

=B3*$C$3

其中 B3 包括时间值，$C$3 包括数字 24。

或您可以直接将数字 24 输入到公式中，以下所示：

=B3*24

利用公式后，您可以看到结果以时间格式显示。

注意： 如果您不想保存结果的小数部份，请利用以下公式。

=INT(B3*24)

2.您需要将结果单元格格式化为 联繫电话 格式。

选择结果单元格，按 按Ctrl + 1 键打开 单元格格式 对话框。 在对话框中，选择 联繫电话 在 种别 数字选项卡下的列錶框，指定小数位数 10进制 地方框，然后单击 OK 保存更改。

然后结果单元格显示为数字，以下面的屏幕截图所示。

11.2.2 使用公式将时间转换为分钟

要将时间转换为分钟，只需将时间乘以 1440（表示一天中的分钟数）。

利用以下公式：

=B3*$C$3

其中 B3 包括时间值，$C$3 包括数字 1440。

或您可以直接将数字 1440 输入到公式中，以下所示：

=B3*1440

注意： 如果您不想保存结果的小数部份，请利用以下公式。

=INT(B3*1440)

然后将结果单元格格式化为数字。 请 参考以上步骤.

最后，您将取得分钟，以下面的屏幕截图所示。

11.2.3 使用公式将时间转换为秒

要将时间转换为秒，请将时间乘以 86400（表示一天中的秒数）。

利用以下公式：

=B3*$C$3

其中 B3 包括时间值，$C$3 包括数字 86400。

或您可以直接将数字 86400 输入到公式中，以下所示：

=B3*86400

注意： 如果您不想保存结果的小数部份，请利用以下公式。

=INT(B3*86400)

然后将结果单元格格式化为数字。 请 参考以上步骤.

最后，您将取得秒数，以下面的屏幕截图所示。

11.2.4 使用奇异的工具轻鬆将时间转换为小时/分钟/秒

利用上述公式后，您依然需要更改单元格格式以显示实际的10进制数字。 如果你有 Excel的tools 安装，其 转换时间 实用程序可以帮助您轻鬆地将时间转换为10进制小时、分钟或秒，只需单击几下便可。

1. 选择要转换为小时、分钟或秒的时间范围。

2。 点击 库工具 > 内容 > 转换时间.

然后将所有选定的时间转换为小时、分钟或秒。 同时会弹出一个对话框告知你已成功转换了多少个单元格，点击 OK 关闭它。

单击以了解有关此功能的更多信息.

这就是 Excel 中的单元格转换教程的全部内容。 希望以上提供的方法可以解决您的问题。 如果您有更多的单元格转换问题，请留下您的评论。

选择英雄云的云表单=选择更智能的Excel

>>>>🚀🌟 点击注册 免费试用 更高级的-英雄云企业级云表单 🌟🚀 😃👉🌐>>>>

在现代企业管理中，数据的高效管理和处理至关重要。随着信息技术的不断发展，英雄云的云表单已经成为了提高数据录入、管理和分析效率的不可或缺的工具。让我们来深入探讨英雄云-云表单的几大优势。

基础字段：多样性满足业务需求

英雄云的云表单中包括了各种基础字段，如单行文本、多行文本、数字输入框、单选框、复选框、下拉框、下拉复选框、日期时间、分割线等。这些字段的多样性使用户可以根据具体的业务需求，轻松进行文本、数据和时间信息的录入或修改。例如，您可以使用单行文本字段录入员工姓名、产品型号等，或者使用下拉框进行多选，根据不同情况选择更加方便的字段类型。

高级字段：提升工作效率

英雄云的云表单还提供了高级字段，如地址、图片、附件、手写签名、手机、子表、关联数据、关联查询以及流水号。这些高级字段在基础字段的基础上升级，可帮助用户完成一些琐碎的工作。例如，使用地址字段可以避免逐字打字，而流水号字段可以自动生成规律性的编号，非常适用于合同编号生成等场景。

部门成员字段：精确管理与通讯录的关联

英雄云的部门成员字段允许企业对各个部门的成员进行精确管理。用户可以通过部门成员字段获取通讯录中的部门成员信息，应用于记录报销人、报销部门等场景。这些成员字段还细分为成员单选和成员多选，可根据具体需求在通讯录中选择一个或多个成员。

聚合表：数据处理更智能

英雄云的聚合表功能用于对已存在的表单数据进行聚合计算，从而得到一张聚合表，后续其他表单可调用聚合表进行数据联动、关联查询和关联数据等操作完成数据处理。这一功能可应用于多种场景，如进销存管理、财务管理和门店零售管理等，帮助企业完成数据处理，提高工作效率。

表单权限设置：灵活管理数据访问

英雄云的表单权限设置允许用户根据企业的具体需求管理表单的访问和操作权限。用户可以根据系统权限或自定义权限对不同成员或团队进行权限设置，以确保数据的安全和合规性。这一功能使企业能够根据变化的业务需求和团队结构，实时调整权限设置。

自定义打印模板：文档输出更便捷

英雄云的云表单支持自定义打印模板，可将表单数据转换为可打印的Word文档。用户可以根据自己的需求进行排版和编辑，将产品规格说明书等文档轻松生成。这一功能提供了一种标准化的文档输出方式，简化了信息整理的过程。

综合来看，选择英雄云的云表单意味着选择更智能、更灵活、更高效的数据管理工具。无论是提高工作效率，精确管理数据，还是实现数据处理，英雄云的云表单都能满足您的多样化需求，助力您的业务发展。

如果您正在寻找一款强大的云表单工具，不妨考虑英雄云，它将为您带来更多的便捷和智能，助您事半功倍。

免责声明：

本网址（www.yingxiongyun.com）发布的材料主要源于独立创作和网友匿名投稿。此处提供的所有信息仅供参考之用。我们致力于提供准确且可信的信息，但不对材料的完整性或真实性作出任何保证。用户应自行验证相关信息的正确性，并对其决策承担全部责任。对于由于信息的错误、不准确或遗漏所造成的任何损失，本网址不承担任何法律责任。本网站所展示的所有内容，如文字、图像、标志、音频、视频、软件和程序等的版权均属于原创作者。如果任何组织或个人认为网站内容可能侵犯其知识产权，或包含不准确之处，请即刻联系我们进行相应处理。