I've done this in Excel macros but can't seem to get it to work in VB.net.
I get the following error: system.Runtime.InteropService.COMException: 'This can't be done on multiple range selection. Select a single range and try again.'
I tried a single range with the same results. Here is the code:
Debug prints the appropriate ranges.
Had one comment about a , instead of a : between the ranges but tried both with same results.
Also, the continuation underscore keeps disappearing when I put it in.
I get the following error: system.Runtime.InteropService.COMException: 'This can't be done on multiple range selection. Select a single range and try again.'
I tried a single range with the same results. Here is the code:
Code:
myRangeMakeup = "D" & StartScoreRow & ",F" & LastScoreRow
mySortKey = "D" & StartScoreRow
Debug.Print(myRangeMakeup) ' Prints D1065,F1123
Debug.Print(mySortKey) 'Prints D1065
myRange = xlWs.Range(myRangeMakeup)
' IS: D1065,F1123 and valid
myRange.Select()
myRange.Sort(Key1:=myRange.Range(mySortKey),
Header:=XlYesNoGuess.xlNo,
Order1:=XlSortOrder.xlAscending,
MatchCase:=False,
Orientation:=XlSortOrientation.xlSortColumns)
Debug prints the appropriate ranges.
Had one comment about a , instead of a : between the ranges but tried both with same results.
Also, the continuation underscore keeps disappearing when I put it in.