Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/25.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何在字符串中插入字符?(VBA)_Vba_Excel - Fatal编程技术网

如何在字符串中插入字符?(VBA)

如何在字符串中插入字符?(VBA),vba,excel,Vba,Excel,我有一列产品编号,其格式如下: MK444LLA …相同的数字和字母模式,相同的字符计数。我需要在每个单元格中插入一个/,这样它们都会这样结束: MK444LL/A 我想我只需要为第一行提供一个解决方案,然后将其应用于整个列。使用and 左(范围(“A1”).Text,7)-返回前七个字符 Right(Range(“A1”).Text,1)-返回最后一个字符。为什么=LEFT(A1,7)和“/”&Right(A1,1)不能工作?@MathieuGuindon它可以,这也是我的答案。结果字符串

我有一列产品编号,其格式如下:

MK444LLA
…相同的数字和字母模式,相同的字符计数。我需要在每个单元格中插入一个
/
,这样它们都会这样结束:

MK444LL/A
我想我只需要为第一行提供一个解决方案,然后将其应用于整个列。

使用and

左(范围(“A1”).Text,7)
-返回前七个字符


Right(Range(“A1”).Text,1)
-返回最后一个字符。

为什么
=LEFT(A1,7)和“/”&Right(A1,1)
不能工作?@MathieuGuindon它可以,这也是我的答案。结果字符串的格式很奇怪。“MK-01-1/34”@chlee218在你的问题中,你说所有行的字符数都相同,但你在评论中提到的示例长度与你的问题中的示例长度不同。@chlee218如果相反,每行可以有不同的大小,那么使用
左(范围(“A1”).Text,Len(范围(“A1”).Text)-1和“/”右(范围(“A1”).Text,1)
@Marcucciboy2所有行的字符数都相同。但是,结果字符串以这种奇数格式出现(并且“/”后面的数字随着每行的增加而继续上升)。这可能是因为我使用了R1C1公式来获得初始字符串吗?@chlee218肯定是这样,因为上面的答案只会在已经存在的测试中粘贴/字符。
Left(Range("A1").Text, 7) & "/" & Right(Range("A1").Text, 1)