久久国产成人av_抖音国产毛片_a片网站免费观看_A片无码播放手机在线观看,色五月在线观看,亚洲精品m在线观看,女人自慰的免费网址,悠悠在线观看精品视频,一级日本片免费的,亚洲精品久,国产精品成人久久久久久久

分享

excel如何顯示農(nóng)歷?

 快樂男廚師 2017-12-26

通過EXCEL自身的函數(shù)等,,我們也能夠在一張工作表制作一個萬年歷,。

具體包括:1、表單控件3個(滾動條2,、按鈕1),,2,、條件格式3個(數(shù)據(jù)條,、公式規(guī)則),3,、數(shù)組函數(shù)1類(day,、weekday),4,、名稱1個,,5,、圖形對象1個,6,、VBA代碼及指定宏,,7、自定義格式與TEXT函數(shù),。

歲末年初,、還在等別人送臺歷嗎?求人不如求己,,用EXCEL自己也能搞,,而且能夠用一輩子。

下面這個圖就是制作的月歷,,我們將它分成ABCDE 5個區(qū)域來分析:

A區(qū):年份和月份,,可以隨時變化的,但不應(yīng)該在上面直接輸入,,年份是縱向排列的,,月份是根據(jù)小寫的數(shù)字1-12自動轉(zhuǎn)換為大寫的,還有一個向下的箭頭形狀,;

B區(qū):插入我們自己喜歡的圖片,;

C區(qū):表示星期的區(qū)域,可以直接輸入大寫的一到日,,但我們這里用公式來設(shè)定它,;

D區(qū):放置本月第一周的日期和同一周上月份的日期;

E區(qū):放置本月最后一周的日期和同一周下月份的日期,,因為各月的天數(shù)不同,,有可能本月最后一天位于倒數(shù)第二行;

下面,,我們就來一步一步地學(xué)起來:

1,、制作年份標簽。點擊EXCEL主界面“插入”選項卡內(nèi)“形狀”項,,在彈出的菜單“箭頭總匯”下點擊“五邊形”(圖二之1),,注意不要點擊“流程圖”下的“離頁連接符”(圖二之2)。

在工作表任意位置畫出五邊形,,松開鼠標,,五邊形周邊出現(xiàn)8個白色的定位空心小圓(圖二之3),用鼠標拖拉它們可以改變五邊形的大小,,在五邊形上移動鼠標直到光標變?yōu)樗南蛐〖^時,,可移動其位置。

點擊圖二之4和5選擇一個自己喜歡的樣式和五邊形內(nèi)文字的格式,。在公式編輯欄fx后面輸入“=D16”,,讓其中的文字跟隨單元格D16變化而變化,。點擊EXCEL主界面“開始”選項卡內(nèi)“字體”組內(nèi)有關(guān)項,可以改變文字的大小,,顏色等,。

點中圖二之6可順時針旋轉(zhuǎn)五邊形的方向。

2,、設(shè)置月份,。在單元格B7輸入公式“=MID(TEXT(E16,'[dbnum1]'),LEN(E16),LEN(E16))&'月'”,目的是將E16內(nèi)的1,、2,、3…11、12轉(zhuǎn)換為“一,、二,、三、一十一,、一十二”后加上“月”字,。其中“[dbnum1]”內(nèi)置格式是決定轉(zhuǎn)換的核心。

至此,,完成圖一中的A,。

3、插入圖形,。點擊EXCEL主界面“插入”選項卡內(nèi)“圖形”項,,選擇你電腦上的一張自己喜歡的圖形作為月歷的圖畫。在當(dāng)前排版布局下,,建議選擇橫版的照片,。

圖形插入后,同樣在其四周出現(xiàn)小圓形的定位點,,也改變其形狀尺寸,,拖移圖形的位置。點擊圖形時,,在EXCEL主界面出現(xiàn)“格式”菜單,,點擊“圖片樣式”組右下角的三角按鈕,選中“金屬圓角矩形”(圖二之7),。

至此,,完成圖一中的B。

4,、插入星期文字,。在單元格B8輸入公式“= TEXT(B9,'aaa')”,,將數(shù)字轉(zhuǎn)換成星期格式,,數(shù)字1-7依次對應(yīng)著星期日,、一、二至六,。公式核心是“aaa”,,而公式“= TEXT(B9,'dd')”是取兩位日期。將單元格B8公式向右拖拉至單元格H8,。

