Diskusi tentang Excel

Macro Excel || Trik Mengetahui dan Menampilkan User Name

Kembali belajar tentang macro, kali ini saya akan menulis artikel singkat tentang bagaimana mengetahui dan menampilkan UserName pada sebuah aplikasi excel menggunakan Macro. UserName ini akan berbeda-beda di setiap komputer tergantung ketika penginstallan aplikasi UserName yang diinputkan.
OK, langsung saja bagaimana cara membuatnya?
  1. Langkah pertama adalah silakan buat desain di lembar kerja excel Anda seperti gambar berikut ini
  2. Untuk tombol "Tampilkan User" silakan gunakan Insert Button pada menu Developer kemudian pilih insert dan ganti nama Button1 menjadi "Tampilkan User"
  3. Buka Visual Basic editor dengan cara mengklik Menu Developer kemudian pilih view source sehingga akan tampil jendela visual basic editor
  4. Ketikan script vba berikut pada Thispoint Workbook

  5. 'Macro menampilkan usernama
    'jago-office.blogspot.com
    'oleh:Yatna Supriyatna
    Public Sub Get_UserName()
    Cells(2, 2) = Application.UserName
    End Sub
  6. Jika selesai langkah berikutnya silakan kembali ke lembar kerja klik kanan tombol "Tampilkan User" kemudian pilih Asign Macro
  7. Pilih ThisWorkbook.get_username kemudian klik OK
    Selesai.
Untuk cek apakah script vba macro yang anda buat berhasil silakan klik tombol "Tampilkan User" jika benar maka di cell B2 akan tampil user secara otomatis. Kalo di komputer penulis tampilkannya seperti berikut
 Kenama Username yang muncul adalah "Antay" karena ketika penginstalan windows ini saya beri nama user dengan "Antay" jika Anda mencoba dikompi sendiri UserName akan berbeda.

OK, kira-kira begitu macro excel untuk mengetahui atau menampilkan UserName dan silakan coba semoga berhasil, jika ada pertanyaan mengenai artikel macro excel ini silakan komentar dibawah.



Related

Macro Excel VBA 4294831569286834154

Post a Comment

Tulisan ini Bermanfaat..? Silakan berkomentar sesuai topik artikelnya, tidak dianjurkan menggunakan kata-kata yang dapat menimbulkan hal negatif. Mohon maaf apabila tidak memiliki etika akan Admin HAPUS tanpa pemberitahuan kembali. Terimakasih... salam Exceler

emo-but-icon

item