如题，求程序简化！

11 |

2 | 2012-12-27 11:29:46 | 显示全部楼层 |阅读模式

Private Sub UserForm_Initialize()
Dim RNom As Integer
RNom = ActiveCell.Rowdim i as integer for i=1 to 16 Shapes("TextBox" &i).Text=Cells(RNom, i+3).ValuenextEnd Sub...

使用道具举报

千问 | 2012-12-27 11:29:46 | 显示全部楼层

Private Sub UserForm_Initialize()Dim RNom As Integer, i As Integer
RNom = ActiveCell.Row
For i = 1 To 16
Me.Controls("TextBox" & i).Text = Cells(RNom, i + 3).V...

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

加好友
发消息

回复楼主返回列表

问答

热门排行

1 哪个专业的高手来帮看下我这个本本的显卡能升级么？
2 QQ飞车怎么双喷？
3 求人教新目标英语八、九年级英语听力mp3（课文、单词、听力材料）？请发[email protected]，谢谢各位大侠！
4 口袋妖怪队伍求改：班吉拉，地龙，美纳斯，豪火猴，胡地，耿鬼
5 已知cosa=-1/5 当a属于（π，2π），用反余弦形式表示a。
6 造价员前景怎么样？
7 各位好心人，请问在太原哪儿可以租到电动车？麻烦各位告告？
8 《童年》内容简介？
9 月影传说如何招募物事
10 下列关于销售毛利率的说法错误的是：
11 求助奔腾电磁炉开机出现E5
12 在火车上干乘务，头屑很多，感觉特别影响形象，有什么好的洗发水推荐一下吧！
13 英语口语问题，内容是关于分享或者保守自己秘密的选着的。求高手解答，满意加分。
14 一键还原备份的时候出现蓝屏，（准确的说是上面半截儿蓝屏下面半截儿黑屏），请教高手们怎么解决？
15 你好，我想请教一个问题，小孩上户口需要育龄妇女信息卡吗？
16 好完的网游
17 想知道: 双鸭山市从双鸭山市到青山国家森林公园怎么坐公交
18 太行山大峡谷一日游该怎样安排？该去哪些好的景点？
19 dnf琳恩的第二法杖如何获得，元素用好不好？
20 黑执事的短信和来电铃声，请发到我邮箱。
21 怎样才能做好一个车间主任？
22 唐山美洋达摄影基地在哪
23 就要高考了这几天应该干什么
24 额头和眉心中间开始长痘了怎么办(⊙o⊙)哦!还有脸颊上有一颗奇怪的痘，是黑色的哎
25 你好，为什么拔表线后故障灯会亮？
26 你好，你是考研武大的么~~~能加下我QQ么？我有事情请教你下~~~拜托拜托~~~~
27 幻想三国志4外传:三界秘闻录中安装乱码工具总报错怎么解决
28 我们每天上班时间是上午上2个小时晚上上3.5个小时一天总共5.5咯小时，全职一个月休息两天合理吗？
29 章子怡事件是真是假？
30 矩阵的倒数怎么求
31 长白山野山参求鉴定价格大约多少？
32 杭州到四川绵阳有没有火车的？怎么去比较方便？票价大概多少、如果有，汽车也介绍下
33 吃饭后怎样保证牙齿卫生
34 类似于藏妖的、晨曦，完全控制，的小说有吗，或者很温馨的那种BL小说啊可发 [email protected] 很针对性，
35 高分悬赏淘宝充值平台问题设置价格问题高分悬赏
36 网购从杭州到中山多少天到，今天发货
37 丽中王 2012年夏季新款波西米亚风格长裙 OL 连衣裙哪里有卖的?
38 我刚买的单反在沈阳丢了，问一下沈阳的朋友，他们小偷一般在沈阳哪销赃呀，我想碰碰运气。。
39 如何能够让英语学习变成一件很快乐的事的英文对话
40 我婆婆去年过世了，我今年装修家能不能装
41 求怪物猎人p3通关存档要打出所有龙的最好是用弓的组团所需 [email protected] 谢谢
42 苹果笔记本macbook pro 怎么连接电脑。手动怎么连接，求方法，最好加图
43 能给我也发一个用友软件考试版吗[email protected]
44 inelli骑行服是什么牌子中文怎么说品牌怎么样
45 请问火炮瞄准测距仪和旁轴相机上的那个联动测距是一个道理吗？
46 建设工程质量监督站和安全生产执法大队，哪个职位好一点，轻松一点？
47 keynote 后退在哪里
48 QQ临时会话旁边有乱七八糟的东西怎么办啊？
49 谁有东奥注会张智凤的会计mp3或者视频，要2012的，谢谢，好的话有加分[email protected]，谢谢。2012的
50 为什么动感地带的卡放在联想A520的手机里不能上网?
51 怎么样才能减肥呀
52 频率和概率一样吗
53 将一个物体制成另一物体,质量为什么不变
54 李维斯的501钱包多少钱专柜卖多少钱
55 西游记中几个人分别
56 好朋友朋友跟我说，“我看不出你在乎我”，该怎么办？
57 树干的作用到底是什么
58 思迅超市收银系统如何做库存
59 耍什么游戏？
60 为什么所有的人都得不到真爱？
61 experise翻译成中文是什么意思????
62 ipad3购买时间，激活时间查询。序列号：DYVHNRR3DVD1　请高手帮帮忙，谢谢拉
63 体操怎么编排？
64 英文歌开头嘀嘀嘀嘀（新闻联播倒计时开始的那个声音差不多。）女声的。嘀嘀嘀嘀然后就是恰恰什么什么。。
65 我从枝江到三峡机场，怎么坐车价格比较划算？大概多少钱？
66 河南西华县西夏镇有几个叫苏亚的
67 如何过日语一级
68 燕山12年中考一模语文词语题(第2题)为什么是A，不是B：选判断词语意思都正确的
69 wax bar 酒吧怎么样
70 求美少女梦工厂4完璧版的最小镜像
71 CAD的申请号是：PQD0 4TLJ JHP2 TYDX 85DR V13H 97AX它的激活码是多少啊？
72 没有cet4成绩的同学在对应的单元格中显示无成绩应如何修改公式
73 腾讯认证空间怎么申请？
74 cf瞬Z，求教学，求教学视频
75 预防火灾班干部该做什么
76 求求各位大侠，从蒋村公交中心站怎么坐公交去杭州市流浪儿童救助保护中心？
77 问题事件名称: BEX问题事件名称: BEX 应用程序名: Explorer.EXE 求解答
78 工伤认定后，用工单位搬家找不到了，怎么办
79 普通邮包查询PA17323774813 这个包裹目前到什么位置了？？？
80 从脚气到头屑，烦死我啦！！！！
81 你喜欢轩辕剑吗
82 中考户籍：女儿明年考高中，我想将户口从浦东迁入黄浦区，请问会影响吗？有没有规定户籍一定要二年的规定呢
83 民生路到闵行区沪闵路联农路179号怎么走？
84 求郑多燕减肥操中文版全集，最好高清，[email protected]
85 玉米宽窄行种植技术在山东适合吗
86 It will die if you take a fish out of water哪里错了，怎么改？
87 我是高中生认识一女生十年多现在很喜欢她但她喜欢别人还让我帮她追那个男生我应怎么做
88 我的头发很干燥毛糙，马上放暑假了就想剃光头，剃了光头长的头发还是一样的干燥毛躁吗？
89 我用ITouch4下载一个赛车游戏，但他说要APP IOE4.3操作系统《我直接在ITOUCH上下的》不知怎么更新求解
90 对我们来说，做好每一件事是有必要的。It's very necessary ( )
91 请帮我看看这个解法对不对（初一数学），谢谢啦~
92 课文”匆匆“告诉我们_______________________________________ .........................
93 腾翼c30的尾灯不是全封闭的吗
94 我要给电脑价格内存条，什么牌子的内存条比较好啊？求高手解答
95 第九大陆 c9
96 给我说几个没用得没密保的QQ号
97 中山大学研究生院是否招体育生
98 三生三世枕上书全本邮箱是[email protected]
99 秦皇岛哪个药店有卖心脑宁胶囊的
100 脚伤了求助~~~