Access应用技巧：[1]操作Excel对象

有很多网友全不知此款access的软件相关教程，今个神奇下载软件教程频道编辑给各位玩家带来Access应用技巧：[1]操作Excel对象资讯，希望能对大家有所帮助，一起来看一下吧！

作为微软Office办公套件，只有将各组件之间进行协调，才能真正发挥出Office自化的优势来。下面就来看一下在Access中操作Excel对象的方法。希望借此抛砖引玉，能够起到举一反三之效果。

方法/步骤

打开Access2007，新建一个新数据库，然后切换到“创建”选项卡，点击“窗体设计”按钮，创建一个新的窗体，并将该窗体保存为“FrmMain”。

在窗口区域绘制一个按钮，并将其“标题”设置为“写入数据到Excel”。

在“属性”窗口中切换至“事件”选项，并选择“单击”右侧的“打开”按钮，进入事件代码编程窗口。

点击“工具”→“引用”，在打开的“引用”窗口中，勾选“Microsoft Excel 12.0 Object Library”，并点击“确定”完成对Excel类库的引用。

在打开的事件代码窗口中输入如图所示的内容：

Option Compare Database

Private Sub Command0_Click()

Dim xlApp As New Excel.Application '申明EXCEL应用程序对象

Dim xlWorkBook As Excel.Workbook '定义Excel工作簿对象

Dim xlWorkSheet As Excel.Worksheet '定义Excel工作表对象

Set xlApp = CreateObject("Excel.Application") '设置应用程序对象实例

xlApp.Visible = True '显示Excel应用程序

Set xlWorkBook = xlApp.Workbooks.Add '添加新的工作簿

Set xlWorkSheet = xlWorkBook.Worksheets(1)

xlWorkSheet.Cells(1, 1).FormulaR1C1 = "百度ID：feifeidown" '将数据写入Excel

With xlWorkSheet.Cells(1, 1).Font

.Name = "华文行楷"

.Size = 20

.Bold = True

End With

'xlApp.Quit '退出Excel应用程序

'Set xlApp = Nothing '释放资源

End Sub

然后切换到“窗体视图”模式，并点击“写数据到Excel按钮”，就可以查看效果啦。

(共篇)上面就是对于《Access应用技巧：[1]操作Excel对象》软件教程全部内容了，希望能帮助正在学习access的网友！想要了解更多access软件资讯，请继续关注神奇下载！

相关文章

学会Excel：[12]Excel与Access联合应用示例

学会Excel：[10]链接Excel表到Access(从一个excel链接到另一个excel)

Access如何导入外部数据/如何将Excel导入Access