EXCEL模块二次开源

wxdx8320 · 发表于 2019-3-30 23:36:27

.版本 2

.子程序删除列, , 公开
.参数列号, 文本型, 可空, 如单列A，多列A:A
.参数工作表序号, 整数型, 可空
.局部变量对象, 对象

.如果真 (是否为空 (工作表序号))
工作表序号＝取当前活动工作表索引 ()
.如果真结束

对象＝ EXCEL.读对象型属性 (“Worksheets”, ).读对象型属性 (“Item”, 工作表序号)
.如果真 (取文本长度 (列号) ＜ 3)
列号＝到大写 (列号) ＋ “:” ＋到大写 (列号)
.如果真结束
对象.读对象型属性 (“Range”, 列号).对象型方法 (“Delete”, -4159)

请教楼主，要是想删除大于99行的行，如何怎么办啊？