返回列表 上一主題 發帖

[發問] 查詢資料後修改變更

[發問] 查詢資料後修改變更

請問當我B資料查詢A資料資訊後
修改B資料內容可以更改A資料資訊內容,應該怎樣寫
如附件
謝謝
AAA.rar (27.64 KB)

回復 1# 霸氣走全身
  1. Sub repair()
  2. Dim r, s
  3.     For r = 2 To Sheets("查詢").[C65536].End(xlUp).Row
  4.        For s = 2 To Sheets("號碼").[A65536].End(xlUp).Row
  5.          If Sheets("號碼").Cells(s, 1) = Sheets("查詢").Cells(r, 3) Then
  6.            Sheets("號碼").Cells(s, 16) = Sheets("查詢").Cells(r, 18)
  7.          End If
  8.        Next
  9.     Next
  10. End Sub
複製代碼

TOP

謝謝大大解答

TOP

想請問各位高手
如果這一個檔案有2個"號碼"的工作表它的程式會抓2次ㄟ
為啥阿.只要有相關資料都會抓出來
可以只抓固定工作表嗎?

TOP

同一個問題
如果這個檔案有只到說查詢後作修正可以覆蓋過去
不過有向只固定欄位
如果我想要不管哪一個欄位都可以修正後更新應該怎麼做

TOP

太好了 剛好也遇到一樣的問題
有範例可以參考

TOP

        靜思自在 : 【時間無法遮擋】怕時間消逝,花了許多心血,想盡各式方法要遮擋時間,結果是:浪費了更多時間,且一無所成!
返回列表 上一主題