Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

 MlatenMania.com - Hallo Sobat Blogger semuanya, selamat datang kembali di blog sederhana Saya ini. Saya ucapkan terimakasih sebanyak-banyaknya bagi Anda yang sudah mengujungi blog sederhana Saya ini. Sesuai dengan judul artikel ini, pada kesempatan ini Saya akan berbagi sebuah tutorial mengenai VBA Excel. Berikut merupakan pembahasan lengkapnya:

Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

Macro Di Excel

Makro di Excel adalah serangkaian perintah yang digunakan untuk mengotomatiskan tugas-tugas berulang di dalam lembar kerja, yang direkam dalam bahasa pemrograman Visual Basic for Applications (VBA). Dengan makro, Anda dapat merekam tindakan seperti memformat sel, menyalin data, dan perhitungan untuk dijalankan kembali tanpa harus melakukannya secara manual, sehingga menghemat waktu dan meningkatkan efisiensi.

Cara Kerja Macro

  • Perekaman Makro: Anda dapat membuat makro dengan "merekam" tindakan yang Anda lakukan di Excel, seperti mengklik mouse atau menekan tombol keyboard. 
  • VBA (Visual Basic for Applications): Makro direkam dan ditulis menggunakan bahasa pemrograman VBA, yang memungkinkan Anda membuat tugas otomatis yang lebih kompleks. 
  • Otomatisasi: Setelah makro dibuat, Anda dapat menjalankannya untuk melakukan serangkaian tindakan yang telah Anda rekam secara otomatis. 

Manfaat Menggunakan Macro

  • Otomatisasi Tugas: Membantu menyelesaikan tugas-tugas yang bersifat rutin dan berulang dengan lebih cepat dan mudah. 
  • Efisiensi: Membebaskan waktu Anda dari pekerjaan manual, sehingga Anda bisa fokus pada tugas yang lebih penting. 
  • Fleksibilitas: Anda dapat mengedit makro yang sudah ada untuk melakukan perubahan kecil pada cara kerjanya atau untuk kebutuhan yang berbeda. 

Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

Code Macro ini bisa kita manfaatkan untuk menyisipkan sebuah gambar ke dalam Sheet/lembar kerja Excel, dengan bantuan Shape sebagai media untuk menempelkan gambar tersebut, berikut merupakan cara ataupun langkah-langkahnya:

1. Sisipkan sebuah Shape (rectangle) sebagai media untuk menempelkan foto, perhatikan gambar di bawah ini:

Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

2. Beri nama Shape tersebut "FOTO" dengan cara klik pada Shape tersebut. Kemudian Tuliskan "FOTO" pada Name Box, kemudian tekan Enter pada keyboard. Perhatikan gambar di bawah ini:

Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

3. Sisipkan sebuah Shape lagi, kali ini akan kita gunakan sebagai tombol/button. Dan yang Saya gunakan pada contoh ini adalah Rectangle: rounded corners, kemudian tambahkan teks pada Shape tersebut. Perhatikan gambar di bawah ini:

Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

4. Buka jendela Visual Basic (menekan tombol kombinasi CTRL+F11 pada keyboard) atau klik pada Tab Menu Developer - Visual Basic. Kemudian di dalam jendela Visual Basic kita sisipkan sebuah Module.

5. Selanjutnya silahkan Copas Code Macro di bawah ini ke dalam Module tersebut:

Sub InsertPicture()
Dim vFilePic
ChDir ActiveWorkbook.Path
vFilePic = Application.GetOpenFilename _
("Pictures (*.gif;*.jpg;*.bmp;*.tif;*.png),*.gif;*.jpg;*.bmp;*.tif;*.png", , "Pilih Foto")
If vFilePic = False Then Exit Sub
ActiveSheet.Shapes("FOTO").Fill.UserPicture vFilePic
End Sub

6. Tutup jendela Visual Basic/kembali ke lembar kerja Excel, kemudian klik kanan pada tombol yang sudah kita buat sebelumnya dan pilih Assign Macro, perhatikan gambar di bawah ini:


Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

7. Klik pada InserPicture kemudian klik OK, perhatikan gambar di bawah ini:

Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

8. Simpan lembar kerja kita dengan ekstensi *.xlsm (Excel Macro-Enabled Workbook), perhatikan gambar di bawah ini:

Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

Silahkan klik tombol Insert Picture yang sudah kita sisipkan Macro tadi, jika langkah-langkah di atas Anda lakukan dengan benar, maka akan seperti pada gambar di bawah ini:

Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet

Demikian artikel mengenai Code Macro Untuk Menyisipkan Gambar Ke Dalam Sheet, semoga apa yang sudah Saya sampaikan pada kesempatan ini bisa bermanfaat untuk kita semuanya. Sekian dan terimakasih.

Baca Juga

Post a Comment

Tinggalkan komentar Anda disini:

Join the conversation