Teknik Pencabangan If -- Then -- Else -- End If Geser Kiri Atas Kanan

-
Pada artikel sebelumnya sudah dibahas bagaimana membuat Program VBA Excel menggunakan Teknik Pencabangan  If -- Then -- Else -- End If dengan contoh program Geser Kiri ketika kursor berada pada kolom lebih dari satu ( 1 ) dan membuat Pesan ketika kursor sudah berada pada kolom paling kiri.
Marilah kita kembangkan program tersebut dengan geser ke atas ketika kursor berada pada kolom paling kiri.
Diagram alurnya adalah sebagai berikut :

Maka program yang dibuat adalah :

Kalau program ini dijalankan, maka pada saat posisi kursor ada di A1 ( Paling Kiri dan paling atas ) kursor akan ke kanan yaitu ke B1. Pada saat posisi di B1 (Paling atas) ketika dijalankan kursor akan geser ke kiri. Dengan demikian kursor akan selalu bergeser kanan dan kiri di A1 dan B1.
Agar kursor tetap bergeser ke kanan setelah dari A1, maka syarat pencabangan yang pertama harus diubah. Jika sebelumnya disyaratkan bahwa pada saat kursor berada pada kolom tidak paling kiri dia ke kiri dan pada saat kursor berada pada posisi paling kiri maka kursor tidak ke kiri maka harus diubah karena ini akan berlaku pada saat di B1, kursor akan ke kiri.
Syaratnya sebaiknya diubah seperti pada diagram alur di bawah ini.

Program VBA Excel yang digunakan adalah :

Ada tambahan script
Activecell.column > 1 and Activecell.Row > 1 
Tambahan script di atas untuk membatasi agar pada posisi B1 kursor tetap geser ke kanan.
ActiveCell.Interior.ColorIndex = ActiveCell.Column
ActiveCell.Interior.ColorIndex = ActiveCell.Row
Tambahan script di atas untuk memberi efek warna tergantung pada posisi kolom kursor dan posisi Baris Kursor sesuai dengan Tabel Color Index di bawah ini :

Komentar

Posting Komentar

Postingan populer dari blog ini

NEGARA DAN WARGA NEGARA

-
Gambar
 NEGARA DAN WARGA NEGARA A.     Warga Negara Warga negara adalah semua orang yang secara hukum merupakan anggota resmi dari suatu negara tertentu. Warga negara bisa berupa warga negara lokal atau warga negara asing di sebuah negara. Definisi warga negara pun memiliki banyak perbedaan karena tiap negara juga memiliki konsep dan asas kewarganegaraan yang berbeda-beda. 1.          Hak Setiap warga negara memiliki hak perorangan. Hak individu tersebut dapat anda lihat dalam UUD 1945, tepatnya Pasal 27 sampai dengan Pasal 34. Beberapa contoh hak warga negara yang mutlak didapatkan oleh setiap individu yaitu sebagai berikut : -           Hak meneruskan anak keturunan. -           Hak bertumbuh kembang dengan baik. -           Hak mendapatkan keadilan dan kepastian di mata hukum.  Secara hukum, WNI adalah orang asli Indonesia dan orang dari bangsa lain yang telah melewati proses naturalisasi dan sudah disahkan dengan undang-undang sebagai warga negara. Ketetapan tersebut dibuat oleh negara da
Baca selengkapnya

Bagian Bagian Motherboard dan fungsinya

-
Gambar
Motherboard adalah salah satu bagian penting dari komputer, dan merupakan Papan sirkuit utama. Motherboard menghubungkan semua bagian dari komputer, yang Terdiri dari soket Processor, slot RAM,slot PCI, slot AGP, konektor IDE/SATA dan port. Setiap motherboard dilengkapi dengan konektor dan slot untuk menghubungkan semua bagian yang terpisah dalam1 unit komputer. Berikut ini daftar semua slot dan konektor yang ada pada motherboard dan fungsinya. Macam macam slot dan konektor Soket CPU North Bridge South Bridge Slot RAM Slot AGP Slot PCI Slot CNR Konektor floppy Konektor IDE Primer dan Sekunder
Baca selengkapnya

HAKIKAT PENDIDIKAN KEWARGANEGARAAN

-
Gambar
     Belajar tentang Pendidikan Kewarganegaraan (PKn) pada dasarnya adalah belajar tentang keindonesiaan, belajar untuk menjadi manusia yang berkepribadian Indonesia, membangun rasa kebangsaan, dan mencintai tanah air Indonesia. Oleh karena itu, seorang sarjana atau profesional sebagai bagian dari masyarakat Indonesia yang terdidik perlu memahami tentang Indonesia, memiliki kepribadian Indonesia, memiliki rasa kebangsaan Indonesia, dan mencintai tanah air Indonesia. Dengan demikian, ia menjadi warga negara yang baik dan terdidik (smart and good citizen) dalam kehidupan masyarakat, bangsa, dan negara yang demokratis.
Baca selengkapnya