<?xml version="1.0" encoding="utf-8" ?><rss version="2.0"><channel><title><![CDATA[y114744896的博客]]></title><description><![CDATA[]]></description><link>https://blog.youkuaiyun.com/y114744896</link><language>zh-cn</language><generator>https://blog.youkuaiyun.com/</generator><copyright><![CDATA[Copyright &copy; y114744896]]></copyright><item><title><![CDATA[VBA 替换excel单元格中某字符为换行符（alt+Enter）]]></title><link>https://blog.youkuaiyun.com/y114744896/article/details/104965724</link><guid>https://blog.youkuaiyun.com/y114744896/article/details/104965724</guid><author>y114744896</author><pubDate>Thu, 19 Mar 2020 13:34:35 +0800</pubDate><description><![CDATA[VBA 替换excel单元格中某字符为alt+Enter
Sub test()
For Each c In Range(“A1:C333”)
If InStr(c.Value, “##”) &gt; 0 Then c.Value = Replace(c.Value, “##”, Chr(10))
Next
End Sub

]]></description><category></category></item></channel></rss>