VBA: код для перемещения только что созданного листа вправо от всех вкладок в книге

Question

Кто-нибудь знает способ в VBA немедленно переместить только что созданную вкладку в самое дальнее место справа от всей книги.Прямо сейчас мой код работает так, что он помещает вкладку в крайнее левое положение (по умолчанию).Любая помощь будет высоко ценится.

Sub AddSheet()
Dim wb As Workbook: Set wb = ActiveWorkbook
Dim strName As String: strName = CStr(MaxSheetNumber(wb) + 1)
Dim ws As Worksheet
Set ws = wb.Worksheets.Add(Type:=xlWorksheet)
With ws
    .Name = strName
End With

'Line of code here that would immediately move the new tab "ws" to the furthest right position of all tabs in the workbook

End Sub

Answer 1

Укажите параметр After:

Set ws = wb.Worksheets.Add(Type:=xlWorksheet, after:=wb.Worksheets(wb.Worksheets.Count))

Answer 2

Это должно работать:

 ActiveSheet.Move _
 After:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count)