很多人喜歡學(xué)PPT，不喜歡學(xué)Excel，因為Excel與表格數(shù)據(jù)打交道，太枯燥，太無聊，遠不如做好一張PPT有成就感。

其實，咱們“表哥”也是有可愛有趣的一面的，可以結(jié)合最基本的單元格、公式實現(xiàn)一些逆天的效果。

下面就給大家分享幾個，還是那句話，看得再多，也不如自己動手操作啊。

1、制作滾動字幕

前段時間歡樂PPT有一個教程，是用PPT制作電影結(jié)束時的滾動字幕，看著PPT如此強大的動畫功能，姐姐就想，Excel能不能也實現(xiàn)這個功能呢？于是做了一次嘗試，效果貌似還不錯。

步驟一：添加按鈕

開發(fā)工具-插入-按鈕，分別修改按鈕名稱，“開始”和“結(jié)束”。

添加按鈕

步驟2：輸入VBA代碼

按Alt+F11鍵，調(diào)出代碼輸入窗口，插入模塊，粘貼代碼，將開始按鈕指定宏“開始”，結(jié)束按鈕指定宏“結(jié)束”，即可實現(xiàn)單元格內(nèi)容循環(huán)滾動。（要保存為啟動宏的工作表）

原始代碼：

Dim ABC As Byte
Sub 開始()
ABC = 1
Range("A1") = "我是歡樂PPT罌粟姐姐 ? ? ? ? ? ? ? ? ? ? ?" ? ?
Do
For j = 1 To 1000
DoEvents
Next j
Range("A1") = Right(Range("A1"), 1) & Left(Range("A1"), Len(Range("A1")) - 1)
Loop Until ABC = 0
End Sub
Sub 結(jié)束()
ABC = 0
End Sub

最終效果

2、制作黑白相間的國際象棋棋盤

最近看網(wǎng)劇《美人為餡》，有這樣一個情節(jié)：女主人公蘇眠和她師兄進行心理學(xué)水平高低的較量，而這番較量就放在了一個很大的黑白國際象棋棋盤上。

黑白棋盤

這黑白格子咋那么像Excel表格呢？于是罌粟姐姐靈機一動，干脆就用Excel做一個黑白棋盤吧。

第一步：

打開Excel,，設(shè)置等寬的行高和列寬。

Excel默認行高所使用單位為磅，列寬使用單位為1/10英寸，所以設(shè)置等寬的行高和列寬需要進行單位換算，這里可以有一種簡單的方法，就是保證行高和列寬的像素一致即可。

調(diào)整行高和列寬

第二步：

在“條件格式”-“新建規(guī)則”-“使用公式確定要設(shè)置格式的單元格”-“為符合此公式的值設(shè)置格式”對話框中輸入公式：

=or(and(mod(row(),2)=1,mod(column(),2)=1),and(mod(row(),2)=0,mod(column(),2)=0))

公式解讀：行為奇數(shù)同時列為奇數(shù)，或者行為偶數(shù)同時列為偶數(shù)時，單元格填充黑色。

mod(row(),2)=1判斷單元格所在的行是否為奇數(shù)，mod(column(),2)=1判斷單元格所在的列是否為奇數(shù)；

mod(row(),2)=0判斷單元格所在的行是否為偶數(shù)，mod(column(),2)=0判斷單元格所在的列是否為偶數(shù)；

or函數(shù)：滿足其中任意一個條件即可。

操作過程

3、制作條形碼

商品條形碼相當(dāng)于每個商品的身份證，而且還是國際通用的。Excel也可以實現(xiàn)條形碼的制作哦。

第一步：

點擊工具欄，開發(fā)工具-插入→其他控件，在【其他控件】對話框內(nèi)找到"Microsoft BarCode Control 16.0"控件，單擊，確定，通過拖動鼠標，生成初始條形碼。

初始條形碼

第二步：

單擊右鍵，Microsoft BarCode Control 16.0-屬性，在彈出的屬性對話框中選擇一種樣式，例如【7-code-128】，單擊確定。

修改樣式

第三步：

輸入商品編碼，例如A1處輸入“138138138138902”。單擊原始條形碼右鍵，選擇【屬性】，在彈出的【屬性】對話框中的【Linkecell】欄中輸入A1，關(guān)閉屬性對話框，完成條形碼制作。

完成條形碼

4、制作動態(tài)生日提醒

經(jīng)常忘記父母、兄弟姐妹、閨蜜、好朋友的生日，怎么辦？作為人事部門負責(zé)人經(jīng)常忘記員工的生日，怎么辦？作為公司業(yè)務(wù)員或者公共關(guān)系專員經(jīng)常忘記重要客戶的生日，怎么辦？

沒事，Excel可以非常容易解決這個問題。

第一步：新建Excel表格，輸入個人基本信息

個人信息表

第二步：7天內(nèi)過生日做出相應(yīng)的“提醒”

公式=IF(DATEDIF(B2-7,TODAY(),"YD")<=7,"提醒","")

DATEDIF(start_date,end_date,unit)，Start_date 為起始日期，End_date 為結(jié)束日期，Unit 為所需信息的返回類型，其中，“YD”為start_date 與 end_date 日期中天數(shù)的差。

當(dāng)個人生日減去7天后與系統(tǒng)當(dāng)前的日期進行運算，兩者相差小于等于7天即為將過生日的個人。

每次打開Excel表格，會自動更新。

生日計算

其實這些都是Excel的簡單應(yīng)用，等以后姐姐再給大家分享一些其他的趣味應(yīng)用，比如小游戲，比如手繪，當(dāng)然，這些都是次要的，目前最重要的就是熟練掌握Excel，從此告別加班。

今天的教程就到這里啦。希望大家能有收獲。