公告版位

學員想學卻苦無名額因此整理上課的影音和講義分享

 

最近文化大學、東吳推廣部、自強工業基金會、新北市勞工大學等單位開課狀況良好,

上課人數經常是秒殺居多,尤其是VBA和PHTHON課程,

最近在文化大學推廣部

http://my.sce.pccu.edu.tw/MS/Detail.aspx?ProdId=8IS4sample

新北市勞工大學將開:

https://uni.labor.ntpc.gov.tw/HP0/HP06.asp

 

很多學員反應想學卻苦無名額,

因此這幾天整理了去年2017年上課的影音和講義等資料

首先是從EXCEL進階函數到VBA入門課程

自強從Excel函數到VBA雲端巨量資料庫應用班

課程詳細內容:https://goo.gl/umvBys 


VBA進階到資料庫的兩個不同單位課程,因學習對象不同課程也稍異:

自強Excel VBA辦公室提升效率自動化實務班

課程詳細內容:https://goo.gl/Ffh4uj 

勞大EXCEL VBA大數據自動化進階

課程詳細內容:https://goo.gl/BEBext 


最後是大家都很有興趣的PHTHON入門課程:

從EXCEL VBA自動化到Python程式開發入門 

課程詳細內容:https://goo.gl/tXXqXF


大家都有很大學習需求的用網頁概念作APP的:

跨平台APP開發使用Visual Studio2015與PhoneGap 

課程詳細內容:https://goo.gl/xnV6mo

 

並將課程整理為DVD或是雲端下載課程,

有興趣的網路學習者,也可以有學習的機會。


可以參考:

https://terry55wu.blogspot.tw/p/dvd.html

文章標籤

吳老師 發表在 痞客邦 留言(0) 人氣()

最新吳老師教學超完整懶人包

祝  大家新春如意,學習愉快

android教學, AUTOCAD 3D教學, e, EXCEL, EXCEL VBA 函數 程式設計, VBA, 大數據, 提升效率, 教學視頻 excel函數教學 excel函數, 

 

 

 
文章標籤

吳老師 發表在 痞客邦 留言(0) 人氣()

使用VBA製作銷貨訂購單與儲存資料(EXCEL當資料庫)

 

預覽畫面:

 

本範例主要分享銷貨訂單的自動化EXCEL當成輸入介面

當然也可以利用VBA裡的表單來製作,難度會比較高些,

不過感覺會更專業些,但是無論哪種方式,

最主要是可以輔助輸入的效率與正確性

讓輸入資料不易出錯,

也無法隨意竄改,

所以需要最後配合保護工作表

除了四個區域(單號、客戶、商品、數量)可以修改外,

其他都不能修改,避免輸入資料正確性

另外下拉清單也可以自動帶出其他資料

這樣就可以加快輸入效率,

最後,可以再利用VBA程式

將所有資料存在銷貨明細一筆紀錄單號也自動加一之後,

又可以繼續輸入資料,達到類似進銷存系統的目的。

 

以下分享流程:

1.訂單日期

02_到貨日期

03_到貨日期(避開六日)

04_客戶

05_序號

06_商品

07_小計

08_保護工作表

09_增加訂單明細工作表

10_VBA程式畫面

Public Sub 新增資料()

   '1.判斷在哪一列

   If Sheets("銷貨明細").Range("A2") = "" Then

       r = 2

   Else

       r = Sheets("銷貨明細").Range("A1").End(xlDown).Row + 1

   End If

   '2.輸出資料

   '單號

   Sheets("銷貨明細").Cells(r, "A") = Range("B2")

   '訂單日期

   Sheets("銷貨明細").Cells(r, "B") = Range("D2")

   '到貨日期

   Sheets("銷貨明細").Cells(r, "C") = Range("G2")

   '客戶編號

   Sheets("銷貨明細").Cells(r, "D") = Range("B3")

   '客戶名稱

   Sheets("銷貨明細").Cells(r, "E") = Range("C3")

   '連絡電話

   Sheets("銷貨明細").Cells(r, "F") = Range("G3")

   '地址

   Sheets("銷貨明細").Cells(r, "G") = Range("B4")

   '銷貨總額

   Sheets("銷貨明細").Cells(r, "H") = Range("G4")

  

   '3.清空資料

   'Range("B2") = ""

   Range("B3") = ""

   Range("E2") = ""

   Range("B7:B16").ClearContents

   Range("F7:F16").ClearContents

 

   '4.單號加1

   Range("B2") = Range("B2")+ 1

