摘要: 自己在公司里面维护了一个小金库的Excel,当某个人的余额小于0的时候,Outlook会自动给这个人发一封邮件,同时将这个Excel附在邮件中,具体的代码如下:Public Function sendEmail(mailTo As String) Application.ScreenUpdat... 阅读全文
posted @ 2015-12-04 16:46 朝雾之归乡 阅读(1309) 评论(0) 推荐(0) 编辑
摘要: 在BOM中记录中有物料编码,物料名称,物料规格等,而且依据BOM已经生成了一些的文件,如采购规格书,这个时候需要生成相应的检验规格书模板,可以使用下面的VBA代码,具体代码如下:Function IsFileExists(ByVal strFileName As String) As Boolean... 阅读全文
posted @ 2015-12-04 16:41 朝雾之归乡 阅读(274) 评论(0) 推荐(0) 编辑
摘要: 在BOM中记录中有物料编码,物料名称,物料规格等,而且依据BOM已经生成了相应的文件,如采购规格书,检验规格书等,这个时候需要获得这些文件的标题,并且生成一个列表,可以使用下面的VBA代码,具体代码如下:Function IsFileExists(ByVal strFileName As Strin... 阅读全文
posted @ 2015-12-04 16:38 朝雾之归乡 阅读(321) 评论(0) 推荐(0) 编辑