专栏首页VB小源码VB6 调用Excel,并进行操作

VB6 调用Excel,并进行操作

VB6 调用Excel,并进行操作!!



Dim excel As Application

Dim excelbook As Workbook

Dim excelsheet As Worksheet

Dim x(1 To 4, 1 To 4) As Integer



'按钮1

Private Sub Command1_Click()

Randomize

For i = 1 To 4

For j = 1 To 4

x(i, j) = 100 * Rnd()

'数组元素赋值

Next j

Next i

excel.Range("a1:d4").Value = x

'填充数组

excel.Range("a1:d4").Select

'选中从第一行第一列到第四行第四列的数据

Set excelchart = excel.Charts.Add

'制成图表

excelsheet.Application.Visible = True

'使Excel处于可见的状态

excelsheet.SaveAs App.Path + "\test.xls"

'存储文件

End Sub



'窗体启动事件

Private Sub Form_Load()

Set excel = CreateObject("Excel.application")

Set excelbook = excel.Workbooks().Add

Set excelsheet = excelbook.Worksheets("sheet1")

'声明并创建Microsoft Excel引用

End Sub



'窗口关闭事件

Private Sub Form_Unload(Cancel As Integer)

excelsheet.Application.Quit

'关闭 Excel

Set excelsheet = Nothing

'释放对象

End Sub



本文分享自微信公众号 - VB小源码(vb_xym),作者:巴西_prince

原文出处及转载信息见文内详细说明,如有侵权,请联系 yunjia_community@tencent.com 删除。

原始发表时间:2018-07-01

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

我来说两句

0 条评论
登录 后参与评论

相关文章

  • VB.NET 创建Excel表格对象

    Dim xlapp As Excel.Application '定义Excel程序

    巴西_prince
  • VB.NET 直接读取打开的Excel数据到DataGridView

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.Even...

    巴西_prince
  • VB.NET 直接调用打开的Excel表格

    Dim xlapp As Excel.Application '定义Excel程序

    巴西_prince
  • 关于一次性的数据输入,excel字符串连接保存到服务器还是CRUD?

    开发中遇到个问题,线下一个紧急的活动,给一个excel的文件,要把里面的一次性的数据放进活动里面,说真的几百几千个数据啊,手写进数据库不是更麻烦了吗?

    ydymz
  • Rancher 用户安装 Rainbond

    Rancher,Kubernetes 生态中成功的开源项目,其定位 “Run Kubernetes Everywhere”。Rancher 可以帮助开发者快速搭...

    Rainbond开源
  • ARKit 初学和发布会 Demo

    增强现实技术(Augmented Reality,简称 AR) ,概念我就不说了百度百科会告诉你,下面是我在iOS ARKit发布会对iOS AR应用的理解。

    ZY_FlyWay
  • 奇妙问题集 # 直接保存“DataFrame表格”为图片到本地?我他喵的!

    知识是需要积累的,有些冷知识、骚操作,你可能现在不需要,但是只有当你玩儿过,以后再碰到这个需求,你才会有印象,方便查询。

    朱小五
  • 【垂直居中高级篇】你不知道的垂直居中方式

          在Css中对元素进行水平居中是很简单的,如果他是一个行内元素,对它的父元素应用text-align:center;如果是一个块级元素,就对自身应用...

    sam dragon
  • 开发php的扩展模块(centos环境下)

    首先下载一份PHP的源码,并上传到centos服务器上 源码下载地址:https://github.com/php/php-src 然后在命令行进入到源码路径下...

    liulun
  • 【数据结构】Javascript中你应该知道的栈

    栈(stack)又名堆栈,是一种遵循后进先出(LIFO)原则的有序集合。新添加或待删除的元素都保存在栈的末尾,称作栈顶,另一端称作栈底。在栈里,新元素都靠近栈顶...

    coder_koala

扫码关注云+社区

领取腾讯云代金券