Menu
  1. Accueil
  2. Tech Forum
  3. Office Software
  4. Excel
Previous Topic Next Topic

Selecting a block of cells depending on the values of two others

[Closed]
Report
Posts
3
Registration date
Friday April 21, 2017
Status
Member
Last seen
December 5, 2017
 -
Posts
2779
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
July 29, 2021
 -
Hi all

I'm pretty new to macros and I have been unable to find the answer to this question anywhere.

I'm trying to write a macro that will select a block of cells around the active cell depending on the values of 2 other cells

For example if C4 was the active cell and A50 had a value in it which would indicate the number of columns that would need to be selected and C50 had a value which would be the number of rows down that would need to be highlighted.

So if A50 was 4 and C50 was 5 there would be a block of cells highlighted from C4 to F8.

The active cell will change and so will the values in A50 and C50.

Thanks

Jon

3 replies

Answer 1 / 3

Try this. Record your Macro, and view it (edit it). Then change the part of the macro you want to have be dynamic. Post back if you have any questions.
Report
Posts
3
Registration date
Friday April 21, 2017
Status
Member
Last seen
December 5, 2017
Hi ac3mark

I have the code

Sub Select6()
Range(ActiveCell(1, 1), ActiveCell(6, 6)).Select

This code highlights a a block of 6 rows and 6 columns to the right of the active cell

I am struggling to replace the numbers so rather than highlighting the number of cells that are in the code it highlights number of cells from the the values in cells A50 and C50

Jon
Answer 2 / 3

OK, that is a start then. Thanks for you posting back!

Initilize a variable, call it a "ARANGE", and set it as a RANGE.

Set ARANGE to "A50:C50"

now, utilize it as RANGE(ARANGE).select

Try that. You can then set ARANGE to what ever variable (range, cell) you wish!
Answer 3 / 3
Posts
2779
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
July 29, 2021
 468
Or try this: 
Sub RunMe()
ActiveCell.Resize(Range("A50").Value + 1, Range("C50").Value + 1).Select
End Sub


When your active cell is C4 and you add 4 rows you get row 8.
When you add 5 to column C (=3) you will get column H (=8).

So when A50=4 and C50=5 and C4 is active cell, then selected range after macro is run, will be C4 to H8.

Best regards,
Trowa
Ask a question

Subscribe To Our Newsletter!

The Best of CCM in Your Inbox

Subscribe To Our Newsletter!