End Sub

 

**如果編號為S000X

   Range("B2") = Left(Range("B2"), 1) & Format(Right(Range("B2"), 4) + 1, "0000")

 

教學影音(完整版在論壇):

 

教學影音完整版在論壇:

https://groups.google.com/forum/#!forum/scu_excel_vba2_86

 

課程特色:

EXCEL函數 VBA程式設計資料庫與網路資料是分別屬於不同領域的知識,

但卻是目前大家都需要的一項專業技能,要把三者融合的很好實在非常不容易,

剛好我有近20年的VB程式設計資料庫設計的經驗,

教EXCEL函數與相關課程也有多年,因此清楚如何把最重要的知識教給大家,

ADO資料庫設計的知識非常多,但根據我多年的設計實務經驗,

覺得最重要的是掌握SQL語言,就可以輕易的完成查詢、新增、修改與刪除等功能,

就可以輕易的完成自己想處理的大量資料,大大提高工作效率了!

 

上課用書是:

Excel函數&VBA其實很簡單

(http://www.books.com.tw/exep/prod/booksfile.php?item=0010457292)

Excel VBA 與資料庫整合大活用

(http://www.books.com.tw/exep/prod/booksfile.php?item=0010463634)

 

完整教學影音DVD申請

http://goo.gl/ZlBZE

 

其他相關學習:

函數東吳進修推廣部, EXCEL, EXCEL VBA 函數 程式設計 線上教學 excel vba 教學 excel vba指令教學 vba範例教學excel  excel vba教學視頻 函數教學 excel函數

文章標籤

吳老師 發表在 痞客邦 留言(0) 人氣()

EXCEL太複雜工作還是交給VBA吧!範例班級成績查詢

 

預覽畫面:

 

關於下拉清單快速查詢班級資料是常見問題,

但是要做到這樣的結果,

如果用EXCEL內建函數

需要用到函數分別有:

IF(比對)、SAMLL(改範圍比對與排序)、INDEX(抓資料)、IFERROR(過濾錯誤)

而且還需要用陣列來執行,

光複雜度,就令人卻步

每每講完這部分,再講VBA的解法,

反而用VBA來處理顯得更加簡便

所以,

若有更複雜的工作,要提高工作效率,

建議,還是用VBA為佳。

 

如何用VBA來做:

 

Public Sub 班級()

   '1.刪除舊資料

   Range("G5:J12").ClearContents

   '1.輸出的列數

   k = 5

   '2.迴圈判斷班級

   For i = 2 To 12

       If Cells(i, "A") = Range("H2") Then

           Cells(k, "G") = Cells(i, "B")

           Cells(k, "H") = Cells(i, "C")

           Cells(k, "I") = Cells(i, "D")

           Cells(k, "J") = Cells(i, "E")

           k = k + 1

       End If

   Next

End Sub

Private Sub Worksheet_Change(ByVal Target As Range)

   If Target.Address = "$H$2" Then

       Call 班級

   End If

End Sub


補充用EXCEL內建函數:

以下是用IF(比對)、SAMLL(改範圍比對與排序)、INDEX(抓資料)、IFERROR(過濾錯誤)

=IF($A2=$H$2,ROW()-3,"N")

{=SMALL(IF($A$2:$A$12=$H$2,ROW($A$2:$A$12),"N"),ROW()-4)}

**注意SMAIL的比對為範圍,所以需要將比對條件改為範圍,另返回的列數也要是範圍,並且一定要用陣列執行(CTRL+SHIFT+ENTER)

 

{=INDEX($A$1:$E$12,SMALL(IF($A$2:$A$12=$H$2,ROW($A$2:$A$12),"N"),ROW()-4),COLUMN()-5)}

 

 

 

{=IFERROR(INDEX($B$1:$E$12,SMALL(IF($A$2:$A$12=$H$2,ROW($A$2:$A$12),"N"),ROW(A1)),COLUMN(A1)),"")}

 

教學影音(完整版在論壇):

 

教學影音完整版在論壇:

https://groups.google.com/forum/#!forum/scu_excel_vba2_86

 

課程特色:

EXCEL函數 VBA程式設計資料庫與網路資料是分別屬於不同領域的知識,

但卻是目前大家都需要的一項專業技能,要把三者融合的很好實在非常不容易,

剛好我有近20年的VB程式設計資料庫設計的經驗,

教EXCEL函數與相關課程也有多年,因此清楚如何把最重要的知識教給大家,

ADO資料庫設計的知識非常多,但根據我多年的設計實務經驗,

覺得最重要的是掌握SQL語言,就可以輕易的完成查詢、新增、修改與刪除等功能,

就可以輕易的完成自己想處理的大量資料,大大提高工作效率了!

 

上課用書是:

Excel函數&VBA其實很簡單

(http://www.books.com.tw/exep/prod/booksfile.php?item=0010457292)

Excel VBA 與資料庫整合大活用

(http://www.books.com.tw/exep/prod/booksfile.php?item=0010463634)

 

完整教學影音DVD申請

http://goo.gl/ZlBZE

 

其他相關學習:

函數東吳進修推廣部, EXCEL, EXCEL VBA 函數 程式設計 線上教學 excel vba 教學 excel vba指令教學 vba範例教學excel  excel vba教學視頻 函數教學 excel函數

文章標籤

吳老師 發表在 痞客邦 留言(0) 人氣()

EXCEL快速資料分欄用INDEX函數與VBA

 

預覽畫面:

 

常遇到儲存格中若有單欄資料要分為四欄多欄資料,

若不懂的用INDEX等查詢函數,配合COLUMN與ROW參照函數

可能要用非常多的時間才能完成工作,

但若懂得用INDEX或INDIRECT函數

馬上就可以輕易完成結果,

需要先用Column與Row函數取得位置,再利用INDEX函數讀取資料,

最後多餘的標題與冒號,可以用REPLACE函數或是MID函數去除。

不過比較函數與VBA的執行效率,

當然VBA程式寫出來,按下按鈕執行似乎比較直接,

所以若資料量大或是需要重複動作的應用,

還是建議用VBA來完成

 

1.Column與Row函數:

=COLUMN()-3+(ROW()-2)*4

 

2.INDEX函數

=INDEX($B$2:$B$33,COLUMN()-3+(ROW()-2)*4,1)

3.MID與LEN函數

=MID(INDEX($B$2:$B$33,COLUMN()-3+(ROW()-2)*4,1),LEN(D$1)+2,99)

**補充用REPLACE切割=REPLACE(INDEX($B$2:$B$33,COLUMN()-3+(ROW()-2)*4,1),1,LEN(D$1)+1,"")

 

 

4.INDIRECT函數

=INDIRECT("B"&COLUMN()-2+(ROW()-2)*4)

=REPLACE(INDIRECT("B"&COLUMN()-2+(ROW()-2)*4),1,LEN(D$1)+1,"")

 

**用INDIRECT轉為VBA的RANGE物件輸出資料

 

Public Sub 人事分欄()

'    Cells(2, 4) = Range("B2")

'    Cells(2, 5) = Range("B3")

   k = 2

   For i = 2 To 9

       For j = 4 To 7

           Cells(i, j) = Mid(Range("B" & k), Len(Cells(1, j)) + 2, 99)

           k = k + 1

       Next

   Next

End Sub

 

Public Sub 清除()

   Range("D2:G9").ClearContents

End Sub

 

教學影音(完整版在論壇):

 

教學影音完整版在論壇:

https://groups.google.com/forum/#!forum/scu_excel_vba2_86

 

課程特色:

1.如何將函數轉成VBA2.VBA與資料庫快速結合

 

EXCEL函數 VBA程式設計資料庫與網路資料是分別屬於不同領域的知識,

但卻是目前大家都需要的一項專業技能,要把三者融合的很好實在非常不容易,

剛好我有近20年的VB程式設計資料庫設計的經驗,

教EXCEL函數與相關課程也有多年,因此清楚如何把最重要的知識教給大家,

ADO資料庫設計的知識非常多,但根據我多年的設計實務經驗,

覺得最重要的是掌握SQL語言,就可以輕易的完成查詢、新增、修改與刪除等功能,

就可以輕易的完成自己想處理的大量資料,大大提高工作效率了!

 

上課用書是:

Excel函數&VBA其實很簡單(http://www.books.com.tw/exep/prod/booksfile.php?item=0010457292)

Excel VBA 與資料庫整合大活用(http://www.books.com.tw/exep/prod/booksfile.php?item=0010463634)

 

完整教學影音DVD申請:http://goo.gl/ZlBZE

論壇:http://groups.google.com/group/labor_excel_vba?hl=zh-TW

 

其他相關學習:

 

函數東吳進修推廣部, EXCEL, EXCEL VBA 函數 程式設計 線上教學 excel vba 教學 excel vba指令教學 vba範例教學excel  excel vba教學視頻 函數教學 excel函數

文章標籤

吳老師 發表在 痞客邦 留言(0) 人氣()

20180417-22日本東北新幹線追櫻自由行分享

 

繼上一次的關西九州新幹線自由行分享[連接],有上次的經驗,

 

讓這次旅行更順利,想說依照之前的經驗應該就可以讓旅行更順利,

這次旅行的規劃想說剛好日本東北櫻花開,於是就看老婆有沒有時間一起前往,

但她的時間只能4/17(二)到4/22(日),

想說JR PASS的東北周遊卷(14日內5天使用),

於是就找了仙台進,東京出的方向,

訂了樂桃11點飛機,與捷星東京晚上10點飛回,

剛好可以睡飽再出發,玩到晚上再回家的概念,

另外,利用JR PASS新幹線移動,最好可以住離車站近點的飯店,

最好要有溫泉,於是訂了APA仙台店,有免費溫泉離車站不遠

步行約十分鐘,最後一天轉進高崎,可以玩輕井澤

訂了華盛頓高崎飯店,旁邊也有AEON百貨和超市,

高崎車站真的超近,僅三分鐘距離。

 

之後幾天就追著櫻花開的情形移動,大制訂出JR PASS的使用,

20180418第一天抵達仙台車站旁APA飯店

[連結] https://terry55wu.blogspot.tw/2018/04/20180418apa.html

20180418在岩手縣賞櫻:

20180419往青森縣賞櫻,雖說弘前城似乎還沒開,但也值得一去

20180420往秋田賞櫻與盛岡夜櫻,先到田澤湖坐觀光巴士,

在前往千秋公園,回來去盛岡公園看夜櫻:

20180421輕井澤騎腳踏車,住高崎車站旁,先把行李放飯店,

在去輕井澤騎腳踏車

20180422第六天鐵道博物館與川越看古代街景,雖說有搭錯車,

但還是順利從東京回台灣

 

結論:

這次旅行因為有JR東北新幹線套票,因為車班很多,

所以幾乎可以把新幹線當地鐵坐,但和關西山陽新幹線還是有蠻多的不同,

雖然都是日本人,但東北人感覺好安靜,連我們都不敢太大聲說話,

首先東北與秋田新幹線幾乎都是指定車廂,沒有自由座,

所以最好前一天把所有行程的車票先預約好。

賞夜櫻去盛岡城的蝸牛公車記得去坐左向,回坐右向,

票價日幣100元,準備好下車投即可。

一切都很順利,只是遇到幾個要注意卻沒注意的事,

票價日幣100元,準備好下車投即可,

雖然有搭錯車,但兩人同心與熟悉APP的操作,自然可以化險為夷。

另外,

弘前城跑最遠最久,反而櫻花還沒開,這是不相信櫻花官網的訊息,

不過也沒白跑一樣,只是時間投資部那麼值得。

此外,

這張JRPASS可以在14天內挑5天使用,就可以長途移動後休息幾天再使用,

旅遊中遇到退休的台灣人,就是這樣在玩,用幾天休幾天,

可以遠距離移動,也可以在當地深度旅行與漫遊,

不過這樣可能需要有很長的假期,蠻適合退休生活的。

 

時間表

 

4/17 Day1

7:05出門/11:20登機/15:45(日本時間)抵達仙台機場/16:50搭鐵道到仙台站/

17:30到APA飯店/18:50伊達的牛吃晚餐(牛舌)/逛AEON超市/飯店溫泉

4/18 Day2

8:10出門/換JR pass新幹線票/9:37搭往ㄧ之關/10:21搭地鐵到平泉車站/毛越寺/

水澤公園(賞櫻)/北上展勝地(賞櫻)/AEON超市/飯店溫泉

4/19 Day3

9:12東北新幹線到新青森/弘前星巴克/弘前公園(賞櫻)/三八城公園野餐(賞櫻)/

仙台車站吃拉麵/AEON超市

4/20 Day4

9:12~10:26搭往秋田新幹JR到「田澤湖站」,下車後購買【田澤湖巴士環湖一周乘車券】

10:45~12:16田澤湖ㄧ周(巴士)/午餐-車站旁拉麵及定食/

13:11~14:08搭往秋田新幹JR到秋田車站/走路5分鐘到千秋公園(賞櫻,草地野餐)/

16:12搭新幹線到盛岡/盛岡城跡公園(賞夜櫻)/19:50新幹線到仙台/

仙台站將明天的車票劃位/晚餐-喜治郎牛舌

4/21 Day5

仙台朝市/10:30仙台搭新幹線到大宮/大宮站轉往高琦/到華盛頓飯店check in寄行李/

AEON百貨購物吃午餐/14:05搭新幹線到輕井澤/輕井澤騎車2小時/高崎城跡

4/22 Day6=9:11搭雙層新幹線到大宮站/從大宮站轉鐵道博物館站/參觀鐵道博物館/

到川越站/搭巡迴觀光巴士/川越冰川神社/glin咖啡館喝下午茶/

搭錯車,不小心搭到長岡站/長岡站搭回高崎約49分鐘/

高崎站拿行李劃位及icoca加值/18:22搭往上野/上野搭電車到成田機場/

22:00飛回台灣


TAG:

 

日本東北,秋田新幹線,東北新幹線,上越新幹線,北陸新幹線,自由行分享,新幹線,

東日本JR套票,弘前城,青森,秋田,田澤湖,毛越寺,水澤公園,北上,盛岡城,夜櫻,輕井澤,

川越地區,鐵道博物館

 

文章標籤

吳老師 發表在 痞客邦 留言(0) 人氣()

20180117-23日本關西九州新幹線自由行分享

想去日本坐新幹線這念頭已經好幾年了,剛好看到西日本JR官網的套票

讓我大大心動,於是在閒時就開始規劃8天的旅遊行程

至少要確認機票飯店交通,剩下的景點可以再安排。

至於那些景點最值得去,

很多都是交給GOOLGE地圖

搜尋至少4顆星,評論都是大大的讚,當然就是第一順位,

於是宮島的嚴島神社的4.6顆星就雀屏中選,

其他的也就類似的方式找尋景點,

其次是最好離新幹線車站不會太遠,

畢竟旅遊的時間有限,先把最熱門的先玩一輪,

之後有時間再訪,就可以玩深度之旅,

這次,其實本來想去吳市的海上自衛隊吳史料館看大和號,

與吳市海事歷史科學館看看,與廣島的大久野島看兔兔,

但那裏的交通不便,所以也許下次可以再次深度到廣島旅行了。

接下來針對機票、飯店與交通做詳細介紹。

 

機票:

坐廉航去坐捷星中午的班機,可以睡飽再出門,

回來坐香草深夜班機,可以玩到傍晚,回到家剛好昏睡,

配合作息,比較不用沒睡飽出門,也可以玩到最後一刻,

雖說價格沒有特別便宜,但還在可接受範圍。

飯店:

前四晚在 HOTEL APP訂購的,用APP比網站便宜很多,

住日本連鎖飯店 APA岡山店

原本訂的是風評很好的瑪麗亞飯店

但用GOOGLE地圖查了一下離車站的距離,

還是APA比較近些,步行5-7分鐘

旁邊有AEON MALL與超市可以逛,

價格因為用HOTEL APP訂購的,划算很多,一晚大約台幣1600。

後兩晚在AGODA網站訂的新大阪飯店,一晚大約新台幣2000,

離新大阪車站超近,步行三分鐘就到了。

 

其實坐新幹線,住新大阪或岡山,甚至是廣島都沒什麼差,

因為新幹線的車班超密集五到十分鐘就一班

車上也有位子可以很舒服的休息,所以關鍵應該是離車站近最好,

另外,最好旁邊有物價便宜的超市

三餐比較好搞定,價格也會省很多。

最推薦的還是AEON超市,7點以後就有很多熟食已經開始打折。

吃的喝的都比便利商店便宜非常多。

交通:

日本交通便利準時有口皆碑,但價格昂貴也是事實,

大約是台灣的2-3倍以上,

統計這次我們搭新幹線費用,大約3.5萬台幣

其他的交通費大約5000台幣,加總起來大約4萬,

若沒有省錢的JRPASS新幹線套票,真的吃不消,

所以出發前剛好看到西日本JR新推出的山陽&山陰地區鐵路周遊券

可以七日內無限次的搭乘新大阪到博多之間新幹線,還有JR的電車宮島的渡輪

光新幹線坐一趟遠程的到博多或小倉就回本了,甚至搭快速列車,

機場到新大阪站的HARUKA列車

最讓人心動的是,這張套票是可以劃位的,

也就是可以在出發前,去JR櫃台指定位置,

也就是保證有位子,不用去跟別人為了搶自由坐,要提前排隊。

但自由坐非上班時間似乎也很空,

但往返機場可以劃HARUKA就很重要,

因為HARUKA最近有很多優惠票,

不過僅限自由坐,所以可以看到自由坐排隊的人超多,

但劃位的位子去很空。

所以最後會買這張JR套票的最大誘因,

1.可以搭七天,比其他的套票五天似乎很優惠。

2.可以劃位,也就是指定座位,這點很重要,可以不用和別人搶自由坐,

不過劃為部分一訂只能去西日本JR櫃台劃位,

新大阪車站因為還有東海JR櫃台,我就跑錯了,無法劃位,

博多車站有九州JR也無法劃位。

3.價格很優惠,日幣19000,大約台幣5000用七天,平均一天700台幣

在日本坐新幹線,算很便宜,況且還可以搭快速列車與渡輪。

另外,在台灣網站買又比去日本買便宜很多,我最後是在KKDAY網站購買,

價格4820,又更優惠些。

 

APP工具:

這部分我用最多還是GOOGLE地圖,

甚至搭新幹線的時刻表也都是在地圖查詢,

原本擔心會有不準確的問題,

但這幾天的實際使用結果,發現擔心是多餘的,

幾乎不需要再看查新幹線時刻表,

另外,GOOGLE的導航也是非常好用,

但建議一訂要先校正手機的指南針,這點非常重要,

甚至地下室也可以用指南針導航,不用擔心迷航問題。

 

看天氣可以用WINDY

 

看潮汐可以知道什麼時候可以看海上鳥居何時可以露出海面

查新幹線時速

 

天時地利都確定了,剩下就是確定之後的旅遊景點

1.參訪嚴島神社,海上鳥居,嚴島寶物館,紅葉谷公園,插曲是坐車去博多吃ㄧ蘭拉麵


 

 

2.參訪廣島城與和平紀念公園與吃廣島燒與尾道千光寺

 

 

 

3.參訪岡山城,岡山後樂園與倉敷美觀地區,插曲再遊博多屋台與運河城


 

 

4.參訪小倉城,旦過市場吃午餐與轉移新大阪逛心齋橋

 

5.參訪姬路城,插曲東廣島賞雪

 

 

6.搭JR電車參訪彥根城與玄宮園與準備回國

 

 

以下分享出發、抵達、時間、車型車號、起點、目的地與金額(日幣與台幣)

 

以下是我們七天的行程時間表給大家參考:

2018/1/17 (Day1)

9:10出發,10:00到機場,12:45起飛15:58抵達關西機場,

16:35換JR山陽山陰周遊卡,17:16搭JR到新大阪,

18:25新大阪到岡山,19:40抵達飯店,

20:00 AEON MALL 小豆島拉麵,逛AEON MALL超級市場

 

2018/1/18 (Day2)

8:00起床,9:00出門到AEON MALL吃早餐,

9:55搭乘新幹線到廣島,10:51廣島到宮島口站,

11:40搭乘JR渡輪,

12:00嚴島神社,海上鳥居,嚴島寶物館,紅葉谷公園,中餐,

15:30搭渡輪到宮島口站,宮島口到廣島,

16:00廣島到博多,17:33抵達北九州博多福岡,ㄧ蘭拉麵與逛地下街,

19:25搭乘JR到岡山,21:00抵達岡山逛超市,飯店休息

 

2018/1/19 (Day3)

9:15出發,9:46搭JR到廣島,廣島城,

12:40若貴廣島燒,廣島和平紀念公園,16:10 尾道千光寺

20:00逛AEON MALL

 

2018/1/20 (Day4)

9:00出門,19:18搭電車,9:25到岡山城,

岡山後樂園,12:00離開岡山後樂園,12:30博多拉麵,

13:00搭電車到倉敷車站,倉敷川,15:30離開倉敷站往岡山,

15:56從岡山站搭乘新幹線到博多,

17:41到博多福岡,屋台,中州,飯店

 

2018/1/21 (day5)

9:00出門,小倉中央商店街,魚町銀天街,小倉城,旦過市場吃午餐,

14:50搭新幹線到岡山站,至飯店拿行李後搭乘,

16:51新幹線到新大阪,18:00新大阪飯店Check in,

19:40至心齋橋吃金龍拉麵,大阪王將餃子,逛松本清藥妝品店

 

2018/1/22 (day6)

9:18搭新幹線到姬路城,姬路城,搭新幹線到廣島,

到東廣島車站附近賞雪,回岡山到AEON MALL,回飯店,去梅田逛

 

2018/1/23 (day7)

10:30出門,搭電車到彥根城,12:00彥根城,玄宮園

 

結論:

這次旅行因為有新幹線套票,因為車班很多,所以幾乎可以把新幹線當地鐵坐,

可以在大城市間快速穿梭,從大阪玩到九州是很容易的事,至於住那裡不是問題,

就看最想玩的景點在哪個城市附近,這次在廣島待的時間最多,

所以如果下次再去,應該會想訂房在廣島吧,不過岡山的物價真的是最低,

吃喝的品質也很好,又是都市的中心,所以岡山也是住的最好地點。

另外,這次還有很多照片和影片都還整理上網,

之後也還會陸續整理上船分享,

當然也歡迎對行程有問題提出建言。

 

日本關西,九州新幹線,自由行分享,新幹線,,西日本JR套票,嚴島神社,海上鳥居,嚴島寶物館,紅葉谷公園,博多ㄧ蘭拉麵,廣島城,和平紀念公園,廣島燒,岡山城,岡山後樂園,倉敷美觀地區,博多屋台,博多運河城小倉城,旦過市場,姬路城,東廣島賞雪,彥根城,玄宮園

文章標籤

吳老師 發表在 痞客邦 留言(0) 人氣()

EXCEL VBA動態取消工作表保護與VBA專案保護設定

 

最新課程:EXCEL高階函數與大數據VBA自動化 提昇工作效率,晉身職場 Excel 高手!http://my.sce.pccu.edu.tw/MS/business/Detail.aspx?ProdId=8IP1_A6090&Source=HotClas

 

預覽畫面:

 

若設定了工作表保護之後,

無論是人工輸入或是VBA輸入

但會失敗,VBA則會跳出錯誤畫面,

因此,

可以動態的將保護取消,之後再動態的加上保護,

ActiveSheet.Unprotect ("1234")


不過,因為會需要將密碼寫到程式之中,

所以保護VBA專案裡的程式碼,又是另一個問題,

因此,此次的分享主要是如何VBA動態取消工作表保護與VBA專案保護設定

 

 

教師研習時數

=SUMIF(Sheet2!$B$3:$B$16,B2,Sheet2!$C$3:$C$16)+SUMIF(Sheet3!$B$3:$B$14,B2,Sheet3!$C$3:$C$14)

 

如何保護公式與資料:

 

**如何動態輸入公式到儲存格中

 

 

Public Sub 研習總時數()

   ActiveSheet.Unprotect ("1234")

   For i = 2 To Range("A2").End(xlDown).Row

       Cells(i, "C") = "=SUMIF(Sheet2!$B$3:$B$16,B" & i & ",Sheet2!$C$3:$C$16)+SUMIF(Sheet3!$B$3:$B$14,B" & i & ",Sheet3!$C$3:$C$14)"

   Next

   ActiveSheet.Protect ("1234")

End Sub

Public Sub 研習總時數清除()

   ActiveSheet.Unprotect ("1234")

   For i = 2 To Range("A2").End(xlDown).Row

       Cells(i, "C") = ""

   Next

   ActiveSheet.Protect ("1234")

End Sub

 

 

 

教學影片:

 

教學影音完整版在論壇:

https://groups.google.com/forum/#!forum/scu_excel_vba2_86

 

課程特色:

1.如何將函數轉成VBA2.VBA與資料庫快速結合

 

EXCEL函數 VBA程式設計資料庫是分別屬於三個領域的知識,

但卻是目前大家都需要的一項專業技能,要把三者融合的很好實在非常不容易,

剛好我有近20年的VB程式設計資料庫設計的經驗,

教EXCEL函數與相關課程也有多年,因此清楚如何把最重要的知識教給大家,

ADO資料庫設計的知識非常多,但根據我多年的設計實務經驗,

覺得最重要的是掌握SQL語言,就可以輕易的完成查詢、新增、修改與刪除等功能,

就可以輕易的完成自己想處理的大量資料,大大提高工作效率了!

 

上課用書是:

Excel函數&VBA其實很簡單(http://www.books.com.tw/exep/prod/booksfile.php?item=0010457292)

Excel VBA 與資料庫整合大活用(http://www.books.com.tw/exep/prod/booksfile.php?item=0010463634)

 

完整教學影音DVD申請:http://goo.gl/ZlBZE

論壇:http://groups.google.com/group/labor_excel_vba?hl=zh-TW

 

其他相關學習:

函數東吳進修推廣部, EXCEL, EXCEL VBA 函數 程式設計 線上教學 excel vba 教學 excel vba指令教學 vba範例教學excel  excel vba教學視頻 函數教學 excel函數

文章標籤

吳老師 發表在 痞客邦 留言(0) 人氣()

EXCEL匯出資料到MYSQL與PHP、Phthon、R、APP共用資料

 

將資料存放在MYSQL可以解決多平台不同開發工具共用資料問題,

PHP、Phthon、R、APP的共用資料,EXCEL又是最普遍的辦公室應用程式,

所以若能將兩者串連,相信可以讓資料運用更加彈性。