用对象操作excel纯源码

Logo黑星

前阵子，发表了一篇入门级的《用对象操作word纯源码》，很多坛友反映，能否弄一贴关于excel的，为此，总结前人的经验，开拓自己的思想，写下此贴。
实质上，使用对象操作word或者excel，论坛中早有前人用对象做过相关的类或者模块并且已经开源供大家使用了。我写这两篇贴子的初衷仅仅是帮助大家更进一步的学习使用而已。
根据前人开源的代码，我总结了一下：
易语言操作EXCEL的模块
https://bbs.125.la/forum.php?mod=viewthread&tid=13805868&highlight=%D2%D7%D3%EF%D1%D4%B2%D9%D7%F7
易语言操作EXCEL的模块2
https://bbs.125.la/forum.php?mod=viewthread&tid=14134310&highlight=%D2%D7%D3%EF%D1%D4%B2%D9%D7%F7
Excel对象操作
https://bbs.125.la/forum.php?mod=viewthread&tid=13802293&highlight=%B6%D4%*FF3%2Bexcel
这些开源的模块中，已经将对象操作excel的基本功能写得很到位，我在此仅仅只是添砖加瓦，还望各位海涵！

同样的，给新人们几点建议:
1,Vbaexcelxl10.chm 这个知识库肯定是得看的,方便查找对象,属性,方法等;
2,对象.查看(),这个命令是必须使用的,同样是方便查找对象,方法,并了解在易语言中,到底该用.读对象属性(),还是.对象型方法();
3,记住几个主要的对象:application, ActiveWorkbook，Activesheet，Range，cells, selection
4,操作的思想:
找到对象(.读对象属性())-->处理对象(.对象型方法())




好了，废话不多说，进入正题：
本贴主题主要写关于在EXCEl单元格中置数据的。主要是看到开源的代码中，这个功能有待完善，而且这个功能是最常用最基本的。
本贴主要解决两个功能：
功能一：单元格的操作，有活动与非活动的区别。最常用的是活动单元格的操作，并且分为单个，多个（1行，1列，3行2列...）。
功能二：其内容的输入，有文字，数字，日期，图片.....通常主要是文字与数字的输入。




我这里主要是实例，如源码作者看到可以将这两个功能优化后加入模块中。
注：测试使用前记得打开一个excel空表。
部分代码展示：

.版本 2
.子程序 活动单元格操作
.参数 定位, 编辑框
.参数 输入文本, 编辑框
.局部变量 excel, 对象
.局部变量 books, 对象
.局部变量 sheets, 对象
.局部变量 ranges, 对象
.局部变量 value, 变体型
.局部变量 cell1, 变体型
.局部变量 cell2, 变体型
.局部变量 分割文本, 文本型, , "0"
.局部变量 selection, 对象
分割文本 ＝ 分割文本 (定位.内容, “:”, )  ' 填写单元格区域，如：“A15”或“A1:B3”
.如果 (取数组成员数 (分割文本) ＞ 1)
    cell1.赋值 (分割文本 [1], )
    cell2.赋值 (分割文本 [2], )
.否则
    cell1.赋值 (定位.内容, )
    cell2.赋值 (定位.内容, )
.如果结束
' 此处将纯数字文本按数字输入excel，excel中数字与文本的区别在于数字默认靠右对齐，文本默认靠左对齐。例如：“'1234”是文本，“1234”则转换为数字。
.如果 (是否全部为数值_Code (输入文本.内容))
    value.赋值 (到数值 (输入文本.内容), )
.否则
    value.赋值 (输入文本.内容, )
.如果结束
excel.获取 (“excel.application”)
books ＝ excel.读对象型属性 (“ActiveWorkbook”, )
sheets ＝ books.读对象型属性 (“Activesheet”, )
ranges ＝ sheets.读对象型属性 (“Range”, cell1, cell2)
ranges.对象型方法 (“Select”, )  ' select代表先选择单元格，再操作，能够实时定位当前活动单元格位置
' selection ＝ excel.读对象型属性 (“Selection”, )
' selection.写属性 (“FormulaR1C1”, value)  ' 输入数据方法一
' 或者ranges.写属性 (“FormulaR1C1”, value)’非活动输入
ranges.写属性 (“Value”, value)  ' 输入数据方法二
excel.清除 ()

excel对象操作.e (9.75 KB, 下载次数: 351)

2018-9-9 10:51 上传

点击文件名下载附件

oycs429

支持分享...........

ltt199

这个是写脚本吗？最近也在学，但是不是很懂

Logo黑星

ltt199 发表于 2018-9-9 11:38
**** 作者被禁止或删除 内容自动屏蔽 ****

对象应用

米仓老鼠

谢谢分享，学习一下。

zjattj

感谢楼主详细例子！

Ψ恋上金牛座

支持分享

1623863129

果然呢牛。。。。。。。。。。。。。。。

网络注册络员

支持五支持

Joedown

虽然看不懂，但是要支持