半小时教你成为excel高手-第5章
按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
例如：
在A1输入小写金额，则：
千万：B1=IF（A1》=10000000；MID（RIGHTB（A1*100；10）；1；1）；IF（A1》=1000000；〃￥〃；0））
百万：C1=IF（A1》=1000000；MID（RIGHTB（A1*100；9）；1；1）；IF（A1》=100000；〃￥〃；0））
十万：D1=IF（A1》=100000；MID（RIGHTB（A1*100；8）；1；1）；IF（A1》=10000；〃￥〃；0））
万：E1=IF（A1》=10000；MID（RIGHTB（A1*100；7）；1；1）；IF（A1》=1000；〃￥〃；0））
千：F1=IF（A1》=1000；MID（RIGHTB（A1*100；6）；1；1）；IF（A1》=100；〃￥〃；0））
百：G1=IF（A1》=100；MID（RIGHTB（A1*100；5）；1；1）；IF（A1》=10；〃￥〃；0））
十：H1=IF（A1》=10；MID（RIGHTB（A1*100；4）；1；1）；IF（A1》=1；〃￥〃；0））
元：I1=IF（A1》=1；MID（RIGHTB（A1*100；3）；1；1）；IF（A1》=0。1；〃￥〃；0））
角：J1=IF（A1》=0。1；MID（RIGHTB（A1*100；2）；1；1）；IF（A1》=0。01；〃￥〃；0））
分：K1=IF（A1》=0。01；RIGHTB（A1*100；1）；0）
网客
公式中最后一个0改为〃〃
如何编这个公式
Q：我想编的公式是： a/＇84 … （b×4）＇
其中a是一个数值，小于或等于84；b是包含字符C的单元格的个数；C是一个符号。
这个公式的关键是要统计出包含字符C的单元格的个数，可我不会。
A：dongmu
=a/（84…countif（b；〃=c〃）*4）
chwd
我试了一下，不能运行，我想是因为没有指定出现“c”的单元格的范围。比如说“c”
在D2…D30中随机出现，在上述公式中要先统计出出现“c”的单元格的个数。这个公式
如何做？
再一次感谢！
受dongmu朋友公式的启发，我做出了需要的公式
=a/（84…COUNTIF（D3：D30；〃c〃）*4）
skysea575 ：其中a是一个数值，小于或等于84；b是包含字符C的单元格的个数；C是一
个符号。
〃包含字符C〃在这里的意思不清楚。你的公式中只可以计算仅含有“C”字符的单元格
数。
可能你的想法是计算字符中凡是含有这个字或字母的词。如“文章”和“文字”中都有
一个“文”字，是否计算在内？
将文件保存为以某一单元格中的值为文件名的宏怎么写
A：lxxiu
假设你要以Sheet1的A1单元格中的值为文件名保存，则应用命令：
ActiveWorkbook。SaveCopyAs Str（Range（〃Sheet1！A1〃）） ＋ 〃。xls〃
IE中实现链接EXCEL表
Q：我想在IE中实现链接EXCEL表并打开后可填写数据，而且可以实现数据的远程保存
（在局域网内的数据共享更新），我的设想是在NT中上提供电子表格服务， 各位局域
网内用户在IE浏览器中共享修改数据，请问我该如何操作才能实现这一功能。我是初学
者，请尽量讲得详细一点。
A：老夏
mm。xls
桌面
**************************************************************
貼到？事本… 存z镠ome。htm〃＇桌面上… 設z楣蚕？ 。^域網路其他隨腦設捷徑連結
Home。htm
懂這三行字的結~＇有說明 是；？暗~惡？？
如何用excel求解联立方程：
Q：x…x（7/y）^z=68 x…x（20/y）^z=61 x…x（30/y）^z=38
到底有人会吗？不要只写四个字，规划求解，我想要具体的解法，
A：wenou
这是一个指数函数的联列方程。步骤如下
1、令X/Y=W 则有 X…（7W）^z=68 X…（20W）^Z=61 X…（30W）^Z=38
2、消去X
（20^Z…7^Z）W^Z=7 （30^Z…20^Z）W^Z=23
3、消去W
（30^Z…20^Z）/（20^Z…7^Z）=23/7
由此求得Z=3。542899 x=68。173955 y=781。81960
行高和列宽单位是什么？ 如何换算到毫米？
A：markxg
在帮助中：
“出现在“标准列宽”框中的数字是单元格中 0…9 号标准字体的平均数。”
单位应该不是毫米，可能和不同电脑的字体有关吧。
Q：Rowen
是这样：
行高/3=mm 列宽*2。97=mm
鱼之乐
实际上最终打印结果是以点阵为单位的；而且excel中还随着打印比例的变化而变化
如果想用宏写一个完全退出EXCEL的函数是什么？
Q：因为我想在关闭lock。frm窗口时就自动退出EXCEL，请问用宏写一个完全退出EXCEL的
函数是什么？多谢！
A：Application。quit
请问如何编写加载宏？
把带有VBA工程的工作簿保存为XLA文件即可成为加载宏。
请问如何在点击一个复选框后在后面的一个单元格内自动显示当前日期？
如果是单元格用〃=TODAY（）〃就可以了
如果是文本框在默认属性中设置或在复选框的CLICK中设置文本框的内容
EXCEL2000中视面管理器如何具体运用呀？
请问高手EXCEL2000中视面管理器如何具体运用呀？最好有例子和详细说明。明确的功
能。不然我还是不能深刻的理解他。
markxg
其实很简单呀，你把它想象成运动场上的一串照片（记录不同时点的场景），一张照片
记录一个场景，选择一张照片就把运动“拖”到照片上的时点。不同的是只是场景回
复，而值和格式不回复。
用VBA在自定义菜单中如何仿EXCEL的菜单做白色横线？
Q：我在做自定义菜单时，欲仿EXCEL菜单用横线分隔各菜单项目，用VBA如何才能做到
？
A：Rowen
那个东东也是一个部件；我想可以调用；不过没试过。
diyee
把它的显示内容中设置为〃…〃即可。
simen
1。此部件叫什么名字，在控件箱里有吗？
2。用“…”我也试过，用它时单击可以，但你要知道EXCEL自己的横线是不可以单击下去
的
kevin_168
object。BeginGroup = True
下面是我用到的代码：
Set mymenubar = mandBars。ActiveMenuBar
Set newmenu1 = mymenubarntrols。Add（Type：=msoControlPopup； _
Temporary：=True）
newmenu1。Caption = 〃文件制作（&M）〃
newmenu1。BeginGroup = True '这就是你要的白色横线
simen
你知道在窗体中也有这样的分隔线的如何实现呢？
kevin_168
这；我可没有试过；不过我做的时候使用一LABEL将其设为 能否在取消“运行宏”时并不
打开其它工作表！
Q：我看见有些模块（高手给的）能够在取消“运行宏”时并不打开其它工作表！不知
是何办法？ 但当你启动宏后，工作表才被打开！这种方法是什么？
A：Rowen
这些工作表预先都是隐藏的；必须用宏命令打开；所以取消宏的情况下是看不到的。可以
打开VBA编辑器；在工作表的属性窗口中将其Visible 设为xlSheetVisible
立体；看起来也够美观的；不妨一试。象版主所说的多查帮助文件；对你有帮助。
如何去掉单元格中间两个以上的空格？
Q：单元格A1中有“中 心 是”，如果用TRIM则变成“中 心 是”，我想将空
格全去掉，用什么办法，请指教！！
A：用SUBSTITUDE（）函数，多少空格都能去掉。如A1中有：中 心 是 则在B1中使用
=SUBSTITUTE（A1；〃 〃；〃〃）就可以了。注意：公式中的第一个“ ”中间要有一个空格，
而第二个“”中是无空格的。
打印表头？
Q：在Excel中如何实现一个表头打印在多页上？
打印表尾？
A：BY dongmu
请选择文件…页面设置…工作表…打印标题…顶端标题行，然后选择你要打印的行。
打印表尾？
通过Excel直接提供的功能应该是无法实现的，需要用vba编制才行。
提取性别（无论是15位还是18位）
=IF（LEN（A1）=15；IF（MOD（MID（A1；15；1）；2）=1；〃男〃；〃女
〃）；IF（MOD（MID（A1；17；1）；2）=1；〃男〃；〃女〃））
如果身份证号的输入已是15或18位，用公式
=IF（MOD（LEFT（RIGHT（A1；（LEN（A1）=18）＋1））；2）；〃男〃；〃女〃）
如何把这26个表格汇总求和成一个汇总表
A：
ACCESS
数据合并计算///来解决。
