Macro coding help needed

G

Grace

I am slowly learning to build macros, but I need a little help with a few
intermediate steps. Kindly tell me the code for the steps detailed below:

First, let's say that cells G10 and G11 of Sheet A are equations whose
values I will use in the macro (see below). How do I define those as values
within the macro?

I will then go to a cell B4 of a worksheet called BOPSummary and then I want
to move my cursor down in column B by the number of rows given by cell G10
above. What is the code for that?

Starting at that cell location, I want to highlight an area that is (296
minus G10) rows down and then, also five more columns to the right (that is,
to column G). How do I code that?

After doing some things that don't move the cursor, I then want to move one
cell up and block off that cell plus five more cells to the right (to column
G). How do I code that?

After doing some things, I next want to highlight an area that is the
equivalent of holding down the shift key and then hitting the end key and
then the up arrow. How do I code that?

I then want to use that range to do a "set print area" and then a page setup
and, for the number of pages, I want to use the value in that cell G11
above. How do I code that?

Thanks,
Grace
 
B

Bob Phillips

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

Grace said:
I am slowly learning to build macros, but I need a little help with a few
intermediate steps. Kindly tell me the code for the steps detailed below:

First, let's say that cells G10 and G11 of Sheet A are equations whose
values I will use in the macro (see below). How do I define those as values
within the macro?
Click to expand...

val1 = Range("G10").Value
val2 = Range("G11").Value
 
G

Grace

Bob (or anyone),

Range("B4").Offset(val1,0).Resize(296-val1,5)

The command above is showing in red when I cut and pasted it in, as I did
with your val1 definition. Could there be some syntax wrong? Also, you
forgot to answer the last two queries in my e-mail.

Thanks so much for your fine help.
G
..
 
G

Grace

With regard to my last post in this thread, I think I figured out the last
two queries. I still need to know what is wrong with the resize command.
That's it.

G
 
T

Tom Ogilvy

as shown:

Range("B4").Offset(val1,0).Resize(296-val1,5)

this does nothing.

You would need

Range("B4").Offset(val1,0).Resize(296-val1,5).Select

or

Range("B4").Offset(val1,0).Resize(296-val1,5).Interior.ColorIndex = 3

as examples - what you want would depend on what you are trying to do.

also, if that isn't the problem, then the problem is probably the value of
Val1. If it creates an illegal reference, then you would get an error.
 
B

Bob Phillips

Grace.

I was only showing you how to get that required range. Depending upon what
you mean by highlight, you have to act upon the range, select it or
whatever.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
B

Bob Phillips

Well I sort of did, but I tried to be flexible in my approach. That will
teach me<g>

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
G

Grace

Perhaps I'm wrong but most people asking for coding help cannot be assumed
to otherwise know what the h' they are doing!

Thanks again!
G
 
Top