Hai Al Ghozali,
methods OnKey milik Application bisa dimanfaatkan. Sebaiknya pengubahan
tabiat penekanan tombol ini dilokalisir untuk sheet tertentu saja.
Di sebuah general module copas script berikut :
1. misalkan Anda sudah punya prosedur untuk print bernama ProsesPrint
berbunyi begini
public sub ProsesPrint()
activesheet.printpreview 'sesuaikan saja dengan kebutuhan setempat
end sub
2. buat prosedur pengubah tabiat tombol Enter (enter untuk text dan enter
untuk numpad)
public sub Aktifken()
application.onkey "~","ProsesPrint" 'ini untuk enter text
(tombol enter yang biasanya di atas shift sisi kanan
application.onkey "{ENTER}","ProsesPrint" 'ini untuk enter numpad
end sub
3. buat juga prosedur untuk mengembalikan tabiat tombol ke keadaan semula
public sub NonAktifken()
application.onkey "~", 'ini untuk enter text (tombol
enter yang biasanya di atas shift sisi kanan
application.onkey "{ENTER}" 'ini untuk enter numpad
end sub
sekarang, mulai menyiapkan kapan diaktifkannya tabiat yang baru. Jangan
lupa, diusahakan dilokalisir di sheet tertentu.
Misal : Sheet yang diprint bernama 'myPrint' (yang tampak di tab sheet di
worksheet) dengan codename 'Sheet1' di VBE
4. mengaktifkan tabiat baru ketika sheet bernama 'myPrint' diaktifkan.
> buat event worksheet activate milik myPrint, lalu panggi prosedur bernama
Aktifken.
> Jadi, isi dalam blok prosedur tersebut adalah :
Aktifken
5. mengembalikan tabiat ke asalnya
> buat event worksheet deactivate milik myPrint, lalu panggil prosedur
NonAktifken.
> Jadi, isi dalam blok proedur tersebut adalah :
NonAktifken
6. Save as workbook dengan type .xlsm (macro enabled) atau .xlsb (excel
binary)
7. (optional) bila perlu, di-event workbook open ada proses untuk
mengaktifkan sheet selain myPrint (alias sheet untuk print)
> misal di event open milik workbook, diberi proses untuk mengaktifkan
sheet bernama 'Home' (buat sebuah sheet dan beri nama Home lebih dulu)
> Bunyinya begini :
Sheets("Home").activate
Wassalam,
Kid
2016-01-20 15:26 GMT+07:00 Agus Salim Al Ghozali [email protected]
[belajar-excel] <[email protected]>:
>
>
> Salam Mas,
>
> Saya maw Tanya ni mas, pada Excel saya buat tombol cetak/Print,
> pertanyaan saya bias tidak mas ketika maw print hanya menekan tombol
> ENTER pada Keyboard tanpa harus Klick tombol cetak yang kita buat
> macro tersebut??? jadi kalau maw Print data cukup dengan menekan
> tombol ENTER saja, Bisa tidak Mas?? kalaw bias mohon bantuanya dunk
> mas caranya??
>
> Salam,
> Al Ghozali
>
>
