作者: duckedog 時間: 2019-4-24 11:30 標題: VBA 應該簡單料一問
公司有新舊Fixed Assets
我想用VBA搵出邊D係新既
但點解行唔通?
唔比我過?
可以的話幫我望望得嘛?
例子果個Excel
https://drive.google.com/file/d/ ... lR/view?usp=sharing
圖片附件: Question for HKEPC.jpg (2019-4-24 11:25, 140.38 KB) / 下載次數 194https://www.hkepc.com/forum/attachment.php?aid=2122236&k=a45df5fea604c733b8d5b7185b7e7778&t=1781099829&sid=KIgE306g0E
圖片附件: Question for HKEPC 2.jpg (2019-4-24 11:27, 67.34 KB) / 下載次數 146https://www.hkepc.com/forum/attachment.php?aid=2122240&k=bf9ff9815dc7ecc45dea42cf06e52bb6&t=1781099829&sid=KIgE306g0E
作者: duckedog 時間: 2019-4-24 11:41
簡單啲講
第一行係等於1或0
我想搵出所有係0果行，然後將0果行成行copy去另一頁
但我唔識呀
via HKEPC Reader for Android
作者: hk8guy 時間: 2019-4-24 11:57
如果要利用countif, 你可以set filter, 只要countif=0, 然後copy 成個column去新worksheet度
作者: duckedog 時間: 2019-4-24 14:25
幹!! 係喎, 咁樣咪搞到囉
點解我諗唔到咁白痴
咁應該OK既
但都想學下野
如果有人知道我最後條式錯乜
其實我都想知
via HKEPC Reader for Android
作者: hk8guy 時間: 2019-4-24 15:52
幹!! 係喎, 咁樣咪搞到囉
點解我諗唔到咁白痴
咁應該OK既
但都想學下野
如果有人知道我最後條式錯乜
其實 ...
duckedog 發表於 2019-4-24 14:25
其實唔係好睇得明你最後果part, x 係row number, 你將佢變成column number y, 不過Column(y)好大機會係空白
作者: myricky 時間: 2019-4-24 19:23
提示: 作者被禁止或刪除 內容自動屏蔽
作者: duckedog 時間: 2019-4-24 23:27
師兄，我聽日返工去參詳下
唔該哂你呀
其實我咦家都係初哥
用下錄制，上網搵下睇下
如果我有心搞Excel VBA
你覺得我應該睇咩？
借VBA既書？Macro?
其實唔知從何入手
via HKEPC Reader for Android
作者: myricky 時間: 2019-4-25 09:52
提示: 作者被禁止或刪除 內容自動屏蔽
作者: duckedog 時間: 2019-4-25 10:54
回覆 duckedog
好簡單姐, 幾句code搞掂:
Sub findrepeat()
Dim lastyr(50000)
Application.ScreenUpda ...
myricky 發表於 2019-4-24 19:23
個Excel下載唔到~
唔該師兄
作者: myricky 時間: 2019-4-25 11:26
提示: 作者被禁止或刪除 內容自動屏蔽
作者: duckedog 時間: 2019-4-25 14:06
下載到喇, 不過其實我想做既
係成行NEW Copy去個新Sheets度
我唔識點樣將成行Copy過去
事實上個Excel其實係咁
https://drive.google.com/file/d/ ... 8v/view?usp=sharing
作者: duckedog 時間: 2019-4-25 14:06
點都好, 唔該哂你先呀~ 你好有心
作者: myricky 時間: 2019-4-25 14:40
提示: 作者被禁止或刪除 內容自動屏蔽
作者: myricky 時間: 2019-4-25 15:42
提示: 作者被禁止或刪除 內容自動屏蔽
作者: duckedog 時間: 2019-4-25 16:05
你想咁搬, 其實唔洗寫VBA喎, 因為FA register一定有購買日子, 只要你sort左日子, 咪可以直接將>=2019年1 ...
myricky 發表於 2019-4-25 14:40
成件事好複雜
佢係有個日子. 但個日子係購買日期
而哩個日子, 就算係今年買, 但我地都唔會當係NEW
我地係計"Date Placed in Service"
件野幾時拎出黎用
有時件野一早買左, 但放左係度十幾年
到今年至拎出黎用, 佢就會係今年FA出現
但個日子係2009年, 我地都會當佢係新
所以我地只能將兩年既FA 找不同
Sorry ar 自己既工作麻煩到大家
我只係想學下野
試下點樣將上年無既項目搵出黎
再成行COPY
諗到係A行 用countif = 0 代表新野
我已經覺得自己好叻
但點樣將A行有0字既, 成行copy
google左好耐都搵唔到
via HKEPC Reader for Android
作者: duckedog 時間: 2019-4-25 17:18
Sub findrepeat()
Application.ScreenUpdating = False
Worksheets("2019 FA").Activate
FA19row = Cells( ...
myricky 發表於 2019-4-25 15:42
師兄，THAT is what I WANT！
完全係我想要既野
我由10點幾諗到咦家
乜都諗唔到
仲研究緊咩係
Range( "A" & I)
I+1咁loop
搞一左大版野都做唔到
你幾行野就得
我慢慢再研究下你做左啲乜先
唔該哂你呀，好想學
via HKEPC Reader for Android
作者: myricky 時間: 2019-4-25 17:20
提示: 作者被禁止或刪除 內容自動屏蔽
作者: duckedog 時間: 2019-4-25 17:39
回覆 duckedog
你睇下新既code同file係咪想要既結果.
myricky 發表於 2019-4-25 17:20
絕對係我想要既野
但比小小時間我去消化下
因為每次見到一堆例子，當中有唔識既就去查
要小小時間去理解做緊乜
每行都google緊
就放工，聽日再努力
唔該哂你呀師兄
via HKEPC Reader for Android