淘寶商家可以使用哪些工具去統(tǒng)計(jì)店鋪數(shù)據(jù),提高效率?
朝憶家墻飾樓主|2020-08-25|11:39|發(fā)布在分類 / 店鋪管理|閱讀:9235
朝憶家墻飾樓主|2020-08-25|11:39|發(fā)布在分類 / 店鋪管理|閱讀:9235
三、用VBA提取數(shù)據(jù)庫數(shù)據(jù)用VAB實(shí)現(xiàn)日報(bào)所需數(shù)據(jù)的提取1,開發(fā)工具Visual Basic(打開VBA)2,鼠標(biāo)右擊日報(bào)插入模塊3,寫代碼(數(shù)據(jù)庫的原文件一定要和日報(bào)放在一起代碼才能運(yùn)行)Sub 每日數(shù)據(jù)提取()聲明變量類型Dim AdoConn As New ADODB.Connection 定義一個(gè)變量AdoConn,用來鏈接數(shù)據(jù)庫,以及關(guān)閉數(shù)據(jù)庫Dim D1 As DateDim D2 As DateDim N As IntegerDim MyData As StringDim strSQL1 As StringDim strSQL2 As StringDim strSQL3 As StringDim strSQL4 As StringInputBox函數(shù)打開輸入對話框,輸入日期,并賦值給D1D1 = InputBox("請輸入需要提取的日期,比如:2016-9-4", "提取日期")D2 = D1 + 1定位第3列,第一個(gè)空單元格的行數(shù),并賦值給NN = ActiveSheet.Range("C1").End(xlDown).Row + 1MyData = ThisWorkbook.Path "\ribao.accdb" 數(shù)據(jù)庫文件和日報(bào)在一個(gè)路徑建立數(shù)據(jù)褲鏈接,并打開指定路徑的數(shù)據(jù)庫With AdoConn.Provider = "Microsoft.ACE.OLEDB.12.0".Open MyDataEnd With根據(jù)我們的實(shí)際要求,編寫拉取數(shù)據(jù)SQL語句strSQL1 = "SELECT count(用戶ID) FROM 用戶明細(xì) WHERE 注冊日期< " D2 " AND 注冊日期 >= " D1 " "strSQL2 = "SELECT count(用戶ID) FROM (SELECT DISTINCT 用戶ID FROM 訂單明細(xì) WHERE 訂購日期< " D2 " AND 訂購日期 >= " D1 " )"strSQL3 = "SELECT count(訂單編號) FROM 訂單明細(xì) WHERE 訂購日期< " D2 " AND 訂購日期 >= " D1 " "strSQL4 = "SELECT sum(訂購金額) FROM 訂單明細(xì) WHERE 訂購日期< " D2 " AND 訂購日期 >= " D1 " "從數(shù)據(jù)庫中拉取數(shù)據(jù),并將數(shù)據(jù)寫入到Excel工作表中ActiveSheet.Cells(N, 3).CopyFromRecordset AdoConn.execute(strSQL1)ActiveSheet.Cells(N, 4).CopyFromRecordset AdoConn.execute(strSQL2)ActiveSheet.Cells(N, 5).CopyFromRecordset AdoConn.execute(strSQL3)ActiveSheet.Cells(N, 6).CopyFromRecordset AdoConn.execute(strSQL4)End Sub4,因?yàn)榇a里面設(shè)計(jì)到一個(gè)包,所以我們需要導(dǎo)入一個(gè)包4,鼠標(biāo)右鍵點(diǎn)擊控件設(shè)置控件格式5,到數(shù)據(jù)源數(shù)據(jù)源區(qū)域選中2016/9/1按Ctrl+Shift+(下)6,單元格鏈接G5(控件前面一個(gè)單元格就行)確定7,點(diǎn)擊控件選擇一個(gè)日期8,在表的左邊的第一行標(biāo)上自己想要的數(shù)據(jù)標(biāo)題,然后選中標(biāo)題下的4行5列公式插入函數(shù)9,OFFSET確定10,Reference數(shù)據(jù)源(同理算出其他數(shù)據(jù)的環(huán)比)22,和之前第13步一樣,右擊鼠標(biāo)設(shè)置單元格格式百分比小數(shù)位數(shù)2確定23,累計(jì)用戶:=數(shù)據(jù)源當(dāng)天的累計(jì)用戶數(shù)(不按這個(gè)步驟來可能會出錯(cuò))選中數(shù)據(jù)插入推薦的圖表(和上一步一樣插入柱形圖就行了)17,把4個(gè)數(shù)據(jù)都做一個(gè)自己想要的圖表(函數(shù)的意思:把累計(jì)用戶數(shù)除以1萬保留小數(shù)點(diǎn)后一位數(shù))=TEXT(O3/10000,"0.0")27,以相同的道理把當(dāng)日訂購用戶,當(dāng)日新增訂單數(shù)和當(dāng)日業(yè)務(wù)收入改成以萬為單位就行了(數(shù)據(jù)量小可以不用該,直接“=“過來就行了)其他的和上面一樣就行了Sub PPT報(bào)告數(shù)據(jù)更新()用VBA+函數(shù)可以做好很多事情,Excel的報(bào)表部分也可以用Power Query來實(shí)現(xiàn),會更加簡潔便利,但是我現(xiàn)在不說2016-9-4確定(提取數(shù)據(jù)庫數(shù)據(jù))四、保存文件這一步一定要看,不然后悔1,點(diǎn)擊Excel左上角的文件2,另存為這臺電腦桌面保存類型Excel啟用宏的工作簿確定(桌面上就有了你的日報(bào)模板)3,有的電腦是禁用宏的鼠標(biāo)右擊設(shè)置單元格格式13,日期2012/3/14確定14,選中日期和新增增用戶數(shù)插入推薦圖標(biāo)15,所有圖標(biāo)柱形圖確定16,注:這里一定要選選中日期后在按Ctrl選中訂購用戶數(shù)(我們做的這個(gè)圖是要給老板看的)18,在數(shù)據(jù)轉(zhuǎn)化區(qū)的右邊做一個(gè)和數(shù)據(jù)相對應(yīng)的表格19,我們需要把前面表格實(shí)時(shí)的數(shù)據(jù)轉(zhuǎn)移到后面的表格五、將報(bào)表生成PPT文件將表格的數(shù)據(jù)導(dǎo)入到PPT,并生成PPT1、先設(shè)計(jì)好一個(gè)PPT的樣式每一頁P(yáng)PT的元素都有名字,通過調(diào)用PPT的頁碼+元素的方式來修改PPT上的內(nèi)容
這個(gè)問題還有疑問的話,可以加幕.思.城火星老師免費(fèi)咨詢,微V.信X號是為: msc496。
推薦閱讀:
微信掃碼回復(fù)「666」