excel中插入程序
发布网友
发布时间:2022-05-06 03:31
我来回答
共1个回答
热心网友
时间:2022-06-28 14:36
Sub wwww()
dim b as integer
for i=25 to 65535
if range("b" & i)="XXXX" then b = b + 1
next
Activecell.value = b
End Sub
----------------------------------------
晕!
1,工具--宏--visual basic编辑器
2,宏的位置在左边的树型图中的“模块”里
3,复制现有的宏文件中“模块”里的程序代码
4,在新EXCEL的树型图上点右键,插入-模块,会自动生成一个“模块-模块1”
5,粘贴以上的代码到新的模块1中