Excel formula Microsoft Excel：生成字符串内容和双引号的公式

Microsoft Excel：生成字符串内容和双引号的公式

我在Microsoft Excel中生成批处理文件的内容。然后我将命令复制到.BAT文件并运行.BAT文件

对于Excel文件中的每一行，我生成一组批处理命令，这些命令当前由&。。。完全正确。比如说,

公式如下：

="@ECHO OFF&cd \users\imemine\&"&"""C:\Program Files (x86)\program\program.exe"" -parameter1 -parameter2 """&A1&""""&"&echo.message"

输出：

@ECHO OFF&cd \users\imemine\&"C:\Program Files (x86)\program\program.exe" -parameter - parameter2 "string"&echo.message

出于美观的考虑，我想用换行符替换&并将每个批处理命令放在自己的行中

因此，我尝试用char10替换&my Excel公式。我还尝试了公式中的Alt Enter字符

但是我得到的输出有不必要的双引号字符。例如：

"@ECHO OFF&
cd \users\imemine\&""C:\Program Files (x86)\program\program.exe"" -parameter -parameter2 ""string""&echo.message"

我该怎么办

当我将Excel公式结果复制到批处理文件中时，我希望看到这样的情况：

@ECHO OFF
cd \users\imemine\
"C:\Program Files (x86)\program\program.exe" -parameter - parameter2 "string"
echo.message

---

谢谢你，乔安娜，我不确定这在公式中是否可行。我们可以使用矩形形状+[一段宏]作为解决方案，但从形状复制很繁琐

1.在命令行中使用替换替换（&S）

=SUBSTITUTE(B4,"&",CHAR(10))

2.创建一个矩形并将其与包含新命令行的单元格链接。 选择形状，然后将其粘贴到公式栏中

=$B$7

3.插入宏。已激活Microsoft Forms 2.0

Sub ShapeCb()
Dim obj As New DataObject
Dim strText As String
strText = ActiveSheet.Shapes("Rectangle 1").TextFrame.Characters.Text
obj.SetText strText
obj.PutInClipboard
End Sub

工作表：

复制粘贴后的输出：

---

我不确定这在公式中是否可行。我们可以使用矩形形状+[一段宏]作为解决方案，但从形状复制很繁琐

1.在命令行中使用替换替换（&S）

=SUBSTITUTE(B4,"&",CHAR(10))

2.创建一个矩形并将其与包含新命令行的单元格链接。 选择形状，然后将其粘贴到公式栏中

=$B$7

3.插入宏。已激活Microsoft Forms 2.0

Sub ShapeCb()
Dim obj As New DataObject
Dim strText As String
strText = ActiveSheet.Shapes("Rectangle 1").TextFrame.Characters.Text
obj.SetText strText
obj.PutInClipboard
End Sub

工作表：

复制粘贴后的输出：

---

您已将整个.bat文件打包在单个单元格中的单个字符串中。为什么不在列中使用连续单元格？您已经将整个.bat文件打包在单个单元格中的单个字符串中。为什么不在列中使用连续单元格？