Makasi mas, saya coba dulu
Pada tanggal 20/01/16, 'Mr. Kid' [email protected] [belajar-excel] <[email protected]> menulis: > 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 >> >> >
