1樓:匿名使用者
試試(詳見附件):
private sub worksheet_change(byval target as range)
on error resume next
x = [b3]
with sheets("表2")
n = .range("b65536").end(xlup).row
set p = .range("b3:b" & n).find(what:=x, lookin:=xlvalues, lookat:=xlwhole)
if not p is nothing then
arr = .range("c" & p.row).resize(1, 3)
range("c3").resize(1, 3) = arr
else
range("c3").resize(1, 3).clearcontents
range("c3").select
end if
end with
end sub
感覺你需要的是又是錄入又是查詢,這樣用裡邊的"excel_vba資料補充問題"
2樓:匿名使用者
先留個記號,沒人回答我再來!
用excel中vba編輯錄入模組,執行時發現「方法和資料成員未找到」
3樓:
userform1.text1.text這裡有面定義的名字沒有,找不到
不是userform1控制元件沒有就是text1控制元件沒有
4樓:匿名使用者
range("a2").offset(i, o).select 這句錯了,數字0 寫成了 字母o
另外,vba中控制元件的預設名字與vb中不同,注意區別:
.text1 ,文字框 預設的名字為 .textbox1
.combox1 ,複合框 預設名字為 .combobox1
給你優化了**:
---------------
private sub commandbutton1_click()
dim a, i
with worksheets("sheet1").range("a2")
for i = 1 to 65534
if .cells(i, o) = "" then
with userform1
a = array(.textbox1.text, .textbox2.text, .combobox1.text, _
.textbox3.text, .textbox4.text, .textbox5.text, _
.textbox6.text, .combobox2.text, .textbox7.text, _
.combobox3.text, .textbox8.text)
end with
.cells(i, 1).resize(1, 11) = a
exit for
end if
next i
end with
end sub
excel用vba如何實現動態錄入後,另存在另一個表,每次記錄按順序累計儲存在一張表內。
如何excel程式設計或者vba自動錄入資料並儲存 5
5樓:仙劍4之處
這個有點難!首先這個「所有人」就難住了。
聽說過人用excel實現同時錄入,不過搞這個應該很難吧
6樓:匿名使用者
問一下,你用的是什麼資料庫?
菜鳥請教,如何用excel vba 編寫一段巨集實現資料的輸入功能?
EVIEWS如何錄入資料
先新建workfile,然後在上面的對話方塊裡面打dataxy z.xyz可以用相應的變數名字替換 然後就可以從excel中複製進去,如果不能輸入,點一下上面一排的edit 可以進行修改。1 對於季度資料的輸入,當按季度計算遇到的資料時,使用季度資料執行時間序列分析。在主視窗中,輸入create,彈...
ExcelVba如何把表裡的資料放入另表裡相應的單元格
參考vlookup公式的用法 圖例是要對d2輸入對應的數字,解釋 vlookup a a,h k,2,0 的含義 vlookup 接收4個引數,回圖中分答 別是a a,h k,2,0。a a代表以第一列為要查詢的值,h k代表搜尋的範圍是h列到k列,2代表取出h k列中的第二列 左起 因為d2這個單...
金蝶軟體初始資料錄入,以前沒建賬,初始資料填什麼啊
1 首先單擊桌面 kis 標準版圖示,顯示出登入介面,單擊 新建賬套 2 並選擇對應的儲存路徑儲存此賬套。4 單擊 下一步 進入定義記賬本位幣介面,可以根據企業實際情況定義記賬本位幣。5 單擊 下一步 進入如下圖所示介面,科目 結構的定義直接影響建賬以後明細科目的新增。科目 結構為 4 2 2 2 ...