Can I add two "With Selections"?

[mayankgo]

How do I make this all in 12 lines? I don't think it is possible without adding the with selections

Range("A1").Select    With Selection.Font
        .Size = 36
    End With
    With Selection
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
    End With
    With Selection.Borders(xlEdgeBottom)
        .LineStyle = xlContinuous
    End With
    With Selection.Borders(xlEdgeRight)
        .LineStyle = xlContinuous
    End With
    With Selection.Interior
        .ThemeColor = xlThemeColorDark2
    End With

 

[mumps]

Range("A1").Select
    With Selection
        .Font.Size = 36
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .Borders(xlEdgeBottom).LineStyle = xlContinuous
        .Borders(xlEdgeRight).LineStyle = xlContinuous
        .Interior.ThemeColor = xlThemeColorDark2
    End With

 

[mayankgo]

thanks a lot

 

[mumps]

You are very welcome.

 

[mayankgo]

@mumps Instead of using macro then I should learn the codes like horizontal and .font.size or is it better to trip the waste part? what do you think?

 

[mumps]

I'm sorry but I don't quite understand what you mean. Could you please explain in more detail?

 

[Rick Rothstein]

Range("A1").Select
    With Selection
        .Font.Size = 36
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .Borders(xlEdgeBottom).LineStyle = xlContinuous
        .Borders(xlEdgeRight).LineStyle = xlContinuous
        .Interior.ThemeColor = xlThemeColorDark2
    End With

Actually, there is no reason to select cell A1 in order to work with it...

With Range("A1")
  .Font.Size = 36
  .HorizontalAlignment = xlCenter
  .VerticalAlignment = xlCenter
  .Borders(xlEdgeBottom).LineStyle = xlContinuous
  .Borders(xlEdgeRight).LineStyle = xlContinuous
  .Interior.ThemeColor = xlThemeColorDark2
End With

 

[mayankgo]

I'm new to Excel VBA. Which one is preferable either I should use a macro to record and then trim the waste part or should I learn the edit codes?

Thank you to Rick too

 

[mumps]

If you use the macro recorder, then that recorded macro will work only for that very specific task or situation. It is not at all flexible. That doesn't mean that recorded macros are not useful. They can save much time when typing lines of code. You can then edit the macro to become more flexible so it can be used in varying situations.

 

[Rick Rothstein]

I'm new to Excel VBA. Which one is preferable either I should use a macro to record and then trim the waste part or should I learn the edit codes?

I think you will find programming more flexible if you learn to write code yourself. That does not mean the macro recorder is worthless... I still use it when I need to code something I am not familiar with... it gives me an overall structure for the operation I am not sure of which I can then recode (eliminating all the excess or inefficient stuff it produces) and then incorporate into the overall code that I am writing.