如何保存vba自编程序写VBA 程序

查看: 1416|回复: 3
if not in ...的语句怎么写?
阅读权限20
在线时间 小时
& & & & & & & &
& &For Each sh In ThisWorkbook.Sheets
& && &&&If sh.Name not in ( &汇总1& , &汇总2&, &汇总3&) Then
& && && && &sh.Cells(2, 1).Value = 1
& && && && &Next
& && &&&End If
& && &&&If sh.Name not in ( &汇总1& , &汇总2&, &汇总3&) Then
上面这一句代码语法错误,
想对一个excel中的除了若干个工作表以外的,所有工作表进行操作,
请问应该怎么写?
阅读权限200
在线时间 小时
If Not &汇总1/汇总2/汇总3& Like &*& & sh.Name & &*& Then
If InStr(&汇总1/汇总2/汇总3&, sh.Name)= 0 Then
阅读权限95
在线时间 小时
For Each sh In Sheets
& & If InStr(&汇总1,汇总2,汇总3&,sh.Name)=0 Then sh.[a2]=1
Next复制代码
阅读权限95
在线时间 小时
& & & & & & & &
& & arr = Array(&汇总1&, &汇总2&, &汇总3&)
& & On Error Resume Next
& & For j = 0 To UBound(arr)
& && &&&Sheets(arr(j)).Cells(2, 1).Value = 1
& & Next j
玩命加载中,请稍候
玩命加载中,请稍候
Powered by
本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任! & & 本站特聘法律顾问:徐怀玉律师 李志群律师怎么在excel中输入VBA程序_百度知道
怎么在excel中输入VBA程序
提问者采纳
2007版先在选项里调出开发工具到菜单栏----点击开发工具---vba编辑器----插入---模块----输入代码
其他类似问题
7人觉得有用
为您推荐:
您可能关注的推广
excel的相关知识
其他2条回答
工具——宏——vb编辑器——右键单击左边sheet1或其他表——插入模块,然后就可以输入代码了
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁

我要回帖

更多关于 vba定时执行某程序 的文章

 

随机推荐