PDA

View Full Version : Delete a personal sheet



Felipe Dasi
05-11-2009, 03:17 PM
Hi, good nigth. In this topic its possible to create a personal sheet. My question: Its possible to deleea this sheet by code VBA?

Link topic create a personal sheet:
http://www.vbaexpress.com/kb/getarticle.php?kb_id=885

tks very much.

mdmackillop
05-16-2009, 04:50 PM
Based on that code

Sub KillPersonal()
Dim FSO As Object, Folder As Object

Set FSO = CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder(Application.StartupPath)

Workbooks("PERSONAL.XLS").Close False
Kill Folder & "\personal.xls"
End Sub

Felipe Dasi
05-17-2009, 04:22 AM
thanks mdmackillop.