Automatic cutting and pasting

Please see attachment

Please see attachment.

Thanks!

See attachment below.

Thanks

Hi all,

My method in fact is not cut and paste, but the use of a single formula.

I suppose Sheet1 contains the original data as described in the Word document.

In a different sheet say Sheet2 into A1 I put the following formula:

=INDIRECT(ADDRESS(5*(ROW()-1)+1+ROUNDDOWN((COLUMN()-1)/8,0),MOD((COLUMN()-1),8)+1,,,"Sheet1"))

and copied it 3x8 columns to the right

and down a few lines.


I think it works.


Kaus

Hello gdelreal99a,

If you want to the data to be compacted on the same sheet here is a macro that will do that. It is also flexible and easier to maintain than lots of copied formulas. You can specify how many blank rows you have between data groups, the starting row, and the starting column. The macro is currently set to match your post: Starting row = 1, Starting column = "A", Rows in a group = 3, and Blank rows = 2. This can be changed in the code by changing the values marked in blue. If you don't know how to install a macro, the instructions are below.
Macro Code

Please Login or Register  to view this content.

Adding the Macro
1. Copy the macro above pressing the keys CTRL+C
2. Open your workbook
3. Press the keys ALT+F11 to open the Visual Basic Editor
4. Press the keys ALT+I to activate the Insert menu
5. Press M to insert a Standard Module
6. Paste the code by pressing the keys CTRL+V
7. Make any custom changes to the macro if needed at this time
8. Save the Macro by pressing the keys CTRL+S
9. Press the keys ALT+Q to exit the Editor, and return to Excel

To Run the Macro...
To run the macro from Excel, open the workbook, and press ALT+F8 to display the Run Macro Dialog. Double Click the macro's name to Run it.

Sincerely,
Leith Ross