至此,,完成圖一中的C。

5,、設(shè)置名稱,。為下一步公式計算方便,點擊EXCEL主界面“公式”選項卡內(nèi)“定義的名稱”組內(nèi)的“定義名稱”項(圖三之1),,調(diào)出“新建名稱”對話框,,在其中的“名稱”輸入“Wedate”,在其中的“引用位置”輸入“={0,1,2,3,4,5,6} + {0;1;2;3;4;5}*7”,。

6,、插入日期。在第9-14行是用來存放日期的,,需要逐行設(shè)置,。選中單元格區(qū)域“B9:H9”,在公式編輯欄輸入“= Wedate+DATE($D$16,$E$16,1)-WEEKDAY(DATE($D$16,$E$16,1),2)+1”,,同 時按下“CTRL_SHIFT_ENTER”三鍵完成數(shù)組公式的輸入,。

用同樣的方法在單元格區(qū)域“B10:H10”、…單元格區(qū)域“B14:H14”逐一輸入其他5行的數(shù)組公式,,要注意將公式中的1依次改為8,、15、22,、19,、36。

8,、設(shè)置雙休日字色,。選中單元格區(qū)域“G9:G14”,設(shè)置字體顏色為綠色,,選中單元格區(qū)域“H9:H14”,,設(shè)置字體顏色為紅色。

9,、設(shè)置日期的條件格式,。為使得日期的顯示更符合人們的視覺習(xí)慣,將當(dāng)月日期黑色顯示,上月,、下月的日期顯示為灰色,,選中單元格區(qū)域“B9:H9”,點擊EXCEL主界面“開始”選項卡內(nèi)“樣式”組內(nèi)的“條件格式”項,,在彈出的菜單中點“數(shù)據(jù)條”下的“橙色數(shù)據(jù)條”(圖四之1,、2)。

點中圖四之3的“新建規(guī)則”,,彈出“新建格式規(guī)則”對話框,,在“選擇規(guī)則類型”內(nèi)選擇“使用公式確定要設(shè)置格式的單元格”,在“編輯規(guī)則說明”內(nèi)輸入“=DAY(B9)>8”,,將上月大于數(shù)字8的日期設(shè)置為指定的格式,,點擊圖四之5“格式”按鈕,在彈出的對話框內(nèi)點擊“顏色”右下角的下拉三角形按鈕,,,選擇圖四之6的主題顏色,。

至此,完成圖一中的D,。

用同樣的方法在單元格區(qū)域“B10:H10”,、…單元格區(qū)域“B14:H14”設(shè)置“橙色數(shù)據(jù)條”。

選中單元格區(qū)域“B13:H14”兩行,,新建規(guī)則的“規(guī)則說明”內(nèi)輸入“=AND(DAY(B13)>=1,DAY(B13)<>

至此,,完成圖一中的E。

看到這里,,你是是不是學(xué)得這節(jié)課程要結(jié)束了,?

然而,并沒有完,。因為,,這才是講了某一個月的月歷制作,還不具有通用性,,不能計算任意月份的月歷叫什么萬年歷呢,?

細心的同學(xué)也許已經(jīng)看出了我們前面提到單元格D16和E16了,年份在任意的年份,,月份只能在1-12之間輸入,,為了偷懶,不想動鍵盤輸入,,鼠標點點就出效果,,可以嗎?

來,,一起往下走…

我們點擊鼠標來改變相應(yīng)單元格的值這樣的動作叫做“驅(qū)動”,,點擊控件改變數(shù)值稱之為“控件驅(qū)動數(shù)值”,。

10、插入年份控件,。點擊EXCEL主界面“開發(fā)工具”選項卡內(nèi)“控件”組內(nèi)的“插入”項,,在彈出的菜單中點擊“表單控件”下的“數(shù)值調(diào)節(jié)鈕”,移動鼠標到單元格D16附近,,此時光標變?yōu)楹谏犹枺聪率髽水嫵鲆粔K矩形,,松開鼠標,,點擊“開發(fā)工具”選項卡內(nèi)“控件”組內(nèi)的“屬性”項(圖五之1-4),彈出“設(shè)置控件格式”對話框,。

