EXCEL 如何制作瀑布图,对于有些数据做图表非常适合用瀑布图,比如生活开支......
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按钮”,就可以查看效果啦。
以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!