Posts by BadBunny

    Good morning, the SSN column is only the last 4 digits of the SSN, so i need it to stay as a text format other wise if the last 4 of the SSN has a "0" in a general format it would be removed. example the number could be 0045 or 0450 or 0677 etc. in this cases it would remove all the zeros and keep the higher digits starting from 1 and above. again all this is on header15


    Assignment group Catalog Task Request Created User status Epic Access User Transferring Effective Date User ID Requested for Last name First name Middle Initial DOB SSN

    Thank you all for the help


    KjBox - i like this. all is working how i wanted to the only thing is that i need to keep the SSN column as a text format with the 4 last digits. for the reason that they are some that start with a zero or end with a zero.


    Thanks

    this is my current code:




    I have tried that and still will not convert the data.


    Set objCell = objWksh.Cells(CurrentRow, 16)

    With Selection

    .NumberFormat = "General"

    .Value = .Value

    End With


    also tried

    Set objCell = objWksh.Cells(CurrentRow, 16)

    With objCell

    .NumberFormat = "General"

    .Value = .Value

    End With


    i tried multiple ways but the numbers do not change from text format to general format


    here is an example data sheet i am using


    Assignment group Catalog Task Request Created User status




    Last First
         Data convert to number








         63683














    63683

    I am trying to change the text format from a text cell to a general format cell i currently running a FOR NEXT loop.


    this is what i currently have but its not making any changes,


    Set objCell = objWksh.Cells(CurrentRow, 16)

    With objCell.Select

    objCell.Replace.NumberFormat = "General"

    objCell.Replace.Value = .Value

    End With


    any thoughts