As shown in figure, I want to realize batch replacement Numbers for a particular value, such as the range of 70-79 to replace 2.5
Baidu once, method one I do not to come out, others is to drag out anyway, can you teach me how to do? Or by other methods, such as VBA Sheet. XXX

http://wenku.baidu.com/link? Url=cN1viw_tzMtKN_GIPYMbITUV - DgT1FfFep1r0llGhxNkvDIy5YD8A9Czf4nkN_Tg8bLbpDbVba2Wwtsypns2nn0aWuEx15z1VwqKGQP3ohi
I is a first attempt to weave the VBA method to calculate the average credit grade point of learning committee of me along while, finally out:
The value to replace first (because of our school is grade point mechanism not divided by 10 X - 50) trouble trouble
Then VBA, make up the credits multiplied by the summation of gpa


Then


So, a key to achieve no overall operation ~ welcome to the great spirit guide ~ thanks! Grade point aha ~ remember the first time to use VBA o

CodePudding user response:

Began keeping records in Excel macro, manual, complete the required function end record macros, press Alt + F11 key, check just record macro corresponding VBA code,

CodePudding user response:

 sub test 
Dim Rngs as range, Rng as range 
A3: set RNGS=sheet1. Rrange (' h33 ") "' 
For each RNG RNGS in 
The 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 the select 
Next 
End sub 

CodePudding user response:

Probably so, look at change