Custom Borders for a group of cells

[AlanaT]

Using Excel 2010... can you create a custom border that affects a group of cells, i.e. cells C3:E6, all inside borders in cell group have standard line borders, and the outer borders (surrounding the group of cells) are thick outside borders. I do this all the time and would like a one-step/one-click solution.
See below picture.

 

[Fluff]

How about

Sub AlanaT()
   With Range("C3:E6")
      .Borders.Weight = xlThin
      .BorderAround , xlMedium
   End With
End Sub

 

[AlanaT]

This cell range was only an example... wouldn't using that VBA code only border those specific cells. I would like to have the custom border for whatever range of cells I select.
Does that make sense?

 

[Fluff]

In that case you can use

Sub AlanaT()
   With Selection
      .Borders.Weight = xlThin
      .BorderAround , xlMedium
   End With
End Sub

 

[AlanaT]

Great! thanks!

 

[Fluff]

You're welcome & thanks for the feedback.