如何在excel vba中添加字符串空间？

Question

如何在此示例字符串中添加空格？

单元格A1中的输入值为index.php，将粘贴到另一个格式为if (isset($_SERVER['MAGE_IS_DEVELOPER_MODE'])) { Mage::setIsDeveloperMode(true); } with Mage::setIsDeveloperMode(true); and use ini_set('display_errors', 1); 的单元格B1中。

Answer 1

插入空格的一个公式： =LEFT(A1,5)&" "&RIGHT(A1,LEN(A1)-5)在第5个位置后插入一个空格。 （ABCDE FGHIJK）

根据示例插入2个空格： =LEFT(A1,5)&" "&MID(A1,6,2)&" "&RIGHT(A1,LEN(A1)-7) 输入ABCDEFGHIJK，结果ABCDE FG HIJK

简而言之：使用=LEFT()，=RIGHT()和=MID()来获取字符串的一部分并连接部分和空格。

修改 在VBA：

Public Function StringWithSpaces(inpStr As String) As String
    StringWithSpaces = Left(inpStr, 5) & " " & Mid(inpStr, 6, 2) & " " & Right(inpStr, Len(inpStr) - 7)
End Function