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

Tingkat keahlian. Intermediat

Excel vba buka lembar pertama

Makro untuk Memilih Lembar Pertama atau Terakhir

Sayangnya, 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 Pertama

Sub 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 Terakhir

Sub 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 Makro

Setelah 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 #1

Cara 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

Excel vba buka lembar pertama

Aplikasi #2. Metode OnKey

Cara 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

Excel vba buka lembar pertama

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
Catatan 1. Angka 1 dalam Lembar Kerja(1) mewakili lembar kerja pertama dalam buku kerja

METODE 3. Sisipkan lembar kerja Excel sebagai lembar bagan pertama menggunakan VBA

VBA

Edit Parameter VBA

Sub Insert_Worksheet_as_First_Chart_Sheet()

'masukkan lembar kerja baru sebagai lembar bagan pertama
Lembar kerja. Tambahkan Sebelumnya. = Bagan(1)

Akhir Sub

PRASYARAT
Jumlah Minimum Lembar Bagan. Buku kerja harus memiliki setidaknya satu lembar bagan. 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 bagan pertama harus ada setidaknya satu lembar bagan yang dapat dirujuk oleh kode VBA dan menyisipkan . Jika buku kerja hanya terdiri dari lembar kerja, kode VBA akan mengembalikan kesalahan yang menyatakan "Langganan di luar jangkauan"

CATATAN TAMBAHAN
Catatan 1. Angka 1 dalam Bagan(1) mewakili lembar bagan pertama dalam buku kerja

Sisipkan lembar kerja sebagai lembar pertama menggunakan Pintasan

JALAN PINTAS

PINTASAN WINDOWS

Menggeser

F11

CATATAN
Untuk menyisipkan lembar kerja sebagai lembar pertama menggunakan pintasan ini, Anda harus memilih lembar pertama saat menjalankan pintasan ini, karena pintasan menyisipkan lembar kerja baru di depan lembar aktif. Jika Anda memiliki kombinasi lembar kerja dan lembar bagan dan hanya ingin menyisipkan lembar kerja baru di depan lembar kerja atau lembar bagan menggunakan pintasan ini, maka Anda perlu memilih lembar kerja atau lembar bagan pertama dan melakukan pintasan

Penjelasan tentang cara menyisipkan lembar kerja sebagai lembar pertama

PENJELASAN

PENJELASAN
Tutorial ini menjelaskan dan memberikan petunjuk langkah demi langkah tentang cara menyisipkan lembar kerja sebagai lembar pertama menggunakan metode Excel, VBA dan Shortcut

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