Loop and IF help

Code tags added

Is there a reason you can't copy and paste the whole block of data? Maybe something like:

Please Login or Register  to view this content.

No, the application requires me to copy and paste one cell at a time. Also, each cell per row needs to have a seperate copy and paste operation as each column needs to be pasted into a different field in the application... So "account" gets pasted into the "account" field. I was thinking intersect would be the best way to accomplish this, but I'm sure there is a more efficient way.

In my opinion, it would help if you gave a better description of your data. From what you've written, it seems that you have three sheets: (a) Active, (b) Application, and (c) Output. And you want to copy data from Active to both Application and Output. In the Active sheet you have six columns of data: "Office", "Account", "AT", "Journal", "Sign" and "Desc". What do the columns in Application & Output look like and how do you want the data copied?

The actual copy and paste part I can deal with, the part I need help with is setting up the loop and declarations to "activate" one cell at a time in the following order: A2, B2, C2, D2, E2, F2, A3, B3, C3, D3, E3, F3, and so on. The reason I added the 'paste to application and 'paste to output is because the application is not a spreadsheet, but an actual AS400 database that I use the "APPACTIVATE" and "SENDKEYS" syntax with. The output is a seperate spreadsheet. The operations of copy and paste I can handle, I just need help with the loops and figuring out how to activate each cell in that order.

How about:

Please Login or Register  to view this content.

x is up to you.

That helped a ton! I understand how you set that up now. Thanks for helping a newbie. Here is what I was looking for, a small modification to what you had. Obviously I will be copy and pasting the value instead of renaming it A-F.

Please Login or Register  to view this content.

Again, thank you very much!

For what it is worth, you can also use letters instead of numbers.

Please Login or Register  to view this content.

Hello, I saw great examples but when I tried to change the ActiveCell to an actual cell address and it falls apart. I also tried using looping, next i, offset, ByVal etc. falls apart. I am attempting to do what I thought would be simple and that is shift the cell contents say: going from right to left, from Z4 to C4. In other words, I am wanting the previous cell's data kept in the new cell. I have a spreadsheet example of what I have working (but too lengthy for large data and what's not). Thanks for any help, [email protected]

To: gr8guitar

Are you wanting something like this?

Shift Left Cells C7 to F7

Please Login or Register  to view this content.