我人生的第一份工作是在一家男裝公司做貨品管理,我所在的部門有4個人,1個主管3個職員,組織架構如下圖所示
貨品專員負責對接店鋪和日常的ERP系統操作,工作内容很簡單,基本就是電話聯絡店鋪,然後在系統上進行日常的進銷存操作,兩個人分别把公司所有的客戶按地理位置進行劃分,一個人管北區,一個人管南區,我就是其中之一。
數據專員每個星期一會把一周的數據導出來制作數據報表,分别有
1、店鋪同比環比報表
2、TOP排名
3、庫存結構
4、當季售罄率
所以說數據專員最忙的時候就是周一的上午的前兩個小時,8:30忙到10:30。然後從周一上午的10:31開始到周五的17:30開始瘋狂追劇......
至于主管在幹嘛我記不清了,也許是在謀劃戰略方向。
對了!我記起來了。這個主管當時對這個數據專員不是很滿意,就是主管想看什麼内容的數據報表,這個數據專員做出來總差點意思,這讓主管很郁悶,經常跑到數據專員的位置上跟她溝通,溝通到動情時數據專員就會鬧離職,然後主管就慌了,各種留,各種哄......我不知道為什麼會這樣,可能那個時候人才市場上招聘不到會操作Excel的家夥。
不騙你,我就是從那個時候萌發出學習Excel的想法。
我當時想,我們4個人的工作完全可以由兩個人甚至一個人來完成,如果自己掌握Excel,就能根據自己的需求随心所欲的制作出自己想看數據報表,并且把所有重複性、“客觀性”、工作交給Excel來完成,把用在這方面工作的時間壓縮到最低,然後其餘的時間就可以做一些“主觀性”的工作,對客戶的服務輸出,無論是業務方面還是情感維系、對公司營銷活動的建議、商品的庫存和銷售預警等等。
VBA學習最初的迷茫和開竅于是我開始學習Excel,各種查資料,各種求人,學習進度也很快。由于無知,那段時間每一天我都感覺自己自信心爆棚,感覺自己已經完全可以駕馭Excel了,直到我看到了一個VBA操作Excel的視頻,整個人傻掉了,我沒想到Excel還能這麼玩,在強烈好奇心的驅使下,我開始自學VBA,由于沒有任何代碼基礎,會計畢業的我,最開始的時候完全懵圈,看代碼感覺完全是看天書一樣,中途也斷斷續續放棄過幾次,想想不甘心又繼續撿起來學習,但始終處于沒開竅階段,沒有方向。
期間我零零散散的學會了一些VBA知識點,聲明變量,變量類型,FOR循環,IF語句。這些知識點如果隻是單個拿出來,用在具體的案例中我能搞明白,但是做不到融會貫通,也沒有把學會的知識點來解決工作中實際遇到的問題,因為懂的太少,沒碰到那種剛好用我現在僅掌握的VBA知識就能解決的問題。
但是我運氣不錯,那天是一個雙休日,我早上起床打開電腦,在一個VBA相關的論壇上看到一個人的求助,當我看到這個問題的時候突然感覺被雷擊中一樣,我感覺到我能解決這個問題,于是馬上開始編寫,一段簡單的代碼我編寫了兩個多小時,期間反複調試,于是人生中第一段實際解決問題的VBA出現了,雖然已經過去了好幾年但是那個情景卻曆曆在目。為了紀念,我一直把這段代碼保存在我的電腦裡,時間定格在2015-10-31 上午10:39
圖1
我編寫的第一段VBA代碼先來看一下這個問題,如下圖所示
圖2
圖片上的表格是查詢頁面,工作表名是“查詢”,這個工作簿還有中國、日本、韓國、德國、朝鮮、美國這幾個工作表
圖3
每一個國家名的工作表内容都有5名學生和對應科目的成績,如下圖所示,這個是中國工作表的内容
圖4
在查詢頁通過下拉菜單選擇中國,然後點擊成績查詢按鈕
圖5
獲得查詢結果,如果查詢的名字出現在查詢的國家工作表裡就會顯示對應成績,反之則顯示“/”表示查詢不到,因為查詢頁面裡隻有張三在中國工作表裡,所以可以查詢到張三。
圖6
中國工作表裡有“大大”這個名字(圖4),如果把查詢頁面的“李牛”換成“大大”再點擊查詢就能查詢到大大了
圖7
這就是代碼
Sub xx()
Dim rng As Worksheet, n%, i%
For Each rng In Worksheets
If rng.Name = Sheet1.Cells(1, 2) Then Exit For
Next rng
For n = 3 To 6
Dim h%
h = 0
For i = 2 To 5
If Sheet1.Cells(n, 1) = rng.Cells(i, 1) Then
rng.Range("b" & i & ":e" & i).Copy Sheet1.Range("b" & n)
Exit For
Else
h = h 1
If h = 4 Then Sheet1.Range("b" & n & ":e" & n) = "/"
End If
Next i
Next n
End Sub
雖然,我并不明白這個求助者發出的這個問題能解決他工作中的什麼問題,但是我要感謝他,是這個問題讓我開竅,讓我對學習VBA更加有信心。
之後我學習了更多的Excel函數和VBA知識,現在我完成了當初的想法,隻要是重複性的工作,我就用VBA解決,把用在這方面的工作壓縮到最低,原本幾個小時的事情,真的可以壓縮到幾十秒。我把更多的時間用在一些“主觀性”的事情上,不但工作輕松,效率還高,還有更多的時間去學習新的知識來更加完善自己的工作。
磨刀不誤砍柴工,學習雖然要花時間,但是學到了就是一勞永逸。以前有句話說的是活到老學到老,可是現在在職場中的現狀是學到老才能活到老,讓我們成為一個終身學習者吧。
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!