| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1563 人关注过本帖
标题:还是请教关于VFP操控EXCEL,下拉选项的问题
只看楼主 加入收藏
fanjinyu9108
Rank: 2
等 级:论坛游民
帖 子:694
专家分:20
注 册:2014-1-16
结帖率:88.52%
收藏
已结贴  问题点数:20 回复次数:9 
还是请教关于VFP操控EXCEL,下拉选项的问题
我有一个表,从VFP导出到EXCEL后,这个EXCEL表的某一列在编辑时,出现下拉选项,比如 优秀 一般 ,请问如何做到
搜索更多相关主题的帖子: 出现 VFP 下拉 选项 EXCEL 
2020-12-06 19:39
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:20 
可通过录制宏后进行研究一翻

只求每天有一丁点儿的进步就可以了
2020-12-07 12:32
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:0 
录取宏后进行了测试没成功。

但可以事先做好一个模板EXCEL文档,VF导出时复制粘贴到模板中,于是你打开来看就有了下拉选项了

只求每天有一丁点儿的进步就可以了
2020-12-08 13:07
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:0 
恭请坛中高手赐教

只求每天有一丁点儿的进步就可以了
2020-12-09 14:50
gs2536785678
Rank: 10Rank: 10Rank: 10
等 级:贵宾
威 望:45
帖 子:610
专家分:1784
注 册:2017-7-16
收藏
得分:0 
难了,这样难度的工作,估计没有人接招
2020-12-26 08:19
sostemp
Rank: 4
等 级:贵宾
威 望:10
帖 子:202
专家分:284
注 册:2009-6-2
收藏
得分:0 
应该是可以吧
2020-12-30 10:20
厨师王德榜
Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18
等 级:贵宾
威 望:199
帖 子:989
专家分:4966
注 册:2013-2-16
收藏
得分:0 
我记得是设置 单元格的数据有效性 这里,对吧 .
2020-12-30 10:47
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:0 
以下是引用厨师王德榜在2020-12-30 10:47:30的发言:

我记得是设置 单元格的数据有效性 这里,对吧 .


是的。手工做是在数据/有效性/序列 里设置。

现在难的是用VF的代码  恭请王大厨出手

只求每天有一丁点儿的进步就可以了
2020-12-30 13:01
厨师王德榜
Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18
等 级:贵宾
威 望:199
帖 子:989
专家分:4966
注 册:2013-2-16
收藏
得分:0 
Range("F5").Validation.Add 3, 1, 1, "=$A$2:$A$5"
在vfp中调用,可能需要用括号包裹起来:
Range("F5").Validation.Add(3, 1, 1, "=$A$2:$A$5")
完成后效果:
图片附件: 游客没有浏览图片的权限,请 登录注册
2020-12-30 17:37
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:0 
以下是引用厨师王德榜在2020-12-30 17:37:47的发言:

Range("F5").Validation.Add 3, 1, 1, "=$A$2:$A$5"
在vfp中调用,可能需要用括号包裹起来:
Range("F5").Validation.Add(3, 1, 1, "=$A$2:$A$5")
完成后效果:


     MyExcel.ActiveSheet.Range("F3").validation.add(3, 1, 1, "=sheet2!$A$2:$A$5")   &&& 测试成功

   换成

     MyExcel.ActiveSheet.Range("F3").validation.add(3, 1, 1, "=优秀,良好,合格,不合格")   &&& 测试 不 成功
 
  换成
 
  MyExcel.ActiveSheet.Range("F3").validation.add(3, 1, 1, "优秀,良好,合格,不合格")   &&& 测试成功
 
  非常感谢厨师王德榜的指导!!!

为什么括号里 要 3,1,1, 呢?

只求每天有一丁点儿的进步就可以了
2021-01-06 13:08
快速回复:还是请教关于VFP操控EXCEL,下拉选项的问题
数据加载中...
 
   



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

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