1樓：香格里拉稻草人
private sub worksheet_change(byval target as range)
if target.column <> 1 or target.count > 1 then exit sub
a = range("b1:c" & [b65536].end(xlup).row)
d = target: s = target.address
for i = 1 to ubound(a)
if d = a(i, 1) then range(s) = a(i, 2)
next
end sub
2樓：姓王的
在所在工作表的**區貼上以下**可滿足你的要求。
private sub worksheet_change(byval target as range)
dim ra as range
if target.column = 1 and target.count = 1 then
set ra = columns("b").find(target)if not ra is nothing then target = ra.offset(0, 1)
end if
end sub
在EXCEL中查詢A列為某值同時B列為另一值時對應的C列的值
a b c 三列存放資料 在e2中，輸入你科目 英語 f2中輸入姓名 丁 在g2中輸入如下公式 lookup 1,0 a a e2 b b f2 c c 在g2中就顯示你要查詢的成績值了。如果有多列，則在e，f列中輸入多個。把上面g2中的公式往下拖動複製就好了。如果只查詢一個。也可以這樣 在你想存放...
粵B1B284這個車牌值多少錢
不值幾個錢，只值上牌錢。交通法關於臨牌和試驗用車牌照有什麼區別 根據公安部 機動車登記工作規範 試驗用車牌照屬於臨時牌照的一種。臨時牌照主要包括 本地臨牌 異地臨牌 試驗車臨牌 特種車輛臨牌。試驗車臨牌與其他臨牌的區別在於 1 樣式不同，例如本地臨牌為天藍底紋黑字黑框線 異地臨牌為棕黃底紋黑字黑框線...
b 3a ab 0,求a 2b的最小值
b 3a ab 0 a b b 3 1 3 b 3 a 2b 2b 1 3 b 3 設f b 2b 1 3 b 3 f b 2 3 b 3 2，由f b 0，解得 b 3 6 2為駐點 若 b 3 6 2 a 2b 2b 1 3 b 3 2 3 6 2 1 3 6 2 7 2 6 若 b 3 6 2...