Board logo

標題: excel vba問題 [打印本頁]
作者: speed    時間: 2016-5-4 21:35     標題: excel vba問題

IMG-20160504-WA0003.jpg

我想做到圖中效果,成句vba應點寫

圖片附件: IMG-20160504-WA0003.jpg (2016-5-4 21:34, 131.07 KB) / 下載次數 67
https://h2.hkepc.com/forum/attachment.php?aid=1886444&k=55b3eaca6378fa8ff1a01e91c8369777&t=1783255350&sid=48571Jn1F9

作者: C_Law    時間: 2016-5-5 15:44

Col A 本身已經排序？

大概是這樣：(ps.我無真係 Check 過)
  1. dim myRow as integer
  2. myRow=3
  3. do
  4.   if cells(myRow,1)=cells(myRow-1,1) then cells(myRow,2)=cells(myRow-1,2)
  5.   myRow=myRow+1
  6. loop until(cells(myRow,1)="")
複製代碼




歡迎光臨 電腦領域 HKEPC Hardware (https://h2.hkepc.com/forum/) Powered by Discuz! 7.2