Comments on: Using a For Loop in a Macro http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/ Excel Tips and Tricks for All Levels Thu, 29 Jul 2010 12:51:29 +0000 hourly 1 http://wordpress.org/?v=3.0 By: Rahil http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-1072 Rahil Mon, 29 Mar 2010 08:40:07 +0000 http://excelhints.com/?p=192#comment-1072 I tried to recreate this macro. In a blank worksheet I hit ‘Alt’ F11 to open VB, then I clicked Insert Module when the new module opened, I pasted the subroutine data for TestLoop: Sub TestLoop() For x = 1 to 10 Cells(x,1) = “Updated” next x End Sub I then closed module and VB and went to Macros I selected TestLoop and then Run but nothing happened. Then i Changed the string to valriable name i.e Sub TestLoop() For x = 1 To 10 Cells(x, 1) = x Next x End Sub Wtih this it prints the value of x which starts from 1 to 10 in first column. Appriciated the help provided, Thanks EH I tried to recreate this macro. In a blank worksheet I hit ‘Alt’ F11 to open VB, then I clicked Insert Module
when the new module opened, I pasted the subroutine data for TestLoop:
Sub TestLoop()
For x = 1 to 10
Cells(x,1) = “Updated”
next x
End Sub

I then closed module and VB and went to Macros
I selected TestLoop and then Run but nothing happened.

Then i Changed the string to valriable name i.e

Sub TestLoop()
For x = 1 To 10
Cells(x, 1) = x

Next x
End Sub

Wtih this it prints the value of x which starts from 1 to 10 in first column.

Appriciated the help provided, Thanks EH

]]> By: Automobile India http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-933 Automobile India Mon, 02 Nov 2009 01:54:40 +0000 http://excelhints.com/?p=192#comment-933 I would like to Loop this macro until their is no more data in the report. Does anyone know how to do it? I would like to Loop this macro until their is no more data in the report. Does anyone know how to do it?

]]> By: Misterpiz http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-931 Misterpiz Fri, 30 Oct 2009 12:35:52 +0000 http://excelhints.com/?p=192#comment-931 Hello, I am looking for a macro that will take data from yesterday, subtract todays and give me the differece in a specific cell. I need to run this for 10 different columns, with 6 different categories (Total, Major, Critical, Minor, Internal, and Admin). I would appreciate any and all help Thank you Hello, I am looking for a macro that will take data from yesterday, subtract todays and give me the differece in a specific cell. I need to run this for 10 different columns, with 6 different categories (Total, Major, Critical, Minor, Internal, and Admin). I would appreciate any and all help

Thank you

]]> By: Derek http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-888 Derek Tue, 22 Sep 2009 09:54:56 +0000 http://excelhints.com/?p=192#comment-888 I've just tried the same and couldn't get it to work. Turns out you need to edit over the inverted comas as they seem to be slightly different characters. After doing that the simple macro should run properly. Its a good, simple example so thanks for this. D I’ve just tried the same and couldn’t get it to work. Turns out you need to edit over the inverted comas as they seem to be slightly different characters. After doing that the simple macro should run properly. Its a good, simple example so thanks for this. D

]]> By: deekarvois http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-881 deekarvois Thu, 17 Sep 2009 20:31:20 +0000 http://excelhints.com/?p=192#comment-881 I tried to recreate this macro. In a blank worksheet I hit 'Alt' F11 to open VB, then I clicked Insert Module when the new module opened, I pasted the subroutine data for TestLoop: Sub TestLoop() For x = 1 to 10 Cells(x,1) = “Updated” next x End Sub I then closed module and VB and went to Macros I selected TestLoop and then Run but nothing happened. I started with my pointer at A1 Any idea of what went wrong. Thanks. I tried to recreate this macro. In a blank worksheet I hit ‘Alt’ F11 to open VB, then I clicked Insert Module
when the new module opened, I pasted the subroutine data for TestLoop:
Sub TestLoop()
For x = 1 to 10
Cells(x,1) = “Updated”
next x
End Sub

I then closed module and VB and went to Macros
I selected TestLoop and then Run but nothing happened.
I started with my pointer at A1