在圖六之1的“控制”選項卡內(nèi)依次輸入“2018”(單元格D16的值),、“1950”(可以計算的最小的年份,我們這里設(shè)為1950年,,也可以往前推,,如1940等)、“2099”(可以計算的最大的年份,,我們這里設(shè)為2099年,,也可以往后推,如2150等),、“=$D$16”(被驅(qū)動的單元格),。

<--我的excel界面上,沒有“開發(fā)工具”選項卡,,怎么辦,?看文章最后啊>

11、插入月份控件,。按照與步驟10相同的方法,,插入一個新的“數(shù)值調(diào)節(jié)鈕”,其控制選項卡設(shè)置如圖六之2所示,。

12,、添加直接打印按鈕。點擊EXCEL主界面“開發(fā)工具”選項卡內(nèi)“控件”組內(nèi)的“插入”項,,在彈出的菜單中點擊“表單控件”下的“按鈕”,,移動鼠標到單元格H16附近(圖七之1、2),,此時光標變?yōu)楹谏犹?,按下鼠標畫出一塊矩形,松開鼠標,,彈出“指定宏”對話框,,注意“宏名”中“按鈕6”數(shù)字6(圖七之3),在你電腦上可能是其他數(shù)字,點擊“新建”按鈕(圖七之4),,在隨后出現(xiàn)的VBE窗口中輸入以下代碼(圖七之5和圖八之1,、2),點擊“視圖”(圖七之6)按鈕返回EXCEL,,輸入“立馬打印月歷”改變按鈕上的文字,。

Sub 按鈕6_Click() ‘立馬打印月歷

ActiveSheet.PageSetup.PrintArea = '$A$1:$I$15'

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False

Range('F6').Select

End Sub

Sub ohPreview() ‘打印預(yù)覽

ActiveSheet.PageSetup.PrintArea = '$A$1:$I$15'

ActiveWindow.SelectedSheets.PrintPreview True

Range('F6').Select

End Sub

Sub setBorders() ‘設(shè)置雙線框線

Range('A1:I15').Select

If Selection.Borders(xlEdgeLeft).LineStyle = xlNone Then

Selection.Borders(xlEdgeLeft).LineStyle = xlDouble

Selection.Borders(xlEdgeTop).LineStyle = xlDouble

Selection.Borders(xlEdgeBottom).LineStyle = xlDouble

Selection.Borders(xlEdgeRight).LineStyle = xlDouble

Else

Selection.Borders(xlEdgeLeft).LineStyle = xlNone

Selection.Borders(xlEdgeTop).LineStyle = xlNone

Selection.Borders(xlEdgeBottom).LineStyle = xlNone

Selection.Borders(xlEdgeRight).LineStyle = xlNone

End If

Range('F6').Select

End Sub

13、添加月歷邊框,。按照與步驟12相同的方法,,插入“復(fù)選框”(圖八之3、4),,右鍵此控件(圖八之5),,在隨后出現(xiàn)的浮動菜單上點擊“指定宏”(圖八之6),在彈出的“指定宏”對話框內(nèi)選擇“'2018年月歷.xlsm'!setBorders”,。

實現(xiàn)的功能為:點擊一次復(fù)選框,,將會為單元格區(qū)域“A1:I15”添加雙線框,再點一次復(fù)選框,,將支取單元格區(qū)域“A1:I15”的雙線框,。

14、為圖形模擬顯示功能,。右鍵第3步插入的圖形,,在隨后出現(xiàn)的浮動菜單上點擊“指定宏”,在彈出的“指定宏”對話框內(nèi)選擇“'2018年月歷.xlsm'!ohPreview”,。

實現(xiàn)的功能為:點擊插入的圖形,,打印預(yù)覽圖一萬年歷。

更多財稅職場學(xué)習(xí)資訊,,關(guān)注秀財網(wǎng)

    本站是提供個人知識管理的網(wǎng)絡(luò)存儲空間,,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點,。請注意甄別內(nèi)容中的聯(lián)系方式,、誘導(dǎo)購買等信息,謹防詐騙,。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,,請點擊一鍵舉報。
    轉(zhuǎn)藏 分享 獻花(0

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多