VBA swapping rows - text turning to numeric problem

[LewisBosworth]

Hi everyone, hope all are safe.

I have an app that is essentially a form, where 20 rows hold data regarding employees. Occasionally the user has to remove an employee and move an employee into that row (and associated data). So I decided to put 20 radio buttons representing the "From" row and 20 radios representing the "To" row, so the user could simply check one from each and the code would move the records from the first row into the second row, then remove the records from which it came. Cells A30 and B30 provide the row numbers. The basic code looks like this (but there are actually around 140 associated fields)...

The problem I'm having is G and H are text fields, while the rest are numeric. But, when it copies to the new row, both G and H show the value of F. H is a select box, but still text. I've searched online for this but I keep getting the standard answers about making a cell equal another one. This issue seems to be a one-off. I would have searched this forum, but honestly expect to find similar answers and not get resolution. So, I'm here with a couple questions.

Why is my text transfer not pasting text, but grabbing the last value to the left? Does that mean my variable isn't being replaced with the text and therefore continuing the most recent value? Seems reasonable, but what's the fix.

Also, you'll immediately see I'm doing one field at a time. Is there a way to apply this to a range?

Any consideration is appreciated. Have a great weekend all. Be safe out there.

[mjr veverka]

sorry for possible misapprehension
was it about this ?

[LewisBosworth]

Thank you for the reply.

It doesn't seem to do what I need. With your illustration(workbook), I would pick the values of A30 and B30 via radio buttons. When invoking the "run" with a button, it would transfer the data from row number found in A30 and transfer to the row number found in B30. The code I have does this. However, and again using your illustration, if for example I choose to move row 2 to row 3, the text in column's G and H populate with the numeric value found in column F. I don't understand why it's doing this. My fields are formatted correctly. I thought I declared the variable correctly, and even declared another variable to account for text. I don't know enough about VBA to say, but it seems that when the text variable is capturing the value in the cell, it can't read it and decides to keep the previous value and paste that instead. Still struggling.

[jindon]

The problem I'm having is G and H are text fields, while the rest are numeric. But, when it copies to the new row, both G and H show the value of F.

Because the variable

Please Login or Register  to view this content.

[LewisBosworth]

Thank you jindon, for taking a look at this. I knew it was something simple. You solved the issue! Be well and have a great day!

[jindon]

You are welcome and thanks for the rep.

I would go like this, so that you don't need to care about the data type of each cell.

Please Login or Register  to view this content.