|
#2
jiazhefish2022-05-04 18:14
|
只有本站会员才能查看附件，请 登录
以下是百度的内容，没成功
程序代码：这样插入批注并设置字体：
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
不正确。请高手指点。
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
不正确。请高手指点。