[VBA ] 近期寫EXCEL VBA心得及程式被同事看

[t8810039 (琦)]

[VBA ] 近期寫EXCEL VBA心得及程式被同事看

因主管交代一項工作 每天匯入資料到EXCEL後,執行主管寫的很繁複的操作指引
也就是一大堆的 表切換 複製 貼上 及貼上值 調整欄高 排序
判斷字串及日期 加以刪除等等

我第一次看著做 完全做不下去 快發瘋

一開始發現有錄製巨集功能
後來不夠用 上網找指令
終於找到了 下面兩個

Range(Cells(AdjustColumnEnd, StartColumn), Cells(AdjustColumnEnd,
EndColumn)).Select

ActiveWorkbook.Worksheets("清單").Sort.SortFields.Add Key:=Range("L2:L" &
lastrowA) _
        , SortOn:=xlSortOnValues, Order:=xlDescending,
DataOption:=xlSortNormal

因巨集沒有設密碼及隱藏,程式差不多寫好時,某日下午
瞄到同事似乎印出了我的程式,還拿螢光筆畫重點
為了確認,到印表機一看,果然還放了一張印有我的程式的A4紙
對於同事行為 我覺得很不爽

之後有次他還跟我說 我那程式是用錄巨集的
明明很多地方不能錄巨集 要寫程式的 被他這樣講

我和他一個互輪 一人做一星期
我現在用程式巨集就可以做好主管交代的excel
他約要花一小時 且因是手動做 我檢查到他常出錯

巨集現在已設密碼及隱藏
且該同事因諸多原因 與我交惡中

但我已沒有要和他鬥的心態了

先打到這

也謝謝Range(Cells.Cells).Select
的指令也是在版上找到的




--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 223.136.121.65
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1444364110.A.7F6.html
※ 編輯: t8810039 (223.136.121.65), 10/09/2015 12:17:01
推 troylee: 其實大家分享一下如何有效率的完成工作 對團隊比較好
→ troylee: 事事都留一手對誰都沒好處 畢竟上班時間寫的東西
→ troylee: 都算是公司的財產 不是員工的
→ t8810039: 之前line跟他說有興趣來問我，不來問。
→ t8810039: 最早我在寫的時候，跟我說，不用去寫程式，主管沒說要寫
→ t8810039: 程式。
→ t8810039: 不過，謝謝你的意見。
※ 編輯: t8810039 (223.136.121.67), 10/10/2015 16:32:11
※ 編輯: t8810039 (223.136.121.65), 10/10/2015 19:26:34
※ 編輯: t8810039 (223.136.121.65), 10/10/2015 19:26:48
→ gundan: 你可以去跟主管講你做了這個，至少功勞不會先被搶走
推 mraaa: 去跟主管講+1。說不定主管覺得你的方法好，自己做就可以，
→ mraaa: 讓你再去替別人做些簡化流程的工作。你就會慢慢變得不可取
→ mraaa: 代！
推 Falagar: 樓上讓人嚇一跳.....不可取......................代!
推 mraaa: XDD....正好就被切掉了！
推 alice78226: 就大方分享吧!有很大的可能性是妳給他看他也看不懂！
推 johnpage: 感覺不是分享問題，而且對方不禮貌惹惱樓主
→ johnpage: 其實程式給他看應該沒問題
→ johnpage: 除了公司要賣錢的程式，其他我都是公共給其他人copy
謝謝大家回應
上面有提 之前LINE跟同事說對我寫的程式有興趣 來問我
他完全沒回應我 然後之後把程式印出來 還畫重點
後來跑來跟我說 什麼我程式用巨集錄的
我說你貶低我程式 不可能完全錄巨集
我有寫程式 他才說什麼跟我道歉

覺得同事幼稚又目中無人
另外再強調一次 當初我花時間寫 他就跟我說 不用去寫程式啊 主管沒叫我寫
那現在他種種的行為 算什麼?不是叫我不用寫嗎?
好在我當時沒受他影嚮 堅持寫程式

另再次強調 同事看操作指引叫 做出來的常常有問題
例如一個或數個步驟漏做

老實說也不怕他學 這同事無法靜下心寫程式的
也靜不下心去學





※ 編輯: t8810039 (61.228.37.130), 10/17/2015 10:03:28
推 gundan: 其實真的不用管他 他對你的職涯一點影響都沒有
→ gundan: 就大方分享出來 然後給你的老闆知道吧
哈哈 謝謝gundan給的建議  那我會分享出來
好像也真的是對職涯一點影響都沒有

其實我也喜歡上了在工作時間寫程式 相對於做一些雜事 及開會啦 人際關係

只是那時心中會CARE這同事沒禮貌

有關於讓主管知道:
在我認為程式寫完時 就已經由程式來執行
但後來 與同事手動做的比對 有些大小錯誤 也就是捉到了BUG
後來程式陸續有修改

所以有段時期製作出來的EXCEL是有些問題的
理論上現在也可花時間 用沒有BUG的程式重新產生EXCEL

若我現在和主管說我開發了這個程式 之前有段時期做出來的EXCEL是有些問題的
這好像不好跟主管說
但我覺得是必要之惡 開發程式期間都會有BUG~

※ 編輯: t8810039 (61.228.37.210), 10/23/2015 21:57:03
→ makeabomb: 自己程式自己寫
→ t8810039: ?
→ m9556: 給你一個方向~用增益集~程式放在自己電腦,資料沒有程式
→ m9556: 就算你用密碼鎖~用openoffice一樣看光光~
→ t8810039: 謝謝，結果同事調別組了。
→ t8810039: 及同事因健檢 視網膜破損，請假就醫。