如何让已编制好VBA的单个EXCEL表每一次打开都自动运行一...-获取excel进程,同一excel进程

Sub AABB()
Worksheets("AQ").Select
for i=1 to 9999
Call A
Call B
next
............

Private Sub Workbook_Open()

call RealFullScreen()

End Sub

在ThisWorkbook里面粘贴以上代码

Sub Wasdad()
For i =Range("a65536").End(xlUp).Row to 2 Step -1
d = Len(Range("e" & i))
If d > 15 Then
Range("e" & i).EntireRow.Delete
End If
Next i
End Sub

因为删抄除整行行号会变化，所以百，一般的删除、插入行采用倒序循环度的方法删除插入行

这个  是一个系统垃圾回收问题。当你按照qiaoxiaomao的设置了以后，有可能还有excel的进程，存在于系统中，这个可以从任务管理器中看见。等你这个程序运行完之后，你别管它，过一段时间，这个excel进程就消失了，被windows回收了。e5a48de588b6e799bee5baa6334

如果要在你运行完程序，立即回收excel进程，可以参考以下方法：（适用于VB.NET，VBA的自己去网上查一查，原理一样）

private sub main()
call step1           'step1里面有你要调用的excel程序
gc.collect           '这句话可以让进程里面的那个excel立即消失，但是必须放在step1的外面，放在step1里面是没用的
end sub

private sub step1()
dim  ExlcelApp as new excel.aplication           '调用你的excel程序
dim myworkbook as  excelapp.workbooks
myworkbook=............

........
myworkbook.close
excelapp=nothing
end sub

注意那个GC.COLLECT的位置。。

纯手工打。。