Posts by sekar_r24


    is it possible to filter each unique value, say a1, and copy the corresponding filtered values, sum up the values.

    Similarly all the values a2, a3, and a4 are filtered out and copy their corresponding values and sum up..?

    How to iterate the values a1, a2, a3 and a4 in autofilter criteria?


    i am trying to copy & paste the range of columns to two columns with specified criteria., Attached herewith the code so far.

    the table consist of 6 columns. the first four columns are code nos with corresponding value in the last two column. i am trying to populate the following.

    1. first column to be placed in a certain location.
    2. the second column to be placed below the first column.
    3. the third column below the second column
    4. the fourth column below the third column.
    5. The value in the fifth column to be placed next column of the first column placed in
    6. the same value is placed again below the values pasted in the
    7. The value in the sixth column to be placed below the
    8. the same value (sixth column) is placed again below the values pasted in the

    the code i tried below, able to achieve upto


    i am having a column (assume in B Column) with values of different string. I would like to find out string in the range ex: _formatversion = 1.0 and shift 3 rows down wherever the occurrences are found. i tried this below code. but unsuccessful.

    Could anyone help.


    I am trying to create name list for a column. my values are in Column A up to 10 rows, i would like to assign name in B column corresponding rows. For ex: for LenZ in R1C1, the list name in R1C2, should be LenZ ( ie same name). i tried a lot but unable to increment the R1C1 value. Can anyone help on this.

    Sub kre3()
    Dim rw As Integer, cl As Integer
    rw = 1
    cl = 2
    If rw = 10 Then    ActiveWorkbook.Names.Add Name:=Cells(rw, 1), RefersToR1C1:="=Sheet1!R[" & rw & "]C[" & cl & "]"
    rw = rw + 1
    End If End Sub