返回列表 上一主題 發帖

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

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

        靜思自在 : 人的眼睛長在前面，只看到別人的缺點，絲毫看不到自己的缺點。
返回列表 上一主題