如圖,我想實作 批量替換范圍數字為某一特定值 如 70——79替換為2.5
百度了一下,別人的方法一我做不出來,反正就是拖動不出來,能不能教一下如何實作?或者通過別的方法,如VBA Sheet.xxx

http://wenku.baidu.com/link?url=cN1viw_tzMtKN_GIPYMbITUV-DgT1FfFep1r0llGhxNkvDIy5YD8A9Czf4nkN_Tg8bLbpDbVba2Wwtsypns2nn0aWuEx15z1VwqKGQP3ohi
我是一個第一次嘗試編VBA的方法算平均學分績點的學習委員
搗鼓了半天,終于弄出來了:先把值替換(因為咱們學校算績點的機制不是 X-50再除以10)麻煩麻煩
然后VBA,編出了 學分乘以績點 的求和


然后再

所以呢,并沒有實作一鍵全部操作~歡迎大神們指導~多謝多謝!~ 記第一次用VBA求績點啊哈
uj5u.com熱心網友回復:
在Excel中開始記錄宏,手動完成所需功能,結束記錄宏,按Alt+F11鍵,查看剛才記錄的宏對應的VBA代碼。uj5u.com熱心網友回復:
sub test
dim Rngs as range,Rng as range
set rngs=sheet1.rrange('a3:h33")'''
for each rng in rngs
select case val(rng.value)
case 70 to 79
rng.value=https://bbs.csdn.net/topics/2.5
case 80 to 89
rng.value=https://bbs.csdn.net/topics/3
end select
next
end sub
uj5u.com熱心網友回復:
大概是那樣的,看著修改一下即可轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/66972.html
標籤:VBA
