Поделиться через


Практическое руководство. Программное перемещение листов в книгах

Можно программными средствами изменить положение листов относительно других листов книги.Если не определить новое положение листа, то Excel создаст новую книгу с этим листом.

Применение. Сведения этого раздела применяются к проектам уровня документа и уровня приложения для Excel 2013 и Excel 2010. Дополнительные сведения см. в разделе Доступность функций по типам приложений Office и проектов.

Перемещение листа в настройке на уровне документа

  • Присвойте переменной общее число листов в книге и затем переместите первый лист таким образом, чтобы он стал последним.

    Dim totalSheets As Integer = Application.ActiveWorkbook.Sheets.Count
    Globals.Sheet1.Move(After:=Globals.ThisWorkbook.Sheets(totalSheets))
    
    int totalSheets = this.Application.ActiveWorkbook.Sheets.Count;
    Globals.Sheet1.Move(Globals.ThisWorkbook.Sheets[totalSheets]);
    

Перемещение листа в надстройке уровня приложения

  • Присвойте переменной общее число листов в книге и затем переместите первый лист таким образом, чтобы он стал последним.

    Dim totalSheets As Integer = Application.ActiveWorkbook.Sheets.Count
    CType(Application.ActiveSheet, Excel.Worksheet).Move(After:=Application.Worksheets(totalSheets))
    
    int totalSheets = this.Application.ActiveWorkbook.Sheets.Count;
    ((Excel.Worksheet)Application.ActiveSheet).Move(
        this.Application.Worksheets[totalSheets]);
    

См. также

Задачи

Практическое руководство. Программное скрытие листов Excel

Практическое руководство. Программное удаление листов из книг

Практическое руководство. Программная защита листов Excel

Ссылки

Copy

Основные понятия

Работа с листами

Глобальный доступ к объектам в проектах Office