按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
2。用―…‖ 我也试过，用它时单击可以，但你要知道EXCEL 自己的横线是不可以单击下去的
kevin_168 object。BeginGroup = True 下 面 是 我 用 到 的 代 码 ： Set mymenubar =
mandBars。ActiveMenuBar Set newmenu1 =
mymenubar。Controls。Add（Type：=msoControlPopup； _ Temporary：=True） newmenu1。Caption =
〃文件制作 （&M）〃 newmenu1。BeginGroup = True '这就是你要的白色横线 simen 你知道在窗体
中也有这样的分隔线的如何实现呢？ kevin_168 这；我可没有试过；不过我做的时候使用一
LABEL将其设为 能否在取消―运行宏‖时并不打开其它工作表！ Q：我看见有些模块（高手给的）
能够在取消―运行宏‖时并不打开其它工作表！不知是何办法？ 但当你启动宏后，工作表才被
打开！这种方法是什么？ A：Rowen 这些工作表预先都是隐藏的；必须用宏命令打开；所以取消
宏的情况下是看不到的。可以打开VBA编辑器；在
CLXXIV
…………………………………………………………Page 175……………………………………………………………
Excel_word_ppt_使用技巧大全（完全版）
工作表的属性窗口中将其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 数据……合并计算///来解决。 鱼之乐 看来有很多朋友有这个方面的需
求，说明这是个共性问题，于是我利用access＋excel做了一个汇总查询模板，如果您需要可来
mail我发给你 0710@963 excelhelp 假設匯總的工作表叫Sheet1，而存放資料的工作表叫
Sheet2； Sheet3； 。。。； Sheet27，你可以這樣設置公式，把各工作表A1 的數值加起來：
=SUM（Sheet2：Sheet27！A1） 要注意的是，Sheet1不能在Sheet2和Sheet27中間，Excel不會管工
作表的名字，只會把Sheet2和Sheet27中間的＊所有＊工作表中相關的儲存格（哪怕中間有一
個工作表叫Sheet99）加起來。 葡萄 excelhelp的方案是正确的 1、在汇总表单元格内选择― Σ‖
2、选择需要叠加的第一个工作表
CLXXV
…………………………………………………………Page 176……………………………………………………………
Excel_word_ppt_使用技巧大全（完全版）
3、按住shift同时用鼠标选择需要叠加的最后一个工作表 4、选择需要叠加的单元格 5、Enter
实现验证先进先出法； Q： 我做了一个验证先进先出法的表格；但想不出简洁的公式；请各位帮
我 改 进 以 下 公 式 ********************************************************
=IF（B3》；；；》》確定 D。
繪 圖 層 作 個 美 美 的 圖 當 按 鈕 》》 右 鍵 》》 指 定 宏 》》 選 Macro1》》 確 定
********************************************************** 還是三層式結構 按鈕當
操控介面
CLXXVI
…………………………………………………………Page 177……………………………………………………………
Excel_word_ppt_使用技巧大全（完全版）
步驟A；步驟B；是中間層元件；負責轉換 Execl 中繁简互换 Q ： 有EXCEL2000 中有没有像
WORD2000中的繁简互换功能一样的东东呀？在这里谢过了。 A： Rowen XP 中可以；我曾用过；
后来删了。 需安装〃微软拼音输入法 3。0〃；并启用〃高级语言服务〃。 工具…》语音 中有选项的。
能否象打支票软件那样输入一串数字它自动给拆分成单个数字？ Q： 如我输入123456。52它自
动给拆成￥1 2 3 4 5 6 5 2 的形式并且随我输入的长度改变而改变？ A： Chiu 我所知函数
不多，我是这样做的，如有更方便的方法，请指点 例如： 在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改为〃〃 如下方法是否能够达
到所要求的： 在A1输入小写金额，则B1为所要求的 B1=WIDECHAR （A1*100） 将单字节字符转
换为双字节字符 或 B1=WIDECHAR（TEXT（A1*100；〃￥#〃））
CLXXVII
…………………………………………………………Page 178……………………………………………………………
Excel_word_ppt_使用技巧大全（完全版）
officeXP提供了这样的服务 office2002中提供了繁简互换功能，可以到以下网址下载，
officeXP 的 所 有 程 序 都 可 以 用 http：//office。microsoft。/offi 。。。