返回列表 上一主題 發帖

[發問] 寫判斷式如果跳脫用的數值要從原始資料中抓取該如何是好

koo

帖子
60 
主題
4 
精華
0 
積分
64 
點名
0  
作業系統
w7-32 
軟體版本
2013.2003 
閱讀權限
20 
註冊時間
2014-11-23 
最後登錄
2016-6-6 
1# 跳轉到 »
發表於 2015-6-20 07:09 | 顯示全部帖子
'不太會看程序請參考一下
Sub xx()
lastrow = [A65536].End(xlUp).Row  ''判斷最後一列
For j = 1 To lastrow
xr = Cells(j, 1)
    For i = 1 To xr
        Cells(i, 4) = Cells(i, 4) / xr ''用自己除
    Next
Next
End Sub

TOP

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