| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1004 人关注过本帖
标题:VFP 导入Excel时如何导入批注内容?
只看楼主 加入收藏
jiazhefish
Rank: 2
等 级:论坛游民
帖 子:64
专家分:28
注 册:2011-9-6
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:2 
VFP 导入Excel时如何导入批注内容?
各位大神,我想整理Excel中的批注内容到dbf库中,请问如何实现啊?
ceshi.zip (12.8 KB)

以下是百度的内容,没成功
程序代码:
这样插入批注并设置字体:
p='你怎么会喜欢我'
qgq.ACTIVEWORKBOOK.SHEETS('全辖库存').CELLS(1,1).addcomment(p)
qgq.ACTIVEWORKBOOK.SHEETS('全辖库存').CELLS(1,1).comment.visible=.T. &&设置字体必须有这行。
qgq.ACTIVEWORKBOOK.SHEETS('全辖库存').CELLS(1,1).comment.shape.select
qgq.selection.Font.size=20
qgq.selection.Font.name="黑体"
qgq.selection.Font.bold=.t.
如何删除批注
qgq.range("A1").clearcomments
以上是正确的。

调整批注框的大小,我写成:
qgq.selection.shape.range.scaleheight=4.3
qgq.selection.shape.range.scalewidth=3.2
不正确。请高手指点。
如何引用批注,我写成:jjk=qgq.ACTIVEWORKBOOK.SHEETS('全辖库存').CELLS(1,1).comment.text.value
不正确。请高手指点。
搜索更多相关主题的帖子: 导入 selection 内容 Excel 库存 
2022-05-04 18:12
jiazhefish
Rank: 2
等 级:论坛游民
帖 子:64
专家分:28
注 册:2011-9-6
收藏
得分:0 
------解决方案--------------------
wait wind qgq.Worksheets('全辖库存').Range("f5").comment.text

也没成功
2022-05-04 18:14
schtg
Rank: 12Rank: 12Rank: 12
来 自:Usa
等 级:贵宾
威 望:67
帖 子:1730
专家分:3324
注 册:2012-2-29
收藏
得分:20 
回复 2楼 jiazhefish
我未测试,可以试一试:
jjk = ox.ACTIVEWORKBOOK.SHEETS('全辖库存').CELLS(1,1).comment.text

jjk = ox.ACTIVEWORKBOOK.SHEETS('全辖库存').Range("A1").comment.text
? jjk

*** 单元格 F5 中 没有批注吧

[此贴子已经被作者于2022-5-4 20:16编辑过]

2022-05-04 20:12
快速回复:VFP 导入Excel时如何导入批注内容?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.040147 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved