开发者社区> 孤独的猫董> 正文
阿里云
为了无法计算的价值
打开APP
阿里云APP内打开

打开另一个WORD文档并从中复制数据

简介: 以下示例从另一个WORD文档,并从中复制数据到本地表中 Private Sub CommandButton1_Click()   Dim i As Integer   Dim f As Document   Set f=Application.
+关注继续查看

以下示例从另一个WORD文档,并从中复制数据到本地表中

Private Sub CommandButton1_Click()

  Dim i As Integer

  Dim f As Document

  Set f=Application.Documents.Open("************.doc")

  For i=2 to  f.Tables(7).Rows.Count

    Me.Tables(2).Cell(2+i,1).Range.Text=Mid(f.Tables(7).Cell(i,2).Range.Text,1,Len(f.Tables(7).Cell(i,2).Range.Text)-2)

  Next i

End Sub

版权声明:本文内容由阿里云实名注册用户自发贡献,版权归原作者所有,阿里云开发者社区不拥有其著作权,亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容,填写侵权投诉表单进行举报,一经查实,本社区将立刻删除涉嫌侵权内容。

相关文章
ML之LoR:基于LoR算法实现对非线性数据集点进行绘制决策边界
ML之LoR:基于LoR算法实现对非线性数据集点进行绘制决策边界
44 0
一群人花费了四年的时间以NASA的数据巨制“月球”
月亮是我们人类探测到的第一颗星球 有一群人却把它做成了是一个真正准确的1 / 2000万的月亮模型。一圈LED围绕这它,不断照亮月球的表面。 这个模型月亮是一个长达4年的项目,由奥斯卡莱和捻角羚在无数的原型和测试设计过程中进行。
4372 0
动态规划的楼层算法
这是一种常用的算法,本人摸索出一个规律: 就是 n层阶梯,每次最多m个台阶,一共有F(n) = F(n-1) + F(n-2)+ F(n-m)种走法,或者把上楼层想象为下楼!!!理论在这:http://www.
1014 0
742
文章
0
问答
文章排行榜
最热
最新
相关电子书
更多
低代码开发师(初级)实战教程
立即下载
阿里巴巴DevOps 最佳实践手册
立即下载
冬季实战营第三期:MySQL数据库进阶实战
立即下载