日记首页
|
列表
|
添加日记
|
管理登陆
标题:利用VBA代码进行替换单元格内字符串的操作方法实例
<P>利用VBA代码进行替换单元格内字符串的操作方法实例</P> <P>Sub MyReplace()<BR>Range("A1:Ay15").Replace "1", "语文"<BR>Range("A1:Ay15").Replace "2", "数学"<BR>Range("A1:Ay15").Replace "3", "英语"<BR>Range("A1:Ay15").Replace "4", "典范"<BR>Range("A1:Ay15").Replace "5", "科学"<BR>Range("A1:Ay15").Replace "6", "政治"</P> <P>End Sub</P>