明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 5165|回复: 2

求教,在lisp里改写EXCELVBA对齐语句怎么老出错??

[复制链接]
发表于 2011-11-29 14:36:26 | 显示全部楼层 |阅读模式
VBA语句为:
    Range("D30:I38").Select
    With Selection
        .HorizontalAlignment = xlCenter
    End With

对应lisp语句写成
(vlax-put-property  range1 'HorizontalAlignment  “xlCenter ”) ,这句总是出错,是不是“xlCenter ”这个值只在vba里有意义,在lisp里应该改写一下啊?
其range1为一块单元格区域,应该是正确的,因为以下语句可正确执行。

(vlax-put-property   range1 'RowHeight  30 )
(vlax-put-property  (vlax-get-property range1 'Font) 'Size  14 )
发表于 2011-12-7 09:03:40 | 显示全部楼层
"xlCenter ”改成数值-4108试试
 楼主| 发表于 2011-12-10 17:03:28 | 显示全部楼层
snddd2000 发表于 2011-12-7 09:03
"xlCenter ”改成数值-4108试试

非常感谢。
通过(vlax-get-property  range1 'HorizontalAlignment )  已经试出了几种对齐的取值。那几个常量在lisp里意义。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-7-23 12:14 , Processed in 0.178159 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表