生成值时删除alt +在excel中输入

时间:2015-06-29 15:53:45

标签: vba excel-vba trim excel

我有一个行尾问题,你能告诉我如何修复它吗?当我在excel中输入一个值然后执行 Alt + Enter 时,该单元格中的值会中断并移动到下一行。我想用单线制作它。不知道怎么做。

例如,现在我得到这样的输出:

EnvName=testing  testing 
testing testing`

但生成的输出应该是这样的:

EnvName=testing  testing testing testing

在下面提供我的代码

Sub export()
  Dim i As Long


            Value = Sheets(Itm).Cells(i, 4).Value
            'If InStr(1, Sheets(Itm).Cells(i, 4).Value, " ") Then
            '  Value = """" & Sheets(Itm).Cells(i, 4).Value & """"
            'End If

  Close 1
End Sub

1 个答案:

答案 0 :(得分:3)

每当你从工作表上的单元格中获取一个值时,如果它中有一个换行符,那么你需要替换它,以避免在输出中得到相同的换行符:

Value = Replace(Sheets(Itm).Cells(i, 4).Value, vbLf, "")

不确定你想要用以下内容替换换行符:在这里我使用了一个空字符串,但你可以使用其他任何东西。