iT邦幫忙

0

比較一樣卻沒有值

  • 分享至 

  • xImage
 Sheets("異動檔資料").Activate
   For i = 2 To Range("A2").End(xlDown)      
   'A2到這個月的空白欄位的數字
    For j = 63 To Range("A64").End(xlDown) 
    'A64到上個月累計的空白欄位的數字
   If Cells(i, "A") = Cells(j, "A") And Cells(i, "B") = Cells(j, "B") Then 
   '若工項及工程地點一樣
      Cells(i, "R") = Cells(j, "Q")
  End If
  Next
 Next

圖片一
https://ithelp.ithome.com.tw/upload/images/20190426/20114436m3RxSEROjZ.png
圖片二
https://ithelp.ithome.com.tw/upload/images/20190426/20114436mr0RlBD8vu.png
圖片三
https://ithelp.ithome.com.tw/upload/images/20190426/20114436pM9dxSrH2H.png
卻像圖片3沒有值
是為呵呢

在VBE裡面按`Ctrl+G',打
Range("A3")=Range("A63") AND Range("B3") = Range("B63")
看看會不會True?
圖片
  直播研討會
圖片
{{ item.channelVendor }} {{ item.webinarstarted }} |
{{ formatDate(item.duration) }}
直播中

2 個回答

0
小魚
iT邦大師 1 級 ‧ 2019-04-26 16:52:42

檔案可以傳給我幫你看看
henrychang0202@gmail.com

0
paicheng0111
iT邦大師 5 級 ‧ 2019-04-26 22:22:32

在VBE裡面按Ctrl+G,打開即時執行視窗
輸入

Range("A3")=Range("A63") AND Range("B3") = Range("B63")

看看會不會是True?

我要發表回答

立即登入回答