Langsung ke konten utama

Cara Mengurutkan Sheet Otomatis di Microsoft Excel

Workshet atau sering juga disebut sheet di Microsoft Excel merupakan lembar kerja yang jumlahnya dapat disesuaikan tergantung kebutuhan. Tidak jarang worksheet tersebut kita urutkan berdasarkan nama sheet , dimulai dari kecil kebesar dari huruf A hingga Z (atau dari 0 ke 9), maupun sebaliknya dari besar ke kecil dari huruf Z ke A (atau dari 9 ke 0). Bila jumlah sheet tidak terlalu banyak tentu tidak menjadi masalah. Akan tetapi semakin banyak sheet yang harus diurutkan tentu membutuhkan waktu yang relatif lebih banyak pula bagi kita untuk mengurutkan sheet tersebut satu persatu.


 Gambar: Contoh worksheet yang tidak berurutan di Microsoft Excel



Untuk mempermudah pengurutan, saya telah membuatkan kode VBA untuk yang bisa digunakan oleh anda untuk mengurutkan sheet dengan waktu relatif cepat. Anda cukup mengetik atau copy code VBA tersebut pada editor VBA lalu jalankan. Semua sheet akan langsung terurut ascending, mulai dari yang kecil ke besar. Kode yang perlu anda ketik dan jalankan seperti di bawah ini:

Sub aimyaya_UrutkanSheet123()

' ==========================================================
' Kode mengurutkan sheet di Microsoft Excel dari aimyaya.com
' Kode ini hanya untuk pemakaian perseorangan dan 
' bukan untuk tujuan komersil
' ==========================================================

Dim a, b, c, p As Integer
On Error GoTo Gagal

c = Sheets.Count
For a = 2 To c 
  p = a
  For b = a - 1 To 1 Step -1
    If Sheets(a).Name < Sheets(b).Name Then
      p = b
    End If   
  Next
  If p <> a Then
    Sheets(a).Move Before:=Sheets(p)
  End If
Next

Sheets(1).Select

Gagal:
  '  Pokoknya kalau ada error langsung ke sini (selesai)
End Sub



Bila anda masih belum mengerti / jelas, silahkan petunjuk penggunaan berikut :

  1. Siapkan kode VBA pada jendela baru firefox (klik disini)
  2. Buka aplikasi Microsoft Excel Anda, termasuk workbook/file yang sheetnya akan disortir
  3. Selanjutnya tekan tombol keyboard ALT+F11
  4. Kemudian pada editor VBA klik menu Insert lalu pilih Module
  5.  Gambar: Menyisipkan modul di di Microsoft VisualBasic for Application
  6. Pada text / code editor ketik kode yang ada di atas tadi, atau kalau mudahnya copy /paste saja
  7. Setelah kode diketik/di paste, pastikan semua hasil ketikan telah sama dengan source code dari aimyaya, lalu jalankan dengan jalan menekan tombol keyboard F5 atau klik tombol Run
  8. Gambar: Menjalankan kode VBA di Microsoft Visual Basic for Application
  9. Bagi komputer yang memiliki performans cepat anda tidak akan melihat atau merasa bahwa kode telah dijalankan. Lebih baik anda lihat saja langsung urutan worksheet pada microsoft excel anda. Urutan worksheet sudah berubah sesuai dari kecil ke besar.


 Gambar: Contoh worksheet yang sudah diurutkan dari kecil ke besar (ascending) di Microsoft Excel


Tips Cara Mengurutkan Sheetdi Ms Excel


Jika anda ingin mengurutkan Sheet dari besar ke kecil (secara descending), maka balik saja tanda < yang ada di kode VBA menjadi > atau lebih jelasnya kode:
If Sheets(a).Name < Sheets(b).Name Then

Diganti menjadi
If Sheets(a).Name > Sheets(b).Name Then


Komentar

  1. terimakasih, berjalan lancar

    BalasHapus
  2. kalau misalkan mengurutkan sheet otomatis sesuai data yang di ambil dari cell aktif nya gimana? mohon bantuannya

    BalasHapus

Posting Komentar

SPAM akan dihapus.

Tidak ketemu? Coba cari..

Postingan populer dari blog ini

Cara Menghitung Persentase(%) Untung/Rugi

Cara mendapatkan persen keuntungan/kerugian - Kegunaan utama persentase adalah untuk membandingkan dua hal yang tidak sama persis. Pada artikel terdahulu saya telah menulis dasar-dasar bagaimana cara menghitung persentase. Kini kita akan lebih bahas lebih dalam lagi khususnya untuk menentukan persentase keuntungan dan kerugian dalam proses jual-beli barang. Ilustrasi timbangan untung Rugi     Untung atau Rugi? Sebelum membahas lebih jauh, anda harus tahu dahulu istilah untung dan rugi. Penjualan dikatakan untung bila Harga Barang yang dijual lebih besar dari modal yang kita keluarkan untuk membeli barang tersebut. Sedangkan penjualan dikatakan mengalami kerugian jika harga jual lebih kecil dari harga perolehan/pembelian barang.   Untung adalah Harga Penjualan > Harga Pembelian Untung = Harga Penjualan – Harga Pembelian Persentase Keuntungan = Untung / Harga Pembelian x 100%   Rugi adalah Harga Penjualan < Harga Pembelian Rugi = Harga Pembelian – Harga Penjualan Per

