三年前《富比士》有一篇文章觀察到「誰才夠格被快速升遷」,這是真實的故事,有兩個都很想升遷的人,兩位都從商學院畢業,來到一家投資公司,兩個人都想好好大幹一場!於是處心積慮,想辦法升升升、升升升,不過最後的結果是,其中一位在短短一年內被升為資深分析師,而另一個卻爬得很~慢~,為什麼?
第一位叫Ted,他是爬的比較慢的那位,但其實,他各方面能力都比人家強,一開始就知道,如果想爬快一點,就應該讓自己「和別人不同」,上班族通常讓自己和別人不同就只有兩種方法,一種是「卓越工作」,在自己份內的工作做的比其他人都還好,另一種是「加強社交」,也就是努力的去和一些高層打好關係,在老闆那邊可以美言幾句。以上兩點,Ted都努力的進行中,Ted資質聰穎、口才便給,又不怕加班、耐操耐練,份內工作做得很好,老闆都很喜歡。
不過,Ted後來卻發現,還另有一位叫做Mark的同事,和他同期進公司,工作表現沒他好,卻硬就是「爬」得比、他、還、快?
怎麼可能?
不夠「資格」的Mark,竟然爬得比資格更夠的Ted還快?原來,Mark用了「第三種方法」來讓自己與眾不同,還有什麼方法呢?Mark一進公司後就發現自己和同儕相比,並不是這麼有幹勁的人,也不確定自己的能力是否可以做到,這麼競爭激烈的場所,他這樣競爭也沒用。或許,就是因為Mark有這樣難得的「先見之明」,因此Mark做了一些別的很拚的年輕人不會做的事。這些事,因為大家都忙在自己的電腦裡把自己的事做得很好很好,因此都「忽略」了──
到底是什麼事呢?
Mark一邊做自己份內工作,一邊將剩下的時間拿來研究「別人在做什麼」,這一點,就是許多忙著競爭的小同事,不肯花時間去做的事了!他積極的跑去問他的同事,無論是小秘書,還是小經理,或是其他部門的人,只要碰面到的,他就跑去問問看他們在做什麼、他們怎麼安排一天時間,如何將他們被指定的事情做完……。慢慢的,當他問了「夠多人」以後,Mark也很快察覺「同事之間」、「部門之間」有什麼地方可以被改進的,於是他先開始做一些看似瑣碎的事,幫忙周會訂便當,幫忙確認辦公室用品在用光之前就被訂足……他的主管很快就發現Mark正在做的事。於是,Mark雖然並不是表現最好的,也不是最有領導魅力的,並非人緣最好的,但大家都蠻感謝他。
後來,Mark開始自修Excel的程式語法,來幫忙「補」一個同事做不到的洞。很快的,他們發現,除了Mark以外,在公司裡已經沒有人比Mark還懂得內內外外這麼「廣」的資訊,如果要找人來開會,找Mark就對了!於是他開始被允許越級參加愈來愈多的會議、各式各樣的會議都會參加。一年還沒到終,他已經被升為資深研究員,而他所獲得的獎金比別人多50%!雖然Ted比他厲害好幾倍,但和其他同事相比並沒有傑出太多,而且天天累得像狗一樣,相較之下,Mark比Ted還輕鬆的就得到升遷機會。
Mark雖然「資格」不夠,但so what?
什麼叫「資格」?資格是誰訂的呢?
Mark心裡已經不是按照一般分析師的「資格」在想自己,它想的資格自成一套,或許他根本就是「沒格」(沒去想任何資格的事)!大部份的上班族都以為,「資格」就是自己本身的工作能力,或許是EQ或社交或人緣或語言能力…但其實,「資格」的定義根本就沒有絕對,我們真的需要的不是硬碰硬比「資格」,而是比「沒格」。
三年前《富比士》有一篇文章觀察到「誰才夠格被快速升遷」,這是真實的故事,有兩個都很想升遷的人,兩位都從商學院畢業,來到一家投資公司,兩個人都想好好大幹一場!於是處心積慮,想辦法升升升、升升升,不過最後的結果是,其中一位在短短一年內被升為資深分析師,而另一個卻爬得很~慢~,為什麼?
第一位叫Ted,他是爬的比較慢的那位,但其實,他各方面能力都比人家強,一開始就知道,如果想爬快一點,就應該讓自己「和別人不同」,上班族通常讓自己和別人不同就只有兩種方法,一種是「卓越工作」,在自己份內的工作做的比其他人都還好,另一種是「加強社交」,也就是努力的去和一些高層打好關係,在老闆那邊可以美言幾句。以上兩點,Ted都努力的進行中,Ted資質聰穎、口才便給,又不怕加班、耐操耐練,份內工作做得很好,老闆都很喜歡。
不過,Ted後來卻發現,還另有一位叫做Mark的同事,和他同期進公司,工作表現沒他好,卻硬就是「爬」得比、他、還、快?
怎麼可能?
不夠「資格」的Mark,竟然爬得比資格更夠的Ted還快?原來,Mark用了「第三種方法」來讓自己與眾不同,還有什麼方法呢?Mark一進公司後就發現自己和同儕相比,並不是這麼有幹勁的人,也不確定自己的能力是否可以做到,這麼競爭激烈的場所,他這樣競爭也沒用。或許,就是因為Mark有這樣難得的「先見之明」,因此Mark做了一些別的很拚的年輕人不會做的事。這些事,因為大家都忙在自己的電腦裡把自己的事做得很好很好,因此都「忽略」了──
到底是什麼事呢?
Mark一邊做自己份內工作,一邊將剩下的時間拿來研究「別人在做什麼」,這一點,就是許多忙著競爭的小同事,不肯花時間去做的事了!他積極的跑去問他的同事,無論是小秘書,還是小經理,或是其他部門的人,只要碰面到的,他就跑去問問看他們在做什麼、他們怎麼安排一天時間,如何將他們被指定的事情做完……。慢慢的,當他問了「夠多人」以後,Mark也很快察覺「同事之間」、「部門之間」有什麼地方可以被改進的,於是他先開始做一些看似瑣碎的事,幫忙周會訂便當,幫忙確認辦公室用品在用光之前就被訂足……他的主管很快就發現Mark正在做的事。於是,Mark雖然並不是表現最好的,也不是最有領導魅力的,並非人緣最好的,但大家都蠻感謝他。
後來,Mark開始自修Excel的程式語法,來幫忙「補」一個同事做不到的洞。很快的,他們發現,除了Mark以外,在公司裡已經沒有人比Mark還懂得內內外外這麼「廣」的資訊,如果要找人來開會,找Mark就對了!於是他開始被允許越級參加愈來愈多的會議、各式各樣的會議都會參加。一年還沒到終,他已經被升為資深研究員,而他所獲得的獎金比別人多50%!雖然Ted比他厲害好幾倍,但和其他同事相比並沒有傑出太多,而且天天累得像狗一樣,相較之下,Mark比Ted還輕鬆的就得到升遷機會。
Mark雖然「資格」不夠,但so what?
什麼叫「資格」?資格是誰訂的呢?
Mark心裡已經不是按照一般分析師的「資格」在想自己,它想的資格自成一套,或許他根本就是「沒格」(沒去想任何資格的事)!大部份的上班族都以為,「資格」就是自己本身的工作能力,或許是EQ或社交或人緣或語言能力…但其實,「資格」的定義根本就沒有絕對,我們真的需要的不是硬碰硬比「資格」,而是比「沒格」。
閱讀全文: http://mr6.cc/?p=8165
同時也有3部Youtube影片,追蹤數超過10萬的網紅EVALIN,也在其Youtube影片中提到,晚上八點首播!!我發現...我的vlogmas聖誕元素超少的,噗! - 小美人魚手機環 https://bit.ly/2KaKBh8 我的眼鏡 https://www.instagram.com/p/BgYfOmsgrDt/?igshid=zrwkg2tolw3p //////// 雅漾 活泉水 ...
「訂便當 excel」的推薦目錄:
- 關於訂便當 excel 在 Mr. 6 Facebook 的最佳解答
- 關於訂便當 excel 在 EVALIN Youtube 的最讚貼文
- 關於訂便當 excel 在 柴鼠兄弟 ZRBros Youtube 的最佳貼文
- 關於訂便當 excel 在 柴鼠兄弟 ZRBros Youtube 的精選貼文
- 關於訂便當 excel 在 [VBA ] 獻醜,簡陋的定便當Excel VBA - 看板Visual_Basic 的評價
- 關於訂便當 excel 在 More content - Facebook 的評價
- 關於訂便當 excel 在 excel訂餐系統的蘋果、安卓和微軟相關APP,MOBILE01 的評價
- 關於訂便當 excel 在 [心得] 我愛訂便當系統- chat82gether | PTT消費區 的評價
- 關於訂便當 excel 在 想問問新人時期會常幫大家訂餐嗎? - Mobile01 的評價
- 關於訂便當 excel 在 google表單後台在PTT/mobile01評價與討論 - 台鐵車站資訊懶 ... 的評價
- 關於訂便當 excel 在 google表單後台在PTT/mobile01評價與討論 - 台鐵車站資訊懶 ... 的評價
- 關於訂便當 excel 在 [VBA ] 獻醜,簡陋的定便當Excel VBA - 看板EZsoft - PTT數位 ... 的評價
- 關於訂便當 excel 在 [請益] 用戶訂購系統推薦- soft_job | PTT職涯區 的評價
- 關於訂便當 excel 在 我要訂便當(5): Heroku 填坑小記 的評價
- 關於訂便當 excel 在 [新聞] 幫訂便當遭嫌棄OL爆氣貼紙條嗆「再吵吃- Gossiping 的評價
訂便當 excel 在 EVALIN Youtube 的最讚貼文
晚上八點首播!!我發現...我的vlogmas聖誕元素超少的,噗!
-
小美人魚手機環 https://bit.ly/2KaKBh8
我的眼鏡 https://www.instagram.com/p/BgYfOmsgrDt/?igshid=zrwkg2tolw3p
////////
雅漾 活泉水
FreshO2 親研舒緩對策保濕原液
蘭蔻 超進化肌因大眼精粹
FreshO2 水到發亮保濕油Plus+
Eva x Jessica x FreshO2 親研系列介紹 https://bit.ly/2Lfagpk
ELIXIR怡麗絲爾 超澎彈小金管組
IPSA 極致粉凝霜
Ipsa 誘光隱色遮瑕
Solone 天生好手極細三角眉筆 02
PALLADIO 經典浪漫定型眉粉 PB03
Fresho2 公主眼影盤
Fresho2 小矮人腮紅 桃去哪裡
KATE 極致大眼睫毛底膏HP EX-1
KATE 綴影彩色眼線筆03
KATE 3D時尚眉彩膏 BR-3
KISSME 咖啡色濃密睫毛膏
Excel睫毛夾
蘭蔻 274
///////
❄️訂閱eva !!! http://bit.ly/2m7ZqUn
☃️看完影片後想跟我分享你的生活可以留言在下方,或是在instagram上tag @evalin555 or #showevalin 我就會看到囉
❄️follow更多eva的日常跟最新消息
INSTAGRAM: http://instagram.com/evalin555/
FB : https://www.facebook.com/kellywitheva
文字依法 BLOG: http://kellyeva.pixnet.net/blog
商業合作 Business Inquiries:[email protected]
♫ MUSIC TODAY♬
Music by Dylan Rockoff - Around You (O Christmas Tree) - https://thmatc.co/?l=F097BC5B
Music by Clueless Kit - How I Behave - https://thmatc.co/?l=DB8E1568
Music by ninjoi. - O, Christmas Beats - https://thmatc.co/?l=238AA48E
FTC: This video is NOT sponsored.
![post-title](https://i.ytimg.com/vi/oLqGIF3b-SA/hqdefault.jpg)
訂便當 excel 在 柴鼠兄弟 ZRBros Youtube 的最佳貼文
今年ETF的世界好熱鬧,各種新型態的ETF不斷在掛牌,成交量也爆高🤩但幾家歡樂幾家愁~今年底又有二檔ETF即將下市清算😱,但究竟是為什麼?ETF下市會跟股票下市有什麼不一樣?
✅這一集我們就用台股規模前20大 的ETF整理給你看,順便做個健康檢查,結果不小心發現很有”國民”潛力的一檔ETF🤣
❇️誰那麼厲害有15萬股民支持😃
❇️便當終究就是便當🍱
❇️注意代號有R-L-U的
❇️介紹一個很少被提到的官方免費網站
✴️台股ETF前20大excel表格下載連結
http://bit.ly/33gzgQD
✴️台股ETF前20大高清圖檔下載連結
http://bit.ly/34iIugl
➡️基本市況報導網站(ETF區)
https://mis.twse.com.tw/stock/etf_nav.jsp?ex=tse
➡️台灣股市資訊網
https://goodinfo.tw/StockInfo/index.asp
#ETF #流動性 #折價溢價
【不用花錢也可以贊助柴鼠】
https://youtu.be/DGV964Fks2s
【訂閱柴鼠也是一種鼓勵】
http://bit.ly/2INZTDI
【柴鼠兄弟相關頻道】
YouTube頻道 https://www.youtube.com/c/柴鼠兄弟ZRBros
FB粉絲頁 https://www.facebook.com/zrbros
IG https://www.instagram.com/zrbros/
【聯絡柴鼠】
e-mail:[email protected]
![post-title](https://i.ytimg.com/vi/v5s3JFA6UXQ/hqdefault.jpg)
訂便當 excel 在 柴鼠兄弟 ZRBros Youtube 的精選貼文
上次介紹過 #金融股 之後,很多小尾巴對官股金控💰很有興趣,但說到台股裡的官股可不只有金控,還有鋼鐵、食品、航運等等,很多公司可能你都聽過,但你可能不知道它們到底是不是國有民營事業?而且還有一些其實是很少被注意的國營事業金雞母,這一集柴鼠就繼續來跟大家介紹「#鐵飯碗類股」
▶️鐵飯碗概念股-Excel下載連結
(這個表真的是我們花很多時間和手工整理出來的😂,希望大家以後不要再買到壁紙了😂)
http://bit.ly/2RxXRzm
▶️Goodinfo台灣股市資訊網
https://goodinfo.tw/StockInfo/index.asp
夯翻鼠FQ ►ETF系列
【FQ11】ETF基礎篇-就是便當的一種https://youtu.be/HDz6xAbNQ70
【FQ12】ETF進階篇-槓桿型/反向型ETF https://youtu.be/y1WwEhg1fqk
【FQ15】0050 pk 0056選誰比較好?上集 https://youtu.be/I-D1GmzzRKc
【FQ16】0050 pk 0056選誰比較好?下集 https://youtu.be/UA_btOz4uho
【FQ17】從0056捕獲高股息不死鳥 https://youtu.be/hM3wemKQT-8
【FQ32】買反向ETF等黑天鵝?先聽鼠說完鬼故事再決定https://youtu.be/kKUjclzcurk
【FQ33】十大配息ETF排行~填息最快的不是0056 https://youtu.be/_j2HR9xUafY
【FQ37】0056最新成分股更新分析 新同學來了!
夯翻鼠FQ►台股基礎系列
【FQ30】股票怎麼買?600秒學完台股交易基礎 https://youtu.be/zEDJ7LBZO4M
【FQ31】股票1元不是你的1元~搞懂零股先從除權講起 https://youtu.be/R0NAdlmZ70s
【FQ2】存股一定打敗銀行定存?常被忽略的三個弱點和一個關鍵 https://youtu.be/kF6XomSRcUw
【FQ6】存股如何決定進場時機?2018台股萬點對新手的意義 https://youtu.be/9QxXoD3zTks
【FQ1】什麼是利率與殖利率? https://youtu.be/yd3fZRrjzGM
【FQ4】存股怎麼選?新手秒懂的放山雞選股法(基礎篇) https://youtu.be/854HH85QCdU
【FQ5】台股殖利率排行前三名是他們⋯放山雞選股法(網站實作篇) https://youtu.be/cY0P5fh-d9o
夯翻鼠FQ►儲蓄系列
【FQ29】從0%到5%保本儲蓄工具PK~(定存/外幣/儲蓄險/貨幣基金) https://youtu.be/H53540h21rA
【FQ23】利率明明一樣 定儲利息贏定存的原因~(正港懶人投資) https://youtu.be/W7k1TntmInk
【FQ3】匯率霧傻傻?先換起來放?錢被銀行默默吃掉的三個秘密 https://youtu.be/U8wLmL6PKnI
【FQ28】匯率表有隱藏數字@@” 高利外幣定存前先注意這三個率~ https://youtu.be/07NBkJNiHqs
【FQ21】投資理財必學的升息&降息~(央行vs美國聯準會FED) https://youtu.be/E64cTPnojWc
夯翻鼠FQ►台股進階系列
【FQ14】參加除權息可節稅?2018稅改股利申報二擇一制https://youtu.be/DDNZACHMDog
【FQ13】大牛不爽領股利?股票除權息的各種股民~https://youtu.be/Huyej6CHgFs
【FQ7】2018二月全球股災~黑天鵝是機器人? https://youtu.be/FlY7Ms53wyI
【FQ22】三大法人不是三個人啦XD~吻仔魚跟著鯨魚怎麼賺錢? https://youtu.be/2XOI0ipIML8
【跟著柴學FQ 做自己的提款機】
⭐️連續12週(4/2~6/24)蟬聯誠品書店財經/商業暢銷榜冠軍
⭐️博客來全館即時榜、商業書籍榜、7日/30日暢銷榜、新書排行榜冠軍
⭐️2020上半年MOMO網路書店暢銷榜Top7
🍎博客來 https://reurl.cc/8GnRXy
🍎誠品 https://reurl.cc/Kkj5lq
🍎金石堂 https://reurl.cc/z8zLp6
【不用花錢也可以贊助柴鼠】
https://youtu.be/DGV964Fks2s
【訂閱柴鼠也是一種鼓勵】
http://bit.ly/2INZTDI
【柴鼠兄弟相關頻道】
YouTube頻道 https://www.youtube.com/c/柴鼠兄弟ZRBros
FB粉絲頁 https://www.facebook.com/zrbros
IG https://www.instagram.com/zrbros/
bilibili https://space.bilibili.com/130090309
愛奇藝 http://tw.iqiyi.com/u/1421309132
【聯絡柴鼠】
e-mail:[email protected]
![post-title](https://i.ytimg.com/vi/B2aYC0XADto/hqdefault.jpg)
訂便當 excel 在 More content - Facebook 的推薦與評價
統計訂單小幫手】 無論是 中午訂便當 暖心下午茶☕ 秒殺團購 想快速統計訂單資料,請務必使用本篇技巧~ 讓團購主一目瞭然速速統計 ... 就用Excel省錢賺現金》. ... <看更多>
訂便當 excel 在 [心得] 我愛訂便當系統- chat82gether | PTT消費區 的推薦與評價
[心得] 我愛訂便當系統 ... 要轉讓,也不是要抱怨,是要跟大家分享怎麼訂便當:P http://tinyurl.com/5hduq7 ... 編制EXCEL的統計時間而且而且啊,說明很詳細快速上手 ... ... <看更多>
訂便當 excel 在 [VBA ] 獻醜,簡陋的定便當Excel VBA - 看板Visual_Basic 的推薦與評價
載點:https://yvesjing.miroko.tw/BadonVBA.xls
(聽說這空間只能外連到年底,反正到年底這文章也沉了沒差 XD)
說明:目前只有弄定便當並統計、隨機建議要定啥便當、清除所有資料,還有一些防呆
(不過這篇主要功能只是給人參考些函式基本用法 囧)
雖然不怎麼好用,但是是為了拿來練習一下VB = =||
不過由於偷懶,便當廠商跟菜單寫死的 XD
要新增可以,不過請自行放到 Sheet2 裡面並在程式碼裡面修改 XD
要用巨集必須將 [工具] -> [巨集] -> [安全性] 改成中或以下 @@
由於沒啥基礎,只是拿來練習用,所以函式用的蠻亂的,結構不良之類的就別鞭我了 Orz
下面簡單介紹怎麼進去Excel的VBA編輯畫面騙點P幣 ( ̄ε(# ̄) #○=(一-一o)
--
首先開啟 Excel
[工具] -> [巨集] -> [Visual Basic 編輯器],[滑鼠左鍵]單擊
在跳出Visual Basic 編輯器視窗中 [插入] -> [自訂表單],[滑鼠左鍵]單擊
然後就跟VB的介面差不多了 ( ̄▽ ̄#)﹏﹏
如果想要Excel開啟時就啟動先前設計的VBA
在Visual Basic 編輯器視窗中左上的[專案]視窗的[ThisWorkBook]上[滑鼠左鍵]點兩下
然後在[Book1 - ThisWorkBook (程式碼)]視窗裡貼上以下內容
Private Sub Workbook_Open()
UserForm1.Show
End Sub
[自訂表單] 一開始預設名稱應該是 [UserForm1],不是的話再自己改囉
--
不過第一次使用這東西當就出現很多問題了
一個是下拉式不方便看,也許以後改列表比較好
然後打電話時發現有些賣完了 =口=
要聯絡哪些人改餐很不方便,更OX的是有些還有漲價 Orz
總之一整個手忙腳亂 ˋ(′_‵||)ˊ
等哪天想不開再來改吧......
對了,如果有人想拿去修改玩玩 甚至交作業 的請自取,不用先徵得我同意
不要拿去賣 這種也賣不出去吧 XD 或宣稱原著就好了 (老師問例外 囧
附註:
本著作依據 Creative Commons 姓名標示-非商業性-相同方式分享 授權條款為授權
https://creativecommons.org/licenses/by-nc-sa/2.0/tw/
--
'補一下程式碼
Dim number As Integer
Dim total As Integer
Private Sub UserForm_Activate() '先載入點餐者名單與店家名稱等
number = 2
While Cells(number, 1) <> "" And Cells(number, 1) <> "共計"
number = number + 1
Wend
total = 2
While Cells(total, 6) <> ""
total = total + 1
Wend
Label2.Caption = "今天: " & Date & " 星期" & Weekday(Date)
ComboBox1.AddItem "老師"
For i = 2 To 31
ComboBox1.AddItem i - 1
Next
ComboBox1.AddItem "其他"
For i = 1 To 9
ComboBox2.AddItem Sheet2.Cells(1, i)
i = i + 1
Next
ComboBox3.Clear
End Sub
Private Sub ComboBox1_Change() '選學號後才可以點餐
If ComboBox2.Text <> "今天挑哪家呢" Then
ComboBox3.Locked = False
ComboBox3.Text = "菜單"
End If
If ComboBox3.Text = "菜單" Then
CommandButton1.Caption = "等候點餐"
CommandButton1.Enabled = False
CommandButton1.Locked = True
End If
End Sub
Private Sub ComboBox2_Change() '選店家名稱後載入菜單
ComboBox3.Clear
If ComboBox2.Text = "寬中港" Then
For i = 2 To 18
ComboBox3.AddItem Sheet2.Cells(i, 1) & Sheet2.Cells(i, 2)
Next
ElseIf ComboBox2.Text = "佳佳" Then
For i = 2 To 15
ComboBox3.AddItem Sheet2.Cells(i, 3) & Sheet2.Cells(i, 4)
Next
ElseIf ComboBox2.Text = "KISS快餐" Then
For i = 2 To 25
ComboBox3.AddItem Sheet2.Cells(i, 5) & Sheet2.Cells(i, 6)
Next
ElseIf ComboBox2.Text = "向陽樓麵食館" Then
For i = 2 To 30
ComboBox3.AddItem Sheet2.Cells(i, 7) & Sheet2.Cells(i, 8)
Next
ElseIf ComboBox2.Text = "鑫鮮園鐵板燒烤" Then
For i = 2 To 32
ComboBox3.AddItem Sheet2.Cells(i, 9) & Sheet2.Cells(i, 10)
Next
End If
ComboBox2.Locked = True
If ComboBox1.Text = "號碼?" Then
ComboBox3.Text = "請選擇號碼"
Else
ComboBox3.Locked = False
ComboBox3.Text = "菜單"
End If
CommandButton2.Locked = False
End Sub
Private Sub ComboBox3_Change() '點過餐才可以新增
If ComboBox3.Text <> "請選擇號碼" And ComboBox3.Text <> "菜單" Then
CommandButton1.Locked = False
CommandButton1.Enabled = True
CommandButton1.Caption = "確定新增"
End If
End Sub
Private Sub CommandButton1_Click() '將資料輸入表格並統計
Sheet1.Cells(number, 1) = ComboBox1.Text
Sheet1.Cells(number, 2) = Left(ComboBox3.Text, Len(ComboBox3.Text) - 2)
Sheet1.Cells(number, 3) = TextBox1.Text
Sheet1.Cells(number, 4) = Right(ComboBox3.Text, 2) * TextBox1.Text
number = number + 1
Sheet1.Cells(number, 1) = "共計"
Sheet1.Cells(number, 2) = ComboBox2.Text
Sheet1.Cells(number, 3) = "=SUM(C2:C" & number - 1 & ")"
Sheet1.Cells(number, 4) = "=SUM(D2:D" & number - 1 & ")"
For i = 1 To total - 1
If Sheet1.Cells(i, 6) = Left(ComboBox3.Text, Len(ComboBox3.Text) - 2)
Then
Sheet1.Cells(i, 7) = Sheet1.Cells(i, 7) + TextBox1.Text
Sheet1.Cells(total, 6).Clear
Sheet1.Cells(total, 7).Clear
GoTo OK
Else
Sheet1.Cells(total, 6) = Left(ComboBox3.Text, Len(ComboBox3.Text)
- 2)
Sheet1.Cells(total, 7) = TextBox1.Text
End If
Next
total = total + 1
OK:
End Sub
Private Sub CommandButton2_Click()
MsgBox (ComboBox3.List(Rnd * 100 Mod ComboBox3.ListCount))
End Sub
Private Sub CommandButton3_Click() '清空重新點菜用的
Sheet1.Range("A2:G32").Clear
number = 2
total = 2
ComboBox1.Text = "號碼?"
ComboBox2.Locked = False
ComboBox2.Text = "今天挑哪家呢"
ComboBox3.Text = "--"
ComboBox3.Locked = True
CommandButton1.Caption = "等候點餐"
CommandButton1.Enabled = False
CommandButton1.Locked = True
CommandButton2.Locked = True
End Sub
--
︴ 尼普藍得的守護靈 托那魯啊. ﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎
︴ 這裡有一位獲得你完整加護的勇士. ﹎﹎﹎﹎﹎﹎﹎
︴ 請你回顧記憶亞妮莉夏 美菈蓓死亡並立下誓約的瞬間, ﹎﹎﹎﹎﹎﹎﹎
︴ 這裡有證明你們存在的言語, ﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎
︴ 歐半婆羅 羅貝 易險 萊貝雅 ﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎﹎ ╔╕ ┌╥
︴ 現在開啟道路吧... ╘╝ └╯
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.126.52.79
※ yinjing:轉錄至看板 EZsoft 12/11 22:29
※ 編輯: yinjing 來自: 59.126.52.79 (12/11 22:32)
... <看更多>