Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库 _经验知识

现有9个班级的学生成绩表。包括三门课的成绩：

文章插图
门槛在excel中画出每一个班级每科平均成绩柱状图。
如果单纯的用Excel整理资料很是麻烦。总共九个班级。每一个班级都门槛三门课的平均成绩。费时费力。
可以借助Access资料库将资料统计出去。之后跟着回到Excel进行成图。
第一步：将资料直接粘贴到Access资料库
复制Excel表格中的学生成绩资料→打开已一些Access资料库→创建表→粘贴保存

文章插图
第二步：创建查询。统计资料
创建→查询设计→编辑语句→运行：
select 班级,avg(语文),avg(英文),avg(数学) from 表1 group by 班级

文章插图
运行结果：

文章插图
第三步：复制到Excel表格中。进行成图
点一下左边最上角→右键复制→打开Excel表格→粘贴→成图

文章插图
粘贴到Excel表格中：

文章插图
成图：
点一下插入→图表→柱状图

文章插图
结果：

文章插图
其实。在事实事情中有很多问题是可以通过Access资料库与Excel表格混合来解决的。这样很能够节节省时间间。即便在Excel表格当中也提供了很多函数能够分组求得我们想要的结果。但是步骤繁琐。
能通过这个混合的方法可以较好的解决不一样的难题。一个是使用了Access资料库处理资料的优势。一个是使用了Excel表格成图的优势。两个优势混合。必然效率更高。
VB程序全自动资料处理Access资料库与Excel表格资料VB程序设计比较容易学习。有的非电脑专业的人士也能够轻松学好VB程序设计。VB程序设计来应付你日常事情中的问题。是完整可以胜任的。有有的比较杂乱的资料需要进行处理运算。如果单纯的有表格或者资料库。整个操作是相当麻烦的。不仅浪费了时光。还容易出错。下面来讲解一下使用VB程序怎么样读取Access资料库中的资料与Excel表格中的资料。
VB程序读取Excel表格资料
首先打开VB6.0程序设计。打开后是这种窗口：

文章插图
这是一个空的程序窗口。我们还没添加所有控件和代码。我们先不细讲解VB6.0的窗口。我们现在只用到它的按钮控件。就是上面圈起来的东东。它在里面叫做“commandbutton” 。我们双击它。它就跳到我们的窗口窗口了：

文章插图
再来继续双击。就可以编编辑代码啦：

文章插图
其实和Access资料库与Excel表格的VBA宏是差不多的。只不过语法上略有差别。VB6.0可以很灵巧的去做一个小的应用程序。而VBA宏就只能作为插件使用。
编辑读取Excel表格资料的程序。其实读取的代码基础是特定的。只要各位把这种特定的程序代码直接复制进去就好。开始不用自己吻全自动手去敲代码的。

文章插图
各位可以就这样看一下这些代码。都表示什么意思呢？
我们来就这样看定义的内容：
Dim xl软件 As Excel.软件licationDim xlBook As Excel.WorkbookDim xlSheet As Excel.WorksheetDim xlSheet1 As Excel.Worksheet这几个定义都是特定的模式。我们使用VB程序对Excel表格资料进行读取时。都要对Excel进行定义。这样VB程序才能够查看出所要读取的文件。
Set xl软件 = CreateObject("Excel.软件lication")是建立Excel文件用的。它表示建立一个Excel对象。对象建立完了之后。我们就可以打开指定的文件了。就是下面这种：
Set xlBook = xl软件.Workbooks.Open("F:\报表运行表.xls")xl软件.Visible = True//表示让对象可见。就是在读取的时候。我们能观看到的文件的打开。Set xlSheet1 = xlBook.Worksheets("表1")//表示要读取文件中的哪个表。这里面是读取"表1"xlSheet1.Activate//表示激活要读取的表。只有激活了。才能保证操作在目前表进行以上都是特定的模式。各位可以复制就可以。不用敲代码。