當前位置:才華齋>計算機>office辦公>

EXCEL公式的應用

office辦公 閱讀(1.88W)

篇一:員工花名冊EXCEL製作時間提醒公式

EXCEL公式的應用

試用期到期時間提醒

=IF(AND(A2-TODAY()<=10,a2-today()>0),"還有"&A2-TODAY()&"天到期","") 說明:1、在A2單元格(視具體表格而定, 替換A2)內輸入日期格式的試用期到期時間;

2、在B2(目標單元格)內輸入(黏貼)上述格式,按回車鍵,生成提醒天數;

3、單擊填充柄向下拖動,完成其它單元格的公式複製。

4、本格式提示時間約定為10天,具體需要,可視情況自我設定。

勞動合同到期時間提醒

=IF(AND(A2-TODAY()<=60,a2-today()>0),"還有"&A2-TODAY()&"天到期","") 說明:1、在A2單元格(視具體表格而定, 替換A2)內輸入日期格式的合同到期時間;

2、在B2(目標單元格)內輸入(黏貼)上述格式,按回車鍵,生成提醒天數;

3、單擊填充柄向下拖動,完成其它單元格的公式複製。

4、本格式提示時間約定為60天,具體需要,可視情況自我設定。

由身份證號碼自動生成年齡

=IF(LEN(A2)>15,YEAR(NOW())-MID(A2,7,4),YEAR(NOW())-(MID(A2,7,2)+1900))

說明:1、在A2單元格(視具體表格而定,替換A2)內輸入身份證號碼;

2、在B2(目標單元格)內輸入(黏貼)上述格式,按回車鍵,生成年齡;

3、單擊填充柄向下拖動,完成其它單元格的公式複製。

由身份證號碼自動生成性別

=IF($(A2)=0," ",IF(LEN($(A2))=18,IF(MOD(VALUE(MID($(A2),17,1)),2)=1,"男","女"),IF(MOD(VALUE(MID($(A2),15,1)),2)=1,"男","女")))

說明:1、在A2單元格(視具體表格而定,替換A2)內輸入身份證號碼;

2、在B2(目標單元格)內輸入(黏貼)上述格式,按回車鍵,生成工齡;

3、單擊填充柄向下拖動,完成其它單元格的公式複製。

由入職時間自動生成工齡

=IF(MONTH(NOW())>MONTH(A2),YEAR(NOW())-YEAR(A2),YEAR(NOW())-YEAR(A2)-1)&"年零

"&IF(MONTH(NOW())>MONTH(A2),MONTH(NOW())-MONTH(A2),MONTH(NOW())+12-MONTH(A2))&"個月"

說明:1、在A2單元格(視具體表格而定,替換A2)內輸入日期格式的入職時間;

2、在B2(目標單元格)內輸入(黏貼)上述格式,按回車鍵,生成工齡;

3、單擊填充柄向下拖動,完成其它單元格的公式複製。

篇二:excel公式

一、合同到期提醒

假如 A1單元格顯示簽訂合同時間 2005-11-05

B1單元格顯示合同到期時間 2007-10-31

當前時間由系統提取出來 假設當前日期為 2007-10-1

想讓C1單元格顯示: 在合同即將到期30天內提醒:"合同即將到期", 且每日提醒 最好彈出提醒對話方塊,點選確定 當日不再提醒,點選取消當日在一定時間內繼續提醒

