Hi All
I have this little snippet of code (which was produced by this wonderful forum!) which is part of a longer macro that is working fine.
For i = 1 To last
0 If Left(Trim(.Cells(i, "B").Value), 18) Like "####[-]###[-]####[-]####" Then
DestRow = DestRow + 1
ws2.Cells(DestRow, "A").Value = Replace(Left(.Cells(i, "B").Text, 20), " ", "")
ws2.Cells(DestRow, "J").Value = Replace(.Cells(i, "B").Text, ", ", "", 22)
ws2.Cells(DestRow, "B").Value = Replace(.Cells(i, "I").Value, ",", "")
My issue is that it is searching column B for a value and then pulling the value Column I. depending on the worksheet I sometimes need it to search/pull different columns other than B and I.
I basically want it to ask me "what column is the description" and then allow me to pick a column and that would update the bold "B", and then "what column is the value?" and then allow me to select a column and that would update the bold "I"
Is this possible?
Bookmarks