VBA expression to insert pagebreak

**modytrane** · 10-29-2008, 02:29 PM

I need to learn VBA syntax.
I have the following line of code and its not working.

Here's what I need to do.
I have a list of row numbers in AA2:AA6, so for i =1 to 5
I want to insert a page break before cell (column AA and Row(#in cell AA2-5))

Please Login or Register  to view this content.

Thanks for help in advance.
modytrane

**shg** · 10-29-2008, 02:35 PM

Code tags, please.

**modytrane** · 10-29-2008, 02:58 PM

--------------------------------------------------------------------------------

I need to learn VBA syntax.
I have the following line of code and its not working.

Here's what I need to do.
I have a list of row numbers in AA2:AA6, so for i =1 to 5
I want to insert a page break before cell (column AA and Row(#in cell AA2-5))

Please Login or Register  to view this content.

Thanks for help in advance.
modytrane

**shg** · 10-29-2008, 03:27 PM

Maybe like this:

Please Login or Register  to view this content.

**modytrane** · 10-29-2008, 03:47 PM

Thanks,
It works.
modytrane.

**VBA Noob** · 10-29-2008, 03:51 PM

modytrane,

You need to mark this thread as solved if you found a solution

VBA Noob

**modytrane** · 10-29-2008, 06:54 PM

Sorry for my ignorance, but I do remember seeing the instructions for marking the posts. I just can't seem to recall it.
Please remind me and I'll take care of it.
Thanks,
modytrane.

**VBA Noob** · 10-29-2008, 07:00 PM

1) Click the EDIT button on your first post
2) Click the GO ADVANCED button
3) Select SOLVED from the Title dropdown (under the Reason for Editing box)
4) Click the SAVE CHANGES button

Note: If it's more than 2 days after your first post, please ask a moderator to mark the thread SOLVED for you.

**modytrane** · 10-29-2008, 07:09 PM

Thanks for that info.

However, I spoke too soon.
Following code gives me a runtime error '1004'
Application-Defined or Object-Defined error.

I am sure its something simple.
Thanks for all the help I've been getting here.
In return I have tried to help some users whenever possible.

Please Login or Register  to view this content.

modytrane

**shg** · 10-29-2008, 07:16 PM

If code errors, please give us a hand and say where, and avoid an unnecessary pair of posts.

On a guess, add this as the first line:

Please Login or Register  to view this content.

**modytrane** · 10-29-2008, 07:55 PM

Please Login or Register  to view this content.

The error still shows up at the line "ActiveWindow.SelectedSheets........"

Thanks for your time.
modytrane

**shg** · 10-29-2008, 08:57 PM

What's the value in all five cells when you run the code?

**modytrane** · 10-29-2008, 10:24 PM

51
105
150
197
255

These are the five values in AA2:AA6.

Sorry, for the delayed response. I was offline.

Thanks again for helping me resolve this issue.
modytrane

**modytrane** · 10-29-2008, 10:42 PM

Shg,
I don't know what's going on, but it seems to be working now.

One more request, if you don't mind.

What would be the code to set the print area to A1:M*

Where * would represent last row used.

My worksheet length changes often and I would like to be able to set the print area within the same code that you have helped me with.

Thanks a lot.

modytrane.

**shg** · 10-29-2008, 10:48 PM

Hmm. Next try:

Please Login or Register  to view this content.

**modytrane** · 10-30-2008, 10:24 AM

Shg,
Thanks so much for your time and effort.
I also picked up some code from another thread [from VBA Noob].
Combined the codes and it's working fine.

Thanks Again,
modytrane

**shg** · 10-30-2008, 11:07 AM

You're welcome.

How about posting your final code for other members, and explaining the changes?

VBA expression to insert pagebreak

LinkBack

Thread Tools

Rate This Thread

Display

VBA expression to insert pagebreak

Sorry,

set page breaks

Marking Post As solved

insert page breaks

Error "1004'

Error 1004

Error 1004

Set Print Area & Insert Pg Breaks

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions