1樓：牛星星兒
在你使用的sheet的selectionchange事件中寫入以下**即可
private sub worksheet_selectionchange(byval target as range)
dim i as integer, j as integer, k as integer, a as single
i = target.row: j = target.column
a = cells(i, j)
for k = 1 to 100
cells(i + k, j) = a + rnd * 100 + 1 '(rnd * 100 + 1)其實就是（rnd * (100-1+1) + 1）
next
end sub
樓上的迴圈了100次，我也就迴圈100次算了。截圖中我用的sheet3
有問題可以hi我
2樓：
lustre_chan:
sub ddd()
dim i as integer
with sheets("sheet1")for i=1 to 100
cells(i+1,j).formula="=range()*100+cells(i,j)"
next
end sub
excel中vba引用問題
3樓：綠衣人敲門
舉例：excel2007
開啟vba編輯器
依次單擊office按鈕，然後選擇「excel選項」：
單擊「常用」，然後勾選「在功能區顯示『開發工具』選項卡」，然後單擊「確定」：
使用vba編輯器
右擊需要插入**的表，如，本文要達成的目標是單擊乙個按鈕，然後實現對b列3-11單元格的成績進行等級評定。假設要實現目標的資料位置在sheet1上，則右擊sheet1，依次單擊「插入，模組」，即可開啟**輸入框：
sub 評定等級()
dim i as integer
for i = 3 to 11
t = sheets(1).cells(i, 2).value '取得成績
if t >= 90 then
j = "a"
elseif t >= 80 then
j = "b"
elseif t >= 70 then
j = "c"
elseif t >= 60 then
j = "d"
else
j = "e"
end if
sheets(1).cells(i, 3) = j
next
end sub
依次單擊「開發工具，插入，按鈕」：
在合適的位置直接左鍵拖出乙個按鈕，在彈出的「指定巨集」對話方塊裡面選擇「評定等級」，然後單擊「確定」：
單擊剛新增的按鈕「按鈕1」：
按下按鈕之後，即可在c列對應的**裡面顯示成績等級，如下：
4樓：
ado連線97-03版本和07版本的connection string不同。至於引用哪個，一般引用最高版本的就可以了
public sub link() 『03版
filestr = thisworkbook.path & "\" & "mx-monthly report.xls"
'set cnn = createobject("adodb.connection")
with cnn
.provider = "microsoft.jet.oledb.4.0"
.connectionstring = "data source=" & filestr & ";" & _
"extended properties=excel 8.0;"
.open
end with
end sub
public sub link2() 』07版
filestr = thisworkbook.path & "\" & "mx-monthly report.xlsx"
'set cnn = createobject("adodb.connection")
with cnn
.provider = "microsoft.ace.oledb.12.0"
.connectionstring = "data source=" & filestr & ";" & _
"extended properties=excel 8.0;"
.open
end with
end sub
5樓：匿名使用者
microsoft activex data object 2.8
6樓：匿名使用者
這個問題問得好，我也經常被他困擾
excel直接引用，絕對引用和相對飲用的區別
excel單元格的引用包括相對引用 絕對引用和混合引用三種。絕對引用 單元格中的絕對單元格引用 例如 f 6 總是在指定位置引用單元格f6.如果公式所在單元格的位置改變，絕對引用的單元格始終保持不變。如果多行或多列地複製公式，絕對引用將不作調整。預設情況下，新公式使用相對引用，需要將它們轉換為絕對引...
excel中的絕對引用的作用是什麼
絕對引用 當公式或函式複製到其他單元格式行和列不會隨著變化。絕對引用需在加 比如在單元格b1中輸入公式 a 1 1，拖拽到b2時他的公式就還是 a 1 1。拓展 1 絕對引用 單元格中的絕對單元格引用 例如 a 1 總是在指定位置引用單元格。如果公式所在單元格的位置改變，絕對引用保持不變。如果多行或...
ecel中絕對引用是怎麼用的，Excel中絕對引用是怎麼用的？
娛樂休閒談天論地 工具 材料 excel 1.本例使用九九乘法表的方式來學習絕對應用的使用，我們先輸入一行 一列資料 都是從1到9。2.計算第一個結果，很簡單，就是在b2第一個輸入 a2 b1，只進行這個計算是沒錯的。3.把剛才的公式橫著向右拖動，公式中的引數就會自動安裝預設的規則變化。例如c2中的...