幾種用vba在單元格輸入資料的方法
officefans
這是試寫的vba的課程 vbalesson1,希望各位給予意見,以便以後改進。
程式說明:
幾種用vba在單元格輸入資料的方法:
public sub writes()
1-- 2 方法,最簡單在 "[ ]" 中輸入單元格名稱。
1 [a1] = 100 '在 a1 單元格輸入100。
2 [a2:a4] = 10 '在 a2:a4 單元格輸入10。
3-- 4 方法,採用 range(" "), " " 中輸入單元格名稱。
3 range("b1") = 200 '在 b1 單元格輸入200。
4 range("c1:c3") = 300 '在 c1:c3 單元格輸入300。
5-- 6 方法,採用 cells(row,column),row是單元格行數,column是單元格欄數。
5 cells(1, 4) = 400 '在 d1 單元格輸入400。
6 range(cells(1, 5), cells(5, 5)) = 50 '在 e1:e 5單元格輸入50。
end sub
你點選任何單元格,按 selection 按鈕,則則所點選的單元格均會被輸入文字 "test"。
public sub selection1()
selection.value = "test" '在任何你點選的單元格輸入文字 "test"。
end sub
"**本程式的方法:
粗體文字為程式,其它字型均為說明文字。
按快捷鍵 alt+f11即可看到程式。"
附件: vbalesson1
VBA 錄入資料後單元格自動保護
在excel中 審閱 保護工作表 可以選擇對工作表進行保護,下面的 可以用於對輸入內容的單元格進行保護 private sub worksheet selectionchange byval target as range on error resume next 出錯誤之後向下執行 sheet1....
VBA之單元格操作2 篩選拆分資料
有這樣乙個資料表,現在想把d列的車間所在的每一行資料,複製到其他對應的工作表裡,用vba如何去實現呢 sub chaifen dim i,j as integer for i 2 to range a65535 end xlup row j sheets sheet1.range d i value...
Excel 通過VBA高亮選擇單元格的行列
wps有乙個比較有意思的功能叫十字游標,就是可以亮顯選擇單元格的行列,資料量比較多的時候可以方便檢視資料,可惜excel原生並沒有類似的功能,網上搜尋了一下,發現可以通過vba完成類似的功能,便嘗試了一下。思路是通過vba獲得選擇區域的行與列,在行列中新增條件格式,通過條件格式改變行與列單元格的填充...