Rumus Luas Permukaan Balok

Cara Mencari Luas Permukaan Balok . - Balok adalah bangun ruang tiga dimensi yang dibentuk oleh tiga pasang persegi panjang dengan setidaknya salah satu pasang diantaranya berbeda. Bila ketiga pasang sisi bangun ruang tersebut berbentuk persegi (bujur sangkar) yang sama dan sebangun maka disebut sebagai kubus. Balok memiliki 6 sisi, 12 rusuk dan 8 titik sudut. Untuk lebih jelas, lihat ilustrasi balok pada gambar di bawah ini. Ilustrasi Balok Pada gambar di atas p adalah panjang (rusuk) balok, l adalah lebar balok, dan t adalah tinggi balok. Bila pada artikel sebelumnya telah dibahas tentang rumus volume balok, maka pada artikel ini kita akan membahas secara detail atau rinci mengenai bagaimana cara menghitung luas permukaan/selimut balok termasuk mmenghitung luas alas balok berdasarkan luas selimut balok.   RUMUS LUAS BALOK Dengan menganggap p adalah panjang dari balok, l adalah lebar balok, dan t adalah tinggi balok seperti yang dapat dili

Cara Membagi Satu Kertas Menjadi Dua Halaman di Microsoft Word

Kadang kita ingin membuat sebuah kertas baik itu A4, Folio/F4 atau yang lainnya, bisa menjadi dua halaman. Hal tersebut kita lakukan agar hasil pencetakan (print) menjadi lebih kecil dan praktis untuk dibawa-bawa. Kita bisa mencetak 2 buah halaman A4 dalam satu lembar kertas A4 , tetapi pada kertas hasil cetak ukuran font yang dicetak tentu akan menjadi lebih kecil dari yang kita gunakan. Untuk menjaga agar ukuran font tetap dan hasil cetak tetap bisa dua halaman dalam satu kertas, maka anda bisa mengaturnya di Microsoft Word dengan menggunakan langkah berikut. Klik menu ribbon Page Layout , Kemudian klik tombol untuk memunculkan Dialog Page Setup Selanjutnya pada dialog Page Setup tersebut pilih tab Margin Kemudian pada bagian Orientation pilih Landscape Pada bagian Pages , isikan nilai Multiple pages dengan 2 pages per sheet Kemudian klik tombol OK . Tips Membagi Satu Kertas Menjadi Dua Halaman di Microsoft Word Anda bisa menggunakan cara membagi kertas t

Rumus Luas dan Keliling Trapesium

Cara Menghitung Luas Trapesium - Trapesium adalah bangun datar segi empat yang dibentuk dengan empat dua buah rusuk / sisi yang dua diantaranya saling sejajar tetapi tidak sama panjang. Trapesium hanya memiliki 1 simetri putar. Ada tiga jenis trapesium : trapesium sembarang, trapesium sama kaki dan trapesium siku-siku. Rumus Luas Trapesium adalah : Adapun untuk panjang keliling trapesium dihitung dengan menjumlahkan keempat rusuk/sisinya. Karena panjang sisi belum tentu sama maka cara terbaik adalah dengan menjumlahkan empat buah rusuk/sisi tersebut. Contoh Trapesium Sembarang ABCD Trapesium sembarang adalah trapesium dengan keempat rusuk/sisinya tidak sama panjang. Trapesium sembarang tidak memiliki simetri lipat. Luas Trapesium Sembarang ABCD = (BC + AD) x t / 2 Keliling Trapesium ABCD = AB + BC + CD + DA Contoh Trapesium Siku-siku PQRS Trapesium siku-siku adalah trapesium yang memiliki dua sudut siku-siku dan rusuk / sisi yang saling sejajar tegak lurus

Cara Menghitung Persentase Kenaikan

Rumus menghitung persentase kenaikan - Semua pengusaha bisnis pasti menginginkan usahanya semakin berkembang yang ditunjukkan dari waktu ke waktu dengan kenaikan, baik kenaikan omzet maupun keuntungan. Kenaikan tersebut selain dapat dilihat dari angka nominal yang biasanya di tunjukkan dalam rupiah atau unit, juga sering dihitung dengan menggunakan persen. Persentase kenaikan merupakan nilai persentase tambahan nilai terakhir dari nilai sebelumnya. Biasanya persentase kenaikan ini menjadi pembanding utama dalam usaha bisnis. Orang akan melihat berapa persen kenaikan omzet, berapa persen keuntungan, dan seterusnya. Untuk menghitung persentase kenaikan dapat menggunakan rumus sebagai berikut : Rumus : Persentase (%) = (akhir – awal) / awal x 100% dimana nilai akhir adalah nilai yang lebih besar dari nilai awal . jika nilai awal lebih rendah, maka yang harus anda hitung adalah persentase penurunan. Rumus menghitung Persentase Kenaikan