Any idea of what went wrong. Thanks.

]]> By: Navaneetha kumar http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-817 Navaneetha kumar Thu, 30 Jul 2009 09:14:16 +0000 http://excelhints.com/?p=192#comment-817 In first cell type : =A1&”0100? Remaining cells : =IF(A1=A2,B1+100,CONCATENATE(A1,"0100")) In first cell type : =A1&”0100?
Remaining cells : =IF(A1=A2,B1+100,CONCATENATE(A1,”0100″))

]]> By: john http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-806 john Sat, 11 Jul 2009 04:34:27 +0000 http://excelhints.com/?p=192#comment-806 Hi STLlove-thanks for visiting the site... Try someting like this maybe (I assume in the suggestion that 11111 would be in the first column and the result would be in the 2nd): In the first cell, just use this simple formula: =A1&"0100" And in the remaining cells, use this formula: =IF(A2=A1,A2&"0"&IF(MID(B1,6,1)="0",VALUE(RIGHT(B1,3))+100,VALUE(RIGHT(B1,4))+100)) This will only work if the each cell in column A is not preceeded by any blanks. The result will be text, but you can use VALUE to change back to a number. Hope that works for you. John Hi STLlove-thanks for visiting the site…

Try someting like this maybe (I assume in the suggestion that 11111 would be in the first column and the result would be in the 2nd):

In the first cell, just use this simple formula: =A1&”0100″

And in the remaining cells, use this formula: =IF(A2=A1,A2&”0″&IF(MID(B1,6,1)=”0″,VALUE(RIGHT(B1,3))+100,VALUE(RIGHT(B1,4))+100))

This will only work if the each cell in column A is not preceeded by any blanks. The result will be text, but you can use VALUE to change back to a number.

Hope that works for you.

John

]]> By: STLlove http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-805 STLlove Fri, 10 Jul 2009 19:59:58 +0000 http://excelhints.com/?p=192#comment-805 I am looking for a formula that does the following: Can you help? Adds 0100 to each cell in column A and then increases by 100 for each line after as long as the claim number is the same.Then start over with 0100 when the claim number changes. CLM # Result 11111 111110100 11111 111110200 11111 111110300 11111 111110400 22222 222220100 22222 222220200 22222 222220300 22222 222220400 I am looking for a formula that does the following: Can you help?

Adds 0100 to each cell in column A and then increases by 100 for each line after as long as the claim number is the same.Then start over with 0100 when the claim number changes.

CLM # Result

11111 111110100
11111 111110200
11111 111110300
11111 111110400
22222 222220100
22222 222220200
22222 222220300
22222 222220400

]]> By: Gopal http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-575 Gopal Sat, 22 Nov 2008 08:36:08 +0000 http://excelhints.com/?p=192#comment-575 Hi, I have a situation that i need to develop a macro which shift month values based on the value entered in "Month Shift" Column. following is the case, if we entered 1 under month shift then the value should move 1 month forward and should copy under Months_Factor, If we enter 2 under Month shift Months values carry forward 2 months that means Months values copied from march. so January is the base month. I am new to write macros,Can any one please help me out for this case Case: Months Months _Factor Month Shift Jan Feb Mar April May Jan Feb Mar April May 1 10 20 30 40 50 10 20 30 40 2 10 20 30 40 50 10 20 30 Thanks and Regards, Gopal Hi,
I have a situation that i need to develop a macro which shift month values based on the value entered in “Month Shift” Column. following is the case, if we entered 1 under month shift then the value should move 1 month forward and should copy under Months_Factor,
If we enter 2 under Month shift Months values carry forward 2 months that means Months values copied from march.
so January is the base month.
I am new to write macros,Can any one please help me out for this case

Case: Months Months _Factor
Month Shift Jan Feb Mar April May Jan Feb Mar April May
1 10 20 30 40 50 10 20 30 40
2 10 20 30 40 50 10 20 30

Thanks and Regards,
Gopal

]]> By: john http://excelhints.com/2008/10/12/using-a-for-loop-in-a-macro/comment-page-1/#comment-538 john Thu, 13 Nov 2008 17:36:44 +0000 http://excelhints.com/?p=192#comment-538 Well there are two ways I can quickly think of to do this. It can be done with adding an additional column and using a vlookup formula to search for the values in column C. For any values that aren't found, you can filter the column and delete those rows. It can also be done with a VBA macro. You can have the macro loop through the column for each value and then run a delete command on the rows that are found in column C. Does that help? Well there are two ways I can quickly think of to do this. It can be done with adding an additional column and using a vlookup formula to search for the values in column C. For any values that aren’t found, you can filter the column and delete those rows.

It can also be done with a VBA macro. You can have the macro loop through the column for each value and then run a delete command on the rows that are found in column C.

Does that help?

]]>