I have an Excel workbook that has a routine that was developed by one of the Experts here on Experts Exchange. In each of the 20 ranges - it loops through and finds the 2 highest and 2 lowest values from sheet(KEYDATA) and copies those values to sheet1.
However, I need to make one change where I need assistance:
13) - I need to use the absolute value of the cells in the range then find the 2 lowest values and the 2 highest values to copy to sheet1.
I am attaching the workbook to help assist.
The routine is in module 1 called GetMinMax that sorts and identifies the cells to copy.
As you read the code - you will see that I will use the following criteria to place the identifed absolute values from range("x3:x13) into sheet1.
wksh.Cells(trn, 2) = maxs1
wksh.Cells(trn, 3) = max1
wksh.Cells(trn, 5) = maxs2
wksh.Cells(trn, 6) = max2
wksh.Cells(trn, 9) = mins2
wksh.Cells(trn, 10) = min2
wksh.Cells(trn, 12) = mins1
wksh.Cells(trn, 13) = min1
Any assistance to add additonal code to use absolute values for this range will be very helpful.