=IF(ISERROR(DATEDIF(TODAY(),B2,"D")),"已過期",IF(DATEDIF(TODAY(),B2,"D")>30,"未到期",IF(DATEDIF(TODAY(),B2,"D")=30,"今天到期","差"&DATEDIF(TODAY(),B2,"D")&"天到期") 差多少天到期的合同 如何讓反應的文字以紅色字型體現出來,這樣好統計?

選中C列,格式>條件格式>公式>=AND(DATEDIF(TODAY(),B2,"D")<=30,datedif(today(),b2,"d")>0),再點選格式>在單元格格式對話方塊中選圖案>選紅色.確定。

二、新稅法下的.個稅計算公式

公式=ROUND(MAX((應發工資-3500)*{3,10,20,25,30,35,45}/100-{0,21,111,201,551,1101,2701}*5,0),2);其中速扣數的公倍數5也可以乘以到裡面。

三、年齡(歲數)和工齡的計算公式

公式=DATEDIF(I4,TODAY(),"y")&"年"&DATEDIF(I4,TODAY(),"ym")&"月"&DATEDIF(I4,TODAY(),"md")&"日";其中I4為資料來源。

四、平均年齡計算公式

公式=AVERAGE(TODAY()-H3:H24)/365;其中H3:H24為計算範圍;注:更新範圍時,單回車鍵不行,需要ctrl+shift+回車鍵!

五、資料查詢並定位

1、O35=(輸入查詢內容);

2、O36=IF(ISERROR(MATCH(O35,sheet1!C:C,0)),"",MATCH(O35,sheet1!C:C,0))。(意思為顯示的位置,其中C為資料列);

3、O37=HYPERLINK("#sheet1!C"&O36,IF(ISNUMBER(O36),"點選顯示","沒有找到"))。(意思是查詢結果

注:可以應用在從大量資料中查詢所需資料,當然你也可以通過Excel自帶的查詢工具(ctrl+f為快捷鍵

六、如何在Excel中插入Flash時鐘的

動態時鐘不是用函式運算、自動化功能製作出來的,這只是簡單的插入Flash文擋的功能而已,而且只要你有Flash檔案,任何人都可以輕鬆自行製作。

製作方法:

第1步 首先開啟一個空白Excel檔案,點選“檢視” → 然後點選【控制元件工具箱】,→點選“其他控制元件”。

第2步 然後再點選[Shockwave Flash Object]專案,表示要插入Flash物件。

第3步 接下來,滑鼠會變成一個小十字,此時可以在Excel編輯區中畫一個大小適中的方框,這個方框就是 用來顯示Flash時鐘的內容的。

第4步 畫好方框後,接著點選【屬性】,準備設定屬性。

第5步 出現「屬性」對話方塊後,將DeviceFont設定成False;將Eebedmovie設定成True;將Enabled設定成True;將Locked設定成True;將Loop設定成True;將Menu設定成False;並在“Movie”右側填入時鐘的地址與名稱。

第6步 退出設計模式,全部完成。

七、與身份證相關公式

1、身份證驗證

公式=IF(LEN(A2)=18,MID("10X98765432",MOD(SUMPRODUCT(MID(A2,ROW(INDIRECT("1:17")),

1)*2^(18-ROW(INDIRECT("1:17")))),11)+1,1)=RIGHT(A2),IF(LEN(C3)=15,ISNUMBER(--TEXT(19&MID(C3,7,6),"#-00-00"))));

2、提取性別

公式=CHOOSE(MOD(MID(A2,LEN(A2)/2+8,1),2)+1,"女","男");或

公式=IF(MOD(IF(LEN(A2)=15,MID(A2,15,1),MID(A2,17,1)),2)=1,"男","女")。

3、判斷生肖

公式=CHOOSE(MOD(MID(A2,LEN(A2)/2,2),12)+1,"鼠","牛","虎","兔","龍","蛇","馬","羊","猴","雞","狗","豬");

以上A2為身份證資料來源;

4、提取出生日期

公式=TEXT(RIGHT(19&MID(A2,7,LEN(A2)/2-1),8)," #-##-##");

5、提取日月

=TEXT(IF(LEN(A1)=18,MID(A1,11,4),IF(LEN(A1)=15,MID(A1,9,4),"證號位數不對")),"00月00日")

如果都是18位的證號,公式如下

=TEXT(MID(A1,11,4),"00月00日")

如果已經有提取好的出生年月日在B1單元格

公式為 =TEXT(B2,"M月D日")’

6、提取年齡(整歲)

公式=INT(DAYS360(TEXT(RIGHT(19&MID(A2,7,LEN(A2)/2-1),8),"#-##-##"),TODAY())/360);

7、判斷星座

公式=VLOOKUP(VALUE("1900-"&TEXT(MID(A2,LEN(A2)/2+2,4),"#-##")),{1,"摩羯座";21,"水瓶座";50,"雙魚座";81,"白羊座";112,"金牛座";143,"雙子座";174,"巨蟹座";205,"獅子座";236,"處女座";268,"天秤座";298,"天蠍座";328,"人馬座";357,"摩羯座"},2,TRUE);

8、15位轉換為18位

公式=IF(LEN(C2)=15,REPLACE(C2,7,,19)&MID("10X98765432",MOD(SUMPRODUCT(MID(REPLACE(C2,7,,19),ROW(INDIRECT("1:17")),1)*2^(18-ROW(INDIRECT("1:17")))),11)+1,1),C2);

八、選中單元格的行與列變顏色

1、條件格式裡用公式裡填,應用於=$1: $65536

公式=(ROW()=CELL("row")) + (COLUMN()=CELL("col"))

vba編輯器裡填(用ALT+F11調出):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Calculate

End Sub

顏色在格式裡自己調;

2、或者直接在 vba編輯器裡填:

Private Sub Worksheet_SelectionChange(ByVal Target As e) On Error Resume Next 4 g3 2 o& C2 h1 a. |1 t

te

iColor = Int(50 * Rnd() + 2)

With atConditions

te

xlExpression, , "TRUE"

(1)rIndex = iColor

End With

With atConditions

te

xlExpression, , "TRUE"

(1)rIndex = iColor

End With

End Sub

在應用“第八”的第二條後,發現檔案就不能再編輯,慎用之。