Excel vba buka lembar pertama
Intinya. Pelajari cara membuat pintasan keyboard untuk memilih lembar pertama atau terakhir di Excel. Tidak ada pintasan khusus untuk ini, jadi solusi ini menggunakan makro Show
Tingkat keahlian. Intermediat Makro untuk Memilih Lembar Pertama atau TerakhirSayangnya, tidak ada pintasan keyboard khusus untuk memilih lembar pertama atau terakhir di Excel. Namun, kita dapat menggunakan kumpulan makro sederhana untuk melakukan ini, dan menetapkan pintasan keyboard ke makro tersebut Berikut adalah makro untuk memilih tab lembar pertama atau terakhir di buku kerja yang aktif Makro untuk Memilih Tab Lembar PertamaSub Select_First_Sheet()
'Select first visible sheet in the workbook
Dim i As Long
With ActiveWorkbook
'Loop through all sheets in the workbook
For i = 1 To .Sheets.Count
'Check if the sheet is visible
If .Sheets(i).Visible = xlSheetVisible Then
'Activate/select the sheet and exit the loop
.Sheets(i).Activate
Exit For
End If
Next i
End With
End Sub
Makro untuk Memilih Tab Lembar TerakhirSub Select_Last_Sheet()
'Select last visible sheet in the workbook
Dim i As Long
With ActiveWorkbook
'Loop through all sheets starting from the last sheet
For i = .Sheets.Count To 1 Step -1
'Check if the sheet is visible
If .Sheets(i).Visible = xlSheetVisible Then
'Activate/select the sheet and exit the loop
.Sheets(i).Activate
Exit For
End If
Next i
End With
End Sub
_Makro ini dapat ditambahkan ke Buku Kerja Makro Pribadi (PMW) Anda. Lihat seri video 4 bagian saya tentang Cara Membuat Buku Kerja Makro Pribadi Anda jika Anda belum memilikinya Saya juga punya posting dan video tentang cara menyalin kode VBA ke buku kerja lain Makro menggunakan For Next Loop untuk mengulang semua sheet dan memilih (mengaktifkan) sheet pertama atau terakhir yang terlihat. Lihat postingan saya di The For Next dan For Each Loops Explained for VBA untuk mempelajari lebih lanjut Karena makro hanya mengaktifkan sheet, kami TIDAK kehilangan riwayat undo saat makro berjalan Tetapkan Pintasan Keyboard ke MakroSetelah makro ada di PMW Anda, Anda dapat menetapkan pintasan keyboard ke makro tersebut. Ada dua cara untuk melakukannya, dan saya memiliki seluruh postingan dan video tentang 2 Cara Menetapkan Pintasan Keyboard ke Makro. Berikut adalah ikhtisar dari berbagai teknik Jendela Opsi Makro #1Cara pertama adalah menetapkan tombol pintasan di jendela Opsi Makro. Dalam tangkapan layar berikut saya menetapkan Ctrl+Shift+A ke makro Select_First_Sheet. Dan Ctrl+Shift+S ke makro Select_Last_Sheet Aplikasi #2. Metode OnKeyCara lainnya adalah dengan menggunakan Aplikasi. Metode OnKey. Berikut adalah kode VBA untuk tombol pintasan yang sama Sub CreateShortcuts()
Application.OnKey "+^{a}", "Select_First_Sheet"
Application.OnKey "+^{s}", "Select_Last_Sheet"
End Sub
Saya menjelaskan cara mengotomatiskan ini sepenuhnya, dan pro & kontra untuk setiap teknik di postingan saya 2 Cara Menetapkan Pintasan Keyboard ke Makro Pastikan untuk menyimpan PMW Anda setelah penyiapan selesai. Penting untuk dicatat bahwa Anda hanya perlu melakukan pengaturan ini satu kali. Setiap kali Anda membuka Excel di masa mendatang, Anda akan dapat menggunakan pintasan keyboard pada file apa pun yang terbuka Berikut ini adalah screencast dari tombol pintasan yang sedang beraksi Kesimpulan Pintasan ini pasti akan menghemat waktu Anda saat menavigasi buku kerja besar. Lihat postingan saya di 7 Pintasan untuk Bekerja dengan Tab Lembar Kerja di Excel untuk mempelajari tips menghemat waktu lainnya. Saya juga menjelaskan cara memilih lembar pertama dan terakhir dengan mouse di artikel itu Jumlah Lembar Kerja Minimal. Buku kerja harus memiliki setidaknya satu lembar kerja. Mengingat buku kerja dapat terdiri dari salah satu atau kedua lembar kerja dan/atau lembar bagan, dan kode VBA adalah memasukkan lembar kerja baru di depan lembar kerja pertama harus ada setidaknya satu lembar kerja yang dapat dirujuk oleh kode VBA dan menyisipkan lembar kerja baru . Jika buku kerja hanya terdiri dari lembar bagan, kode VBA akan mengembalikan kesalahan yang menyatakan "Langganan di luar jangkauan"CATATAN TAMBAHAN METODE 3. Sisipkan lembar kerja Excel sebagai lembar bagan pertama menggunakan VBAVBA Edit Parameter VBA Sub Insert_Worksheet_as_First_Chart_Sheet() 'masukkan lembar kerja baru sebagai lembar bagan pertama Akhir Sub PRASYARAT CATATAN TAMBAHAN Sisipkan lembar kerja sebagai lembar pertama menggunakan PintasanJALAN PINTAS PINTASAN WINDOWS Menggeser F11 CATATAN Penjelasan tentang cara menyisipkan lembar kerja sebagai lembar pertamaPENJELASAN PENJELASAN Metode Excel. Tutorial ini menyediakan dua metode Excel yang dapat diterapkan untuk menyisipkan lembar kerja sebagai lembar pertama. Metode pertama menggunakan opsi lembar dan dapat dilakukan dalam tiga langkah. Metode kedua menggunakan opsi pita dan dapat dilakukan dalam empat langkah Metode VBA. Dengan menggunakan VBA, Anda dapat menyisipkan lembar kerja sebagai lembar pertama, lembar kerja, atau lembar bagan dengan merujuk masing-masing ke objek Lembar, Lembar Kerja, atau Bagan. Jika Anda bermaksud menyisipkan lembar kerja sebagai lembar kerja pertama atau lembar bagan, Anda harus memiliki setidaknya satu lembar kerja atau lembar bagan, masing-masing, dalam buku kerja Metode Pintasan. Menggunakan Pintasan dalam tutorial ini Anda dapat menyisipkan lembar kerja sebagai lembar kerja pertama atau lembar bagan, dengan memilih masing-masing lembar kerja atau lembar bagan pertama, dan menjalankan pintasan Bagaimana cara melompat ke lembar pertama di Excel?Terakhir, jika Anda ingin berpindah dengan cepat ke lembar pertama atau terakhir dalam buku kerja, Anda dapat menekan Ctrl+Home atau Ctrl+End, respectively. These shortcuts will take you to the first or last cell in the worksheet, but you can press Ctrl+PgUp or Ctrl+PgDn to move to the first or last sheet, respectively.
Bagaimana cara melompat ke lembar tertentu di Excel VBA?Cara berpindah ke lembar tertentu menggunakan metode Excel dan VBA . Klik kanan pada area navigasi lembar, yang terletak di sudut kiri bawah buku kerja Pilih lembar yang ingin Anda pindahkan Klik Oke |