محمد رضا بهبودی
شنبه 24 اسفند 1398, 13:28 عصر
با سلام و احترام خدمت اساتید محترم
با چه دستوری می توان از داخل برنامه اکسس یک فایل اکسل را مثلا با نام تست بست . لطفا درصورت امکان راهنمائی بفرمائید
البته من این ماژول را دارم
Public Sub KillExcecutedFile(ExecutedFileName As String)
Dim ProcessName As Object
For Each ProcessName In GetObject("winmgmts:").ExecQuery("Select Name from Win32_Process Where Name = '" & ExecutedFileName & "'")
ProcessName.Terminate
Next
End Sub
ولی این مازول کل فایلهای اکسل که باز هستند را می بندد . در واقع پروسس اکسل را می بندد .
من فقط می خواهم یک فایل اکسل مشخص بسته شود .
با چه دستوری می توان از داخل برنامه اکسس یک فایل اکسل را مثلا با نام تست بست . لطفا درصورت امکان راهنمائی بفرمائید
البته من این ماژول را دارم
Public Sub KillExcecutedFile(ExecutedFileName As String)
Dim ProcessName As Object
For Each ProcessName In GetObject("winmgmts:").ExecQuery("Select Name from Win32_Process Where Name = '" & ExecutedFileName & "'")
ProcessName.Terminate
Next
End Sub
ولی این مازول کل فایلهای اکسل که باز هستند را می بندد . در واقع پروسس اکسل را می بندد .
من فقط می خواهم یک فایل اکسل مشخص بسته شود .