Cut & Paste Loop

  • Thread starter Thread starter Allan
  • Start date Start date
A

Allan

I am just learning about Excel VBA on a project.
I have a very long spreadsheet of data to format from one column.

How would I automate the following?

"Search for a phone number, cut whole cell, paste it up two rows and over 3
columns.
Find next phone number... repeat..."


I will also be using this to move addresses...

"Search for address containing this string, cut whole Cell, paste up 1 row,
and over 6.
Find next Address."

Thanks in advance

============================
Allan
 
this should give you the idea
Sub moveover()' moves over 3 columns & up 2 rows
For Each c In Selection
c.Cut c.Offset(-2, 3)
Next
End Sub
 
Back
Top