Looping through a range

[edp428]

Hello, I'm fairly new to VBA and to this site. I've been able to accomplish somewhat simple macros, but this one is not cooperating with me.

On my spreadsheet I have twelve ranges that represent every day in each month. Next to these ranges I have cells that I need to count occurrences within that month. I've been able to get this to work for the first item I need counted but I cannot get my loop to work. My ideal result would be to loop through each month and each reason performing the countif function. Any suggestions would be greatly appreciated. Can anyone assist?

Here is the code I started with:

Please Login or Register  to view this content.

Sheet Example.xlsx

[stanleydgromjr]

edp428,

Welcome to the Excel Forum.

Copy the below formula into range AG4:AQ15

=COUNTIF($B4:$AF4,AG$3)


See the attached workbook COUNTIF formula - edp428 - EF963411 - SDG15.xlsx

[edp428]

Thank you Stan but I am looking to complete this using VBA.

[alansidman]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



(I have added these for you this time. Please read our rules and abide by them in the future.)

[Trebor76]

Hi edp428,

Welcome to the forum!!

Let us know how this goes, which is basically a VBA version of Stan's solution:

Please Login or Register  to view this content.

Regards,

Robert

[stanleydgromjr]

edp428,

I am looking to complete this using VBA

Please TEST this FIRST in a COPY of your workbook (always make a backup copy before trying new code, you never know what you might lose).

1. Copy the below code
2. Open your NEW 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. Where the cursor is flashing, paste the code
7. Press the keys ALT + Q to exit the Editor, and return to Excel
8. To run the macro from Excel press ALT + F8 to display the Run Macro Dialog. Double Click the macro's name to Run it.

Please Login or Register  to view this content.

Before you use the macro with Excel 2007 or newer, save your workbook, Save As, a macro enabled workbook with the file extension .xlsm

Then run the FillinFormulae macro.

[edp428]

Thank you, Robert, this worked beautifully!

[edp428]

Thank you Stanley for this option also.

[stanleydgromjr]

edp428,

You are very welcome. Glad I could help.