- 博客(3)
- 收藏
- 关注
原创 使用Excel VBA将当前Excel作为附件通过Outlook发email给接收人
Sub SendEmail() Dim sRecipient As String sRecipient = InputBox("Please input the receipt email address") Dim olApp As Object Dim olNameSpace As Object
2012-07-26 10:01:51 2781
原创 通过ADODB.RecordSet打开Excel工作簿
Sub test() Dim dbRng As String dbRng = Sheet1.Range("contract").Address(False, False) Dim Conn As New ADODB.Connection Conn.Open "Provider=Microsoft.Jet.OleDb.4.0;Extended Properties=Exce
2012-07-04 14:30:32 2402 1
原创 和在Excel VBA中使用ADODB对象
在Tools菜单中选择References菜单项,勾选其中的“Microsoft ActiveX Data Objects 2.8 Library”,即可
2012-07-04 14:18:32 3351
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人