|
10、用Excel繪制函數(shù)圖像 函數(shù)圖像能直觀地反映函數(shù)的性質(zhì),用手工方法來(lái)繪制函數(shù)圖像效果不太好,而用Excel繪制函數(shù)圖像非常簡(jiǎn)便,所作圖像非常標(biāo)準(zhǔn)、漂亮,具體方法如下:
A、首先打開電子表格的*作窗口,然后用鼠標(biāo)選擇菜單欄中的“新建”命令,這時(shí)屏幕上會(huì)出現(xiàn)一個(gè)空白的電子表格;
B、然后在A列的A1格輸入“X=”,表明這是自變量,再在A列的A2及以后的格內(nèi)逐次從小到大輸入自變量的各個(gè)值;實(shí)際輸入的時(shí)候,通常應(yīng)用等差數(shù)列輸入法,先輸入前三個(gè)值,定出自變量中數(shù)與數(shù)的距離,然后點(diǎn)擊A2格,按住鼠標(biāo)拖到A4格選中這三項(xiàng),使這三項(xiàng)變成一個(gè)黑色矩形,再用鼠標(biāo)指向這黑色矩形的右下角的小方塊,當(dāng)光標(biāo)變成“+”后,按住鼠標(biāo)拖動(dòng)光標(biāo)到適當(dāng)?shù)奈恢?,就完成自變量的輸入?
C、接著在B列的B1格輸入函數(shù)式y(tǒng)=f(x)的一般函數(shù)表達(dá)式,如y=1/x;也可在點(diǎn)擊工具欄上的函數(shù)圖標(biāo)“fx”后,在出現(xiàn)的不同函數(shù)列表的選項(xiàng)中選擇需要的一種;輸入結(jié)束后,點(diǎn)擊函數(shù)輸入對(duì)話框旁的勾號(hào),B2格內(nèi)馬上得出了計(jì)算的結(jié)果。這時(shí),再選中B2格,讓光標(biāo)指向B2矩形右下角的方框,當(dāng)光標(biāo)變成“+”時(shí)按住光標(biāo)沿B列拖動(dòng)到適當(dāng)?shù)奈恢眉赐瓿珊瘮?shù)值的計(jì)算。注意一定要把該函數(shù)中自變量x的位置輸入前面A列自變量的絕對(duì)位置A2格,這樣下面計(jì)算的時(shí)候才會(huì)對(duì)不同的自變量進(jìn)行計(jì)算;
D、最后點(diǎn)擊工具欄上的“圖表向?qū)?#8221;圖標(biāo),在出現(xiàn)的各種圖表格式圖標(biāo)中選擇“X,Y散點(diǎn)圖”,然后在出現(xiàn)的“X,Y散點(diǎn)圖”類型中選擇“無(wú)數(shù)據(jù)點(diǎn)平滑線散點(diǎn)圖”;這時(shí),可按住鼠標(biāo)察看即將繪好的函數(shù)圖像。另外,對(duì)于自變量?jī)H為正值的函數(shù),也可用“圖表向?qū)?#8221;中的“折線圖”格式繪制。 在Excel中自動(dòng)推測(cè)出生年月日及性別的技巧
大家都知道,身份證號(hào)碼已經(jīng)包含了每個(gè)人的出生年月日及性別等方面的信息(對(duì)于老式的15位身份證而言,7-12位即個(gè)人的出生年月日,而最后一位奇數(shù)或偶數(shù)則分別表示男性或女性。如某人的身份證號(hào)碼為420400700101001,它的7-12位為700101,這就表示該人是1970年元月1日出生的,身份證的最后一位為奇數(shù)1,這就表示該人為男性;對(duì)于新式的18位身份證而言,7-14位代表個(gè)人的出身年月日,而倒數(shù)第二位的奇數(shù)或偶數(shù)則分別表示男性或女性)。根據(jù)身份證號(hào)碼的這些排列規(guī)律,結(jié)合Excel的有關(guān)函數(shù),我們就能實(shí)現(xiàn)利用身份證號(hào)碼自動(dòng)輸入出生年月日及性別等信息的目的,減輕日常輸入的工作量。
Excel中提供了一個(gè)名為MID的函數(shù),其作用就是返回文本串中從指定位置開始特定數(shù)目的字符,該數(shù)目由用戶指定(另有一個(gè)名為MIDB的函數(shù),其作用與MID完全一樣,不過(guò)MID僅適用于單字節(jié)文字,而MIDB函數(shù)則可用于漢字等雙字節(jié)字符),利用該功能我們就能從身份證號(hào)碼中分別取出個(gè)人的出生年份、月份及日期,然后再加以適當(dāng)?shù)暮喜⑻幚砑纯傻贸鰝€(gè)人的出生年月日信息。
提示:MID函數(shù)的格式為MID(text,start_num,num_chars)或MIDB(text,start_num,num_bytes),其中Text是包含要提取字符的文本串;Start_num是文本中要提取的第一個(gè)字符的位置(文本中第一個(gè)字符的start_num為1,第二個(gè)為2……以此類推);至于Num_chars則是指定希望MID從文本中返回字符的個(gè)數(shù)。 假定某單位人員管理希望通過(guò)身份證號(hào)碼自動(dòng)得出員工的出生年月日及性別,現(xiàn)以此為例,將有關(guān)步驟向廣大用戶作一簡(jiǎn)要介紹:
1. 選中整個(gè)B列,然后執(zhí)行“格式”菜單中的“單元格”命令,打開“單元格格式”窗口。
2. 選擇“數(shù)字”選項(xiàng)卡。
3. 在“分類”欄中選擇“文本”選項(xiàng),然后單擊“確定”按鈕,關(guān)閉“單元格格式”窗口,將所有包含有身份證號(hào)碼的單元格設(shè)置為文本格式。 4.將光標(biāo)移至C3單元格中,然后輸入“="19"&MID(B3,7,2)&"年"&MID(B3,9,2)&"月"&MID(B3,11,2)&"日"”內(nèi)容。其中MID(B3,7,2)就是從身份證號(hào)碼的第7位開始取2位數(shù),得出該員工的出生年份,MID(B3,9,2)就是得出該員工的出生月份,而MID(B3,11,2)則是該員工的出生日期,這些信息再加上年、月、日等文字就會(huì)組成該員工的準(zhǔn)確出生年月日“1970年1月1日”。
5. 接下來(lái)我們應(yīng)將光標(biāo)移至D3單元格中,然后輸入“=IF(MID(B3,15,1)/2=TRUNC(MID(B3,15,1)/2),"女","男")”。這就表示取身份證號(hào)碼的第15位數(shù),若能被2整除,這表明該員工為女性,否則為男性。
6. 最后我們只需利用自動(dòng)填充功能對(duì)其他各個(gè)員工的出生年月日、性別進(jìn)行填充即可。
上面都是以15位身份證為例進(jìn)行介紹的,18位身份證的*作方法與此類似,廣大用戶若使用的是18位身份證,只需對(duì)有關(guān)函數(shù)的取值位置進(jìn)行適當(dāng)調(diào)整即可(如將“="19"&MID(B3,7,2)&"年"&MID(B3,9,2)&"月"&MID(B3,11,2)&"日"”修改為“=MID(B3,7,4)&"年"&MID(B3,11,2)&"月"&MID(B3,13,2)&"日"”)。
這樣就實(shí)現(xiàn)了由Excel自動(dòng)填充員工出生年月日、性別的功能,從而極大地減輕了用戶錄入數(shù)據(jù)時(shí)的工作量,有興趣的讀者不妨一試。 在EXCEL中增加自動(dòng)填充序列 中文EXCEL97作為一種功能強(qiáng)大、技術(shù)先進(jìn)的電子表格軟件,給我們的辦公帶來(lái)了極大方便。
在EXCEL中提供了自動(dòng)填充功能,我們?cè)谑褂脮r(shí),可以通過(guò)拖動(dòng)“填充柄”來(lái)完成數(shù)據(jù)的自動(dòng)填充。例如要輸入甲、乙、丙、丁……,可以先在指定單元格輸入甲,然后將鼠標(biāo)移至單元格的右下角的小方塊處,直至出現(xiàn)“+”字,按住鼠標(biāo)左鍵,向下(右)拖動(dòng)至目的單元格,然后松開即完成了自動(dòng)填充??墒怯袝r(shí)我們會(huì)發(fā)現(xiàn)有一些數(shù)據(jù)序列不能自動(dòng)填充,例如車間一、車間二、車間三等,填充方法有兩種:
第一種:?jiǎn)螕?#8220;菜單”欄上的“工具”,選“選項(xiàng)”→“自定義序列”,這時(shí)就可以在“輸入序列”欄輸入要定義的序列。需要注意的是每輸入完成一項(xiàng)就要回車一次,表示一項(xiàng)已經(jīng)輸入完畢,全部輸入完成以后單擊“添加”→“確定”,這樣我們自定義的序列就可以使用了。
第二種:首先把你要添加的序列輸入到一片相臨的單元格內(nèi),例如要定義一個(gè)序列:車間一、車間二、車間三,把這三項(xiàng)分別輸入到單元H1:H3,單擊“工具”→“選項(xiàng)”→“自定義序列”→“導(dǎo)入”,在“導(dǎo)入序列所在的單元格”所指的對(duì)話框中輸入H1:H3,單擊“導(dǎo)入”→“添加”→“確定”,這樣新序列就產(chǎn)生了。
定義的序列如果不再使用,還可刪除,方法是:?jiǎn)螕?#8220;工具”→“選項(xiàng)”→“自定義序列”,在“自定義序列”框中,單擊要?jiǎng)h除的序列,再單擊“刪除”→“確定”。 發(fā)掘Execl XP合并拆分技巧本人在用Excel XP管理教職工檔案時(shí),經(jīng)常遇到合并或拆分單元格數(shù)據(jù)的情況,經(jīng)過(guò)一段時(shí)間的使用后摸索出了一套自己的“合并與拆分”理論,供同行們參考。
所謂合并數(shù)據(jù)是指將兩列中的數(shù)據(jù)合并到一列中,拆分?jǐn)?shù)據(jù)是指將一列中的數(shù)據(jù)拆分到兩列中,圖1為“畢業(yè)院校”和“專業(yè)”兩列的拆分及合并的效果圖。
合并數(shù)據(jù)
要將“畢業(yè)院校”和“專業(yè)”兩列中數(shù)據(jù)合并為“畢業(yè)院校及專業(yè)”,有“真”、“假”兩種合并方法,所謂真合并就是將兩列數(shù)據(jù)真正合并到一列中,而假合并表面上看是合并為一列了,實(shí)際數(shù)據(jù)還是存在于兩列中,具體*作跟我一起來(lái)看看吧。
1、真合并 如果將一列中的數(shù)據(jù)通過(guò)再輸入合并到另一列中,那不是我們希望看到的解決辦法,快捷而準(zhǔn)確的*作方法是:
(1)將需要合并的“畢業(yè)院校”和“專業(yè)”兩列數(shù)據(jù)通過(guò)“剪切”、“粘貼”移動(dòng)到一個(gè)新工作表中,如命名為“合并”工作表。
(2)在“合并”工作表中將XLS文件另存為TXT文件,單擊“文件→另存為”,保存類型選擇“文本文件(制表符分隔)”,單擊[保存]按鈕后根據(jù)提示連續(xù)單擊兩次[確定]按鈕即可。
(3)在Execl中單擊[打開]按鈕,重新打開TXT文件,在“文本導(dǎo)入向?qū)?#8594;步驟之1”中采用默認(rèn)設(shè)置,單擊[下一步]按鈕,在“步驟之2”分隔符號(hào)中,去掉“Tab鍵”前復(fù)選框的選擇,單擊[完成]按鈕,這時(shí)兩列中數(shù)據(jù)合并到一列中。
(4)將合并后的數(shù)據(jù)再通過(guò)“剪切”、“粘貼”*作移動(dòng)到原工作表的原位置處,合并*作完成。
提示:合并后的數(shù)據(jù)在原來(lái)兩列數(shù)據(jù)(如畢業(yè)院校和專業(yè))之間會(huì)有一個(gè)空格,而有時(shí)根據(jù)實(shí)際需要去掉或加寬空格,可采取如下措施:
方法一:對(duì)TXT文件進(jìn)行編輯 XLS文件中列與列之間數(shù)據(jù)轉(zhuǎn)換為TXT文件后是以制表符分隔的,此時(shí)合并后的數(shù)據(jù)在原來(lái)兩列數(shù)據(jù)之間會(huì)有一個(gè)空格,改變TXT文件中兩列之間距離(即改變空格的大小),對(duì)應(yīng)的XLS文件中原兩列數(shù)據(jù)之間的距離也會(huì)隨之發(fā)生改變,若TXT文件中兩列數(shù)據(jù)之間距離增大或減小為零,則合并的XLS文件中兩列數(shù)據(jù)之間距離也會(huì)隨之增大或減小為零。如果你要將兩列數(shù)據(jù)無(wú)縫合并,建議應(yīng)用下面兩種方法。 方法二:利用函數(shù)ConcateName ConcateName函數(shù)可以實(shí)現(xiàn)將幾個(gè)文本字符串合并為一個(gè)文本字符串,語(yǔ)法為:ConcateName (text1,text2, ……),text1, text2, ……為1到30個(gè)將要合并成單個(gè)文本項(xiàng)的文本項(xiàng),這些文本項(xiàng)可以為文本字符串、數(shù)字或?qū)蝹€(gè)單元格的引用,如圖2所示。 圖2
方法三:利用“&”運(yùn)算符 利用“&”運(yùn)算符也可將幾個(gè)文本字符串合并為一個(gè)文本字符串,“&”運(yùn)算方式同“+”、“-”等運(yùn)算方式一樣,如圖2所示。
2、假合并 我們也來(lái)一個(gè)“瞞天過(guò)海”吧,呵呵,在對(duì)單元格設(shè)置邊框時(shí),利用工具欄中的“外部框線”將兩個(gè)單元格框在一起,這樣兩個(gè)單元格中數(shù)據(jù)就在一個(gè)表格中了,打印出來(lái)后保證不留一點(diǎn)“作假”痕跡。此招對(duì)付較少單元格效果不錯(cuò),要應(yīng)付大量的單元格,奉勸你還是來(lái)點(diǎn)“真”的吧!否則夠你忙的了。
拆分?jǐn)?shù)據(jù) 合并方法掌握了,拆分也不難,拆分的方法與前面介紹的合并方法相似,先將XLS文件另存為TXT文件,再對(duì)TXT文件進(jìn)行編輯,將需要拆分的數(shù)據(jù)用“Tab”鍵或空格分開,然后再用Excel重新打開編輯后的TXT文件,這樣原來(lái)在一起的數(shù)據(jù)就被拆分開了。
處理含有大量信息的表格時(shí),以上合并與拆分的方法很有效,有興趣的朋友可以試一試。]]ExcelHome精華版整理(2003年11月14日)By 徒然客從身份證號(hào)碼中提取性別Q:A1單元格中是15位的身份證號(hào)碼,要在B1中顯示性別(這里忽略15位和18位身份證號(hào)碼的判別) B1=if(mod(right(A1,1),2)>0,"male","female") 請(qǐng)問(wèn)這個(gè)公式有無(wú)問(wèn)題,我試過(guò)沒發(fā)現(xiàn)問(wèn)題。但在某個(gè)網(wǎng)站看到作者所用的是如下公式: B1=if(mid(A1,15,1)/2=trunc(mid(A1,15,1)/2),"female","male")A:leaf 道理都是一樣的,不過(guò)你的公式比那個(gè)公式優(yōu)質(zhì)提取性別(無(wú)論是15位還是18位)=IF(LEN(A1)=15,IF(MOD(MID(A1,15,1),2)=1,"男","女"),IF(MOD(MID(A1,17,1),2)=1,"男","女"如果身份證號(hào)的輸入已是15或18位,用公式=IF(MOD(LEFT(RIGHT(A1,(LEN(A1)=18)+1)),2),"男","女"xls--->exe可以么?A:Kevin 如果只是簡(jiǎn)單的轉(zhuǎn)換成EXE,當(dāng)然可以。 如果你指的是脫離Excel也可以運(yùn)行,好像沒聽說(shuō)過(guò)可以。 當(dāng)然,通過(guò)DDE,是可以不運(yùn)行Excel但調(diào)用它的所有功能的,但前提仍然是你的計(jì)算機(jī)上已經(jīng)安裝了Excel列的跳躍求和Q:若有20列(只有一行),需沒間隔3列求和,該公式如何做? 前面行跳躍求和的公式不管用。A:roof 假設(shè)a1至t1為數(shù)據(jù)(共有20列),在任意單元格中輸入公式:=SUM(IF(MOD(TRANSPOSE(ROW(1:20)),3)=0,(a1:t1)) 按ctrl+shift+enter結(jié)束即可求出每隔三行之和。 跳行設(shè)置:如有12行,需每隔3行求和=SUM(IF(MOD((ROW(1:12)),3)=0,(A1:A12))) 能否象打支票軟件那樣輸入一串?dāng)?shù)字它自動(dòng)給拆分成單個(gè)數(shù)字?Q:如我輸入123456.52它自動(dòng)給拆成¥1 2 3 4 5 6 5 2 的形式并且隨我輸入的長(zhǎng)度改變而改變?A:Chiu 我所知函數(shù)不多,我是這樣做的,如有更方便的方法,請(qǐng)指點(diǎn) 例如: 在A1輸入小寫金額,則: 千萬(wàn):B1=IF(A1>=10000000,MID(RIGHTB(A1*100,10),1,1),IF(A1>=1000000,"¥",0)) 百萬(wàn):C1=IF(A1>=1000000,MID(RIGHTB(A1*100,9),1,1),IF(A1>=100000,"¥",0)) 十萬(wàn):D1=IF(A1>=100000,MID(RIGHTB(A1*100,8),1,1),IF(A1>=10000,"¥",0)) 萬(wàn):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) 網(wǎng)客 公式中最后一個(gè)0改為""如何編這個(gè)公式Q:我想編的公式是: a/[84 - (b×4)] 其中a是一個(gè)數(shù)值,小于或等于84;b是包含字符C的單元格的個(gè)數(shù);C是一個(gè)符號(hào)。 這個(gè)公式的關(guān)鍵是要統(tǒng)計(jì)出包含字符C的單元格的個(gè)數(shù),可我不會(huì)。 A:dongmu =a/(84-countif(b,"=c")*4)chwd我試了一下,不能運(yùn)行,我想是因?yàn)闆]有指定出現(xiàn)“c”的單元格的范圍。比如說(shuō)“c”在D2-D30中隨機(jī)出現(xiàn),在上述公式中要先統(tǒng)計(jì)出出現(xiàn)“c”的單元格的個(gè)數(shù)。這個(gè)公式如何做? 再一次感謝! 受dongmu朋友公式的啟發(fā),我做出了需要的公式 =a/(84-COUNTIF(D3 30,"c")*4) skysea575 :其中a是一個(gè)數(shù)值,小于或等于84;b是包含字符C的單元格的個(gè)數(shù);C是一個(gè)符號(hào)。"包含字符C"在這里的意思不清楚。你的公式中只可以計(jì)算僅含有“C”字符的單元格數(shù)??赡苣愕南敕ㄊ怯?jì)算字符中凡是含有這個(gè)字或字母的詞。如“文章”和“文字”中都有一個(gè)“文”字,是否計(jì)算在內(nèi)?將文件保存為以某一單元格中的值為文件名的宏怎么寫A:lxxiu 假設(shè)你要以Sheet1的A1單元格中的值為文件名保存,則應(yīng)用命令: ActiveWorkbook.SaveCopyAs Str(Range("Sheet1!A1")) + ".xls"IE中實(shí)現(xiàn)鏈接EXCEL表Q:我想在IE中實(shí)現(xiàn)鏈接EXCEL表并打開后可填寫數(shù)據(jù),而且可以實(shí)現(xiàn)數(shù)據(jù)的遠(yuǎn)程保存(在局域網(wǎng)內(nèi)的數(shù)據(jù)共享更新),我的設(shè)想是在NT中上提供電子表格服務(wù), 各位局域網(wǎng)內(nèi)用戶在IE瀏覽器中共享修改數(shù)據(jù),請(qǐng)問(wèn)我該如何*作才能實(shí)現(xiàn)這一功能。我是初學(xué)者,請(qǐng)盡量講得詳細(xì)一點(diǎn)。A:老夏 <a href="C:\mm.xls" target="x"> mm.xls</a> <a href="" target="x">桌面</a> <iframe width=780 height=400></iframe> ************************************************************** 貼到計(jì)事本- 存為Home.htm擺桌面上- 設(shè)為共享- 區(qū)域網(wǎng)路其他電腦設(shè)捷徑連結(jié)Home.htm 懂這三行字的結(jié)構(gòu),即可寫出網(wǎng)頁(yè)資料庫(kù)系統(tǒng) 其中每個(gè)字都是[物件名稱] 檔案多了改用<Frame>這個(gè)元件 要設(shè)幾個(gè)框隨便您 EXCEL中求兩陳列的對(duì)應(yīng)元素乘積之和Q:即有簡(jiǎn)結(jié)一點(diǎn)的公式求如:a1*b1+a2*b2+b3*b3...的和.應(yīng)有一函數(shù)XXXX(A1:A3,B1:B3)或XXXX(A1:B3)A:roof 在B4中輸入公式"=SUM(A1:A3*B1:B3)",按CTRL+SHIFT+ENTER結(jié)束. dongmu =SUMPRODUCT(A1:A10,B1:B10)求助日期轉(zhuǎn)換星期的問(wèn)題Q:工作中須將表格中大量的日期同時(shí)轉(zhuǎn)換為中英文的星期幾 請(qǐng)問(wèn)如何處理英文的星期轉(zhuǎn)換,謝謝!A:Rowen 1.用公式:=text(weekday(xx),"ddd") 2.用VBA,weekday(),然后自定義轉(zhuǎn)換序列 3.用"拼寫檢查",自定義一級(jí)轉(zhuǎn)換序列 4....dongmu 轉(zhuǎn)成英文: =TEXT(WEEKDAY(A1),"dddd") 轉(zhuǎn)成中文: =TEXT(WEEKDAY(A1),"aaaa")研究彩票,從統(tǒng)計(jì)入手Q:我有一個(gè)VBA編程的問(wèn)題向你請(qǐng)教。麻煩你幫助編一個(gè)。我一定厚謝。 有一個(gè)數(shù)組列在EXCEL中如: 01 02 03 04 05 06 07 和01 04 12 19 25 26 32 02 08 15 16 18 24 28 01 02 07 09 12 15 22 09 15 17 20 22 29 32 比較,如果有相同的數(shù)就在第八位記一個(gè)數(shù)。如 01 04 12 19 25 26 32 2 02 08 15 16 18 24 28 1 01 02 07 09 12 15 22 2 09 15 17 20 22 29 32 0 這個(gè)數(shù)列有幾千組,只要求比較出有幾位相同就行。 我們主要研究彩票,從統(tǒng)計(jì)入手。如果你有興趣我會(huì)告訴你最好的方法。急盼。 A:roof 把“01 02 03 04 05 06 07 ”放在表格的第一行,“01 04 12 19 25 26 32 2”放第二行。 把以下公式貼到第二行第八個(gè)單元格“A9”中,按F2,再按CTRL+SHIFT+ENTER. =COUNT(MATCH(A2:G2,$A$1:$G$1,0))如何自動(dòng)設(shè)置頁(yè)尾線條?Q:各位大蝦:菜鳥DD有一難題請(qǐng)教, 我的工作表通常都很長(zhǎng),偏偏我這人以特愛美,所以會(huì)將表格的外框線和框內(nèi)線條設(shè)置為不同格式,但在打印時(shí)卻無(wú)法將每一頁(yè)的底部外框線自動(dòng)設(shè)為和其他三條邊線一致,每次都必須手工設(shè)置(那可是幾十頁(yè)哦?。?,而且如果換一臺(tái)打印機(jī)的話就會(huì)前功盡棄,不知哪位大俠可指教一兩招,好讓DD我終生受用,不勝感激!A:roof 打印文件前試試運(yùn)行以下的代碼。打印后關(guān)閉文件時(shí)不要存盤,否則下次要把格式改回來(lái)就痛苦了。(當(dāng)然你也可以另寫代碼來(lái)恢復(fù)原來(lái)的格式): Sub detectbreak() mycolumn = Range("A1").CurrentRegion.Columns.Count Set myrange = Range("A1").CurrentRegion For Each mycell In myrange Set myrow = mycell.EntireRow If myrow.PageBreak = xlNone Then GoTo Nex Else Set arow = Range(Cells(myrow.Offset(-1).Row, 1), Cells(myrow.Offset(-1).Row, mycolumn)) With arow.Borders(xlEdgeBottom) .LineStyle = xlDouble '把這一行改成自己喜歡的表線 .Weight = xlThick .ColorIndex = xlAutomatic End With End If Nex: Next mycell End Sub求工齡A:老夏=DATEDIF(B2,TODAY(),"y") =DATEDIF(B2,TODAY(),"ym") =DATEDIF(B2,TODAY(),"md") =DATEDIF(B2,TODAY(),"y")&"年"&DATEDIF(B2,TODAY(),"ym")&"月"&DATEDIF(B2,TODAY(),"md")&"日" ******************************************************** DATEDIF() Excel 2000 可以找到說(shuō)明 Excel 97 沒有說(shuō)明 是個(gè)暗槓函數(shù)如何用excel求解聯(lián)立方程: Q:x-x(7/y)^z=68 x-x(20/y)^z=61 x-x(30/y)^z=38 到底有人會(huì)嗎?不要只寫四個(gè)字,規(guī)劃求解,我想要具體的解法,A:wenou 這是一個(gè)指數(shù)函數(shù)的聯(lián)列方程。步驟如下
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 在幫助中: “出現(xiàn)在“標(biāo)準(zhǔn)列寬”框中的數(shù)字是單元格中 0-9 號(hào)標(biāo)準(zhǔn)字體的平均數(shù)。” 單位應(yīng)該不是毫米,可能和不同電腦的字體有關(guān)吧。 Q:Rowen是這樣: 行高/3=mm 列寬*2.97=mm魚之樂(lè) 實(shí)際上最終打印結(jié)果是以點(diǎn)陣為單位的,而且excel中還隨著打印比例的變化而變化如果想用宏寫一個(gè)完全退出EXCEL的函數(shù)是什么?Q:因?yàn)槲蚁朐陉P(guān)閉lock.frm窗口時(shí)就自動(dòng)退出EXCEL,請(qǐng)問(wèn)用宏寫一個(gè)完全退出EXCEL的函數(shù)是什么?多謝!A:Application.quit請(qǐng)問(wèn)如何編寫加載宏?把帶有VBA工程的工作簿保存為XLA文件即可成為加載宏。請(qǐng)問(wèn)如何在點(diǎn)擊一個(gè)復(fù)選框后在后面的一個(gè)單元格內(nèi)自動(dòng)顯示當(dāng)前日期?如果是單元格用"=TODAY()"就可以了 如果是文本框在默認(rèn)屬性中設(shè)置或在復(fù)選框的CLICK中設(shè)置文本框的內(nèi)容 EXCEL2000中視面管理器如何具體運(yùn)用呀?請(qǐng)問(wèn)高手EXCEL2000中視面管理器如何具體運(yùn)用呀?最好有例子和詳細(xì)說(shuō)明。明確的功能。不然我還是不能深刻的理解他。markxg 其實(shí)很簡(jiǎn)單呀,你把它想象成運(yùn)動(dòng)場(chǎng)上的一串照片(記錄不同時(shí)點(diǎn)的場(chǎng)景),一張照片記錄一個(gè)場(chǎng)景,選擇一張照片就把運(yùn)動(dòng)“拖”到照片上的時(shí)點(diǎn)。不同的是只是場(chǎng)景回復(fù),而值和格式不回復(fù)。用VBA在自定義菜單中如何仿EXCEL的菜單做白色橫線?Q:我在做自定義菜單時(shí),欲仿EXCEL菜單用橫線分隔各菜單項(xiàng)目,用VBA如何才能做到? A:Rowen 那個(gè)東東也是一個(gè)部件,我想可以調(diào)用,不過(guò)沒試過(guò). diyee 把它的顯示內(nèi)容中設(shè)置為"-"即可。simen 1.此部件叫什么名字,在控件箱里有嗎? 2.用“-”我也試過(guò),用它時(shí)單擊可以,但你要知道EXCEL自己的橫線是不可以單擊下去的 kevin_168 object.BeginGroup = True 下面是我用到的代碼: Set mymenubar = CommandBars.ActiveMenuBar Set newmenu1 = mymenubar.Controls.Add(Type:=msoControlPopup, _ Temporary:=True) newmenu1.Caption = "文件制作(&M)" newmenu1.BeginGroup = True '這就是你要的白色橫線 simen 你知道在窗體中也有這樣的分隔線的如何實(shí)現(xiàn)呢?kevin_168 這,我可沒有試過(guò),不過(guò)我做的時(shí)候使用一LABEL將其設(shè)為 能否在取消“運(yùn)行宏”時(shí)并不打開其它工作表!Q:我看見有些模塊(高手給的)能夠在取消“運(yùn)行宏”時(shí)并不打開其它工作表!不知是何辦法? 但當(dāng)你啟動(dòng)宏后,工作表才被打開!這種方法是什么? A:Rowen 這些工作表預(yù)先都是隱藏的,必須用宏命令打開,所以取消宏的情況下是看不到的.可以打開VBA編輯器,在工作表的屬性窗口中將其Visible 設(shè)為xlSheetVisible立體,看起來(lái)也夠美觀的,不妨一試.象版主所說(shuō)的多查幫助文件,對(duì)你有幫助. 如何去掉單元格中間兩個(gè)以上的空格?Q:?jiǎn)卧馎1中有“中 心 是”,如果用TRIM則變成“中 心 是”,我想將空格全去掉,用什么辦法,請(qǐng)指教??!A:用SUBSTITUDE()函數(shù),多少空格都能去掉。如A1中有:中 心 是 則在B1中使用=SUBSTITUTE(A1," ","")就可以了。注意:公式中的第一個(gè)“ ”中間要有一個(gè)空格,而第二個(gè)“”中是無(wú)空格的。 打印表頭?Q:在Excel中如何實(shí)現(xiàn)一個(gè)表頭打印在多頁(yè)上?打印表尾?A:BY dongmu請(qǐng)選擇文件-頁(yè)面設(shè)置-工作表-打印標(biāo)題-頂端標(biāo)題行,然后選擇你要打印的行。打印表尾?通過(guò)Excel直接提供的功能應(yīng)該是無(wú)法實(shí)現(xiàn)的,需要用vba編制才行。
|