I am trying to find a way to select rows via VBA using the macro below
but when Rows("6:11").Select is executed it selects rows 3 to 18. Does
someone know how I could select the row 6 to 11 via VBA.

Sub Macro1()
'
' Macro1 Macro
'

'
Range("B3:B18").Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Selection.Merge
Rows("6:11").Select
End Sub

Merged cells behave weirdly.

Can you eliminate the merged cells?

(E-Mail Removed) wrote:
>
> I am trying to find a way to select rows via VBA using the macro below
> but when Rows("6:11").Select is executed it selects rows 3 to 18. Does
> someone know how I could select the row 6 to 11 via VBA.
>
> Sub Macro1()
> '
> ' Macro1 Macro
> '
>
> '
> Range("B3:B18").Select
> With Selection
> .HorizontalAlignment = xlCenter
> .VerticalAlignment = xlBottom
> .WrapText = False
> .Orientation = 0
> .AddIndent = False
> .IndentLevel = 0
> .ShrinkToFit = False
> .ReadingOrder = xlContext
> .MergeCells = False
> End With
> Selection.Merge
> Rows("6:11").Select
> End Sub

--

Dave Peterson