excel竖版人名怎么空格

在Excel中将竖版人名添加空格的方法有多种，例如使用公式、利用VBA脚本、借助文本到列功能。下面将详细描述其中的一种方法，即使用公式来实现。

要在Excel中给竖版人名添加空格，最直接的方式是使用Excel的公式功能。假设你的竖版人名在A列，从A1单元格开始。你可以在B列使用公式来自动添加空格。具体的公式如下：

=TEXTJOIN(" ", TRUE, MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1))

这个公式的核心思想是：通过MID函数逐个提取人名中的字符，并用TEXTJOIN函数将这些字符用空格连接起来。使用ROW和INDIRECT函数创建一个从1到字符总数的数组，MID函数根据这个数组提取每一个字符。下面是更详细的步骤和解释：

一、公式详解

使用MID函数逐个提取字符：
- MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1)：这个部分通过ROW(INDIRECT("1:"&LEN(A1)))创建一个从1到人名字符总数的数组，MID函数依次取出每一个字符。
使用TEXTJOIN函数连接字符：
- TEXTJOIN(" ", TRUE, MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1))：TEXTJOIN函数将提取出的字符用空格连接起来。

二、具体步骤

在B1单元格输入公式：
- 在B1单元格中输入上述公式：=TEXTJOIN(" ", TRUE, MID(A1, ROW(INDIRECT("1:"&LEN(A1))), 1))
按下Ctrl+Shift+Enter：
- 因为这是一个数组公式，所以需要按下Ctrl+Shift+Enter，而不是普通的Enter。这样，Excel会将公式视为数组公式处理。
向下复制公式：
- 将B1单元格的公式向下拖动，以应用到其他单元格。

三、其他方法

1、使用VBA脚本

如果你熟悉VBA（Visual Basic for Applications），可以编写一个简单的VBA宏来自动添加空格。以下是一个示例脚本：

Sub AddSpaces()
    Dim rng As Range
    Dim cell As Range
    Dim i As Integer
    Dim newText As String
    Set rng = Selection
    For Each cell In rng
        newText = ""
        For i = 1 To Len(cell.Value)
            newText = newText & Mid(cell.Value, i, 1) & " "
        Next i
        newText = Trim(newText)
        cell.Offset(0, 1).Value = newText
    Next cell
End Sub

2、使用文本到列功能

选择数据：选择你要添加空格的竖版人名列。
数据选项卡：在功能区中选择“数据”选项卡。
文本到列：点击“文本到列”按钮。
分隔符选项：选择“固定宽度”，然后点击“下一步”。
设置分隔符位置：在每个字符之间点击以设置分隔符，然后点击“完成”。

四、总结

通过上述方法，你可以在Excel中轻松地为竖版人名添加空格。使用公式是最简便的方法，而VBA脚本和文本到列功能则提供了更多的灵活性和自动化处理能力。根据你的具体需求选择最适合的方法，可以大大提高工作效率。