Bowdoin College

rMax = Selection.Rows.Count. If rMax < 2 Then. MsgBox "There must be at least 2 rows." End. End If. Length = rMax. Do While Length > 1. Length = Length / 2. Loop. If Length 1 Then. MsgBox "The number of rows must be" _ & Chr(13) & "an integral power of two." End. End If ' Determine the array length. rMax = Selection.Rows.Count ' Read the ... ................
................