excel vba 替换对话框 (ctrl+h) 换行符
excel vba replace dialog (ctrl+h) line break
当我在VBA点击CTRL+H替换时,我想找到一个字符串并用相同的字符串+换行+其他字符串替换
我知道在Excel(CTRL+J)中用CTRL+H加换行,VBACTRL+H不一样。
我知道如何在 Excel (CHAR(10)) 中的函数中添加换行符,VBA CTRL+H 不同。
我知道如何在 VBA (vbCrLf) 中的 MsgBox 中添加换行符,VBA CTRL+H 不同。
Dim i, xa, xb, counter As Integer
counter = 0
For i = 1 To 5
If Cells(i, 1) = "a" Then
xa = i
ElseIf Cells(i, 1) = "b" Then
xb = i
End If
Next i
在我添加的示例代码中,我想将“= i”替换为“= i + new line + counter = counter + 1”
这只是一个示例代码,我的真实代码有更多的 ElseIf,我想快速完成而不会手动出错。
这张图片总结了我的确切问题:
内置于 Excel、Access 等的 VBA 编辑器不能 多行搜索(和替换)。也许你可以安装某种扩展,例如"Helixoft",或者您可以使用 VBA 本身以编程方式操作代码,因为它在每个细节中都有解释:http://www.cpearson.com/excel/vbe.aspx。祝你好运!
当我在VBA点击CTRL+H替换时,我想找到一个字符串并用相同的字符串+换行+其他字符串替换
我知道在Excel(CTRL+J)中用CTRL+H加换行,VBACTRL+H不一样。
我知道如何在 Excel (CHAR(10)) 中的函数中添加换行符,VBA CTRL+H 不同。
我知道如何在 VBA (vbCrLf) 中的 MsgBox 中添加换行符,VBA CTRL+H 不同。
Dim i, xa, xb, counter As Integer
counter = 0
For i = 1 To 5
If Cells(i, 1) = "a" Then
xa = i
ElseIf Cells(i, 1) = "b" Then
xb = i
End If
Next i
在我添加的示例代码中,我想将“= i”替换为“= i + new line + counter = counter + 1”
这只是一个示例代码,我的真实代码有更多的 ElseIf,我想快速完成而不会手动出错。
这张图片总结了我的确切问题:
内置于 Excel、Access 等的 VBA 编辑器不能 多行搜索(和替换)。也许你可以安装某种扩展,例如"Helixoft",或者您可以使用 VBA 本身以编程方式操作代码,因为它在每个细节中都有解释:http://www.cpearson.com/excel/vbe.aspx。祝你好运!