Microsoft Excel adalah salah satu program spreadsheet paling kuat yang tersedia, dan berguna untuk berbagai macam kegiatan mulai dari analisis keuangan hingga proyek sains. Namun, kebanyakan orang menganggap Excel terbatas pada manipulasi kisi-kisi rumus, yaitu fungsionalitas spreadsheet tradisional. Tetapi skrip Visual Basic Excel membuatnya mudah untuk melakukan lebih dari itu. Dengan VB, Anda dapat menggambar bentuk apa pun yang Anda suka di spreadsheet, dan menggunakannya untuk membuat gambar, bagan, dan grafik lainnya untuk membantu memvisualisasikan spreadsheet Anda.
Langkah 1
Buka Microsoft Excel. Jika Anda memiliki Excel 2007 atau lebih baru, buka tab "Lihat" pada pita dan klik "Makro"; jika tidak, klik menu "Alat", dan pilih "Makro". Kotak dialog Makro akan muncul.
Video Hari Ini
Langkah 2
Ketik nama makro dan klik "Buat". Ini akan membuka editor aplikasi Visual Basic dengan subrutin kosong baru yang ditampilkan di layar.
Langkah 3
Tentukan koordinat X dan Y yang ingin Anda gunakan untuk awal dan akhir vektor Anda. Sudut kiri atas spreadsheet berada di (0, 0), dan X dan Y masing-masing meningkat saat Anda bergerak ke kanan dan ke bawah. Masukkan nilai-nilai ini ke dalam variabel, seperti ini:
start_x = 0 start_y = 0 end_x = 100 end_y = 100
Nilai-nilai ini akan menggambar garis diagonal di sudut kiri atas spreadsheet. Anda mungkin perlu bereksperimen dengan angka yang berbeda untuk mendapatkan garis tepat di tempat yang Anda inginkan.
Langkah 4
Tambahkan kode untuk menggambar garis itu sendiri:
garis = Sheet1.Shapes. AddLine (start_x, start_y, end_x, end_y)
Langkah 5
Tambahkan kode untuk menambahkan panah ke akhir baris, agar terlihat seperti vektor:
garis. Garis. EndArrowheadStyle = MsoArrowheadStyle.msoArrowheadTriangle
Langkah 6
Tutup editor Visual Basic dan buka kotak dialog Makro (lihat Langkah 1). Klik makro Anda dan klik "Jalankan". Anda akan melihat garis Anda muncul.
Tip
Anda dapat menggunakan variabel "garis" yang dibuat pada Langkah 4 untuk mengubah properti lain dari vektor Anda. Misalnya, untuk mengubah warna garis menjadi hijau, Anda dapat menulis "line. Garis. Warna Depan. RGB = RGB(0, 255, 0)"