Defining 2 separate ranges

[donwb]

I want to define and select 2 separate ranges in the form
Range("A1: G1, A3:G3").Select

but I want to apply variables the Row Numbers in the form
Range("A(x): G(x), A(y):G(y)").Select

I have been unable to establish the correct syntax to achieve this.

The nearest I've got is:-

Range("C" & (x) & ":" & "G" & (x), "C" & (Y) & ":" & "G" & (Y)).Select
where x=1 and y=3 so that there are 2 separate ranges separated by a blank row.

However this produces a solid range block from C1 to G3.

Where is my syntax wrong?

[Marc L]

Your error stands in the comma outside of the string …

Easier than your syntax style is using the Replace VBA text function
and more easier is following the TBTO second main rule so as a beginner starter :

    With ActiveSheet.Columns("A:G").Rows 
        Union(.Item(X), .Item(Y)).Select 
    End With  

Do you like it ? So thanks to click on bottom left star icon « ★ Add Reputation » !

[donwb]

Merci Marc
Your 3 lines of code worked perfectly - thank you.
Just for completeness, in "my" syntax, you said the error was in the comma outside the string....
how would this be corrected?
Also, I did not understand " TBTO second main rule " perhaps you could explain.

[Marc L]

• Your initial codeline : Range("A1:G1,A3:G3").Select …
  
  In your attempt the comma is not within the string and you forgot a & operator :
  Range("C" & (x) & ":" & "G" & (x), "C" & (Y) & ":" & "G" & (Y)).Select …
  
  And the ( ) for the variables x or y are useless : Range("A" & x & ":G" & x & ",A" & y & ":G" & y).Select …
  
  
• The replace way : Range(Replace( Replace("A#:G#,A¤:G¤", "#", x), "¤", y)).Select …
  
  
• For the more easier way : Think, But Think Object !

[donwb]

Many thanks Marc.