Porady: Programowane przenoszenie arkuszy w obrębie skoroszytu
Można zmienić programistycznie pozycję Arkusze w stosunku do innych arkuszy w skoroszycie.Jeśli nie określisz lokalizacji dla przeniesionego arkusza, program Excel utworzy nowy skoroszyt zawiera go.
Zastosowanie: Informacje przedstawione w tym temacie mają zastosowanie do projektów na poziomie dokumentu i aplikacji obsługiwanych w programach Excel 2013 i Excel 2010. Aby uzyskać więcej informacji, zobacz Funkcje dostępne w aplikacjach pakietu Office i typ projektu.
Aby przenieść arkusz w dostosowania poziomu dokumentu
Przypisać całkowitą liczbę arkuszy w skoroszycie do zmiennej, a następnie przenieść pierwszego arkusza, tak że staje się ostatni.
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]);
Aby przenieść arkusz w poziomie aplikacji dodatek
Przypisać całkowitą liczbę arkuszy w skoroszycie do zmiennej, a następnie przenieść pierwszego arkusza, tak że staje się ostatni.
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]);
Zobacz też
Zadania
Porady: Programowane ukrywanie arkuszy
Porady: Programowane usuwanie arkuszy ze skoroszytu
Porady: Programowane włączanie ochrony arkuszy