Minggu, April 26, 2015

Mengisi Kotak/Cell Excel Dengan Teks, Angka Atau Karakter Menggunakan Macro

Misalnya kita akan mengisi kotak A1 dengan suatu teks:
Menu Developer > Visual Basic > Klik kanan pada VBEProject(nama_file.xlsx) > Insert > Module, ketikkan kode berikut:
Sub isiData()
  Range("A1").Value = "teks yang akan tampil sebagai isi kotak"
End Sub

Jika ingin mengisikan teks dari kotak A1 sampai dengan F6:
Sub isiData()
  Range("A1:F6").Value = "teks yang akan tampil sebagai isi kotak"
End Sub

Jika ingin diisi dengan angka:
Sub isiData()
  Range("A1:F6").Value = 789
End Sub

Sumber: Tutorial Excel Indonesia: https://www.youtube.com/watch?v=RxAgtqr6YA4

0 komentar: