(1)
MAKRO UNTUK MENUJU CELL DI KOLOM A DI BARIS KE SEKIAN
DIMANA SEKIAN ITU TERTULIS DI CELL A12
CARA MENJALANKAN MAKRO
Berhubung tidak anda rincikan, maka penanggap tentukan sendiri semauk-mauknya
(mumpung diberi kebebasan) yaitu dengan menDouble Click Cell A12
Private Sub Worksheet_BeforeDoubleClick( _
ByVal Target As Range, Cancel As Boolean)
Application.EnableEvents = False
If Target.Count = 1 Then
If Target.Address = "$A$12" Then
If Target.Value > 0 Then
Cells(Target.Value, 1).Activate
End If
End If
End If
Application.EnableEvents = True
End Sub
(2)
MAKRO KEMBALI KE CELL A12
Sebenarnya untuk keperluan seperti ini Excel sudah menyediakan tombol F5 ,
anda tinggal ketik A12 dan OK
Tetapi bila ingin menulis sendiri makronya, mungkin hanya seperti ini
Sub KembaliKeCellA12()
' Keyboard Shortcut: Ctrl+k
'----------------------------
Application.Goto Reference:="R12C1"
End Sub
atau inti makro-nya dapat diganti dengan
Range("A12").Activate
di workboook terlampir makro kedua tsb telah di set short cut nyA = Ctrl + k
2011/5/30 warujuanda <warujuanda@yahoo.com.sg>
tuk excelmania salam kenal dan Mohon bantuannya.. saya mempunyai masalah seperti ini:
di cell A12 tertulis angka 5 saja terus kursor saya arahkan ke cell A12 terus saya run macronya yg nantinya kursor akan lari ke cell A5... setelah input macem2 saya lgsg pingin kembali lagi ke cell A12, dmn kembalinya kursor ngeklik macro jg....
dmn di cell A12 tidak selalu tertulis angka 5 ... bisa 345, 32, 1234 dst
dan tidak selalu di cell A12, bisa.. A123, A546 dll
jadi yg perlu dibuat macro ke1 untuk menuju cell tertentu, macro ke2 kembali lagi ke cell data sebelumnya dlm hal ini cell A12
terima kasih atas bantuannya
Haryanto
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| maaf baru moderate sekarang... momods kurang tidur berhari-hari |
| jadi budak kantoooOOooorrr... |
|
http://www.facebook.com/group.php?gid=37671048001&ref=mf |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message, melecehkan, tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan winzip jika perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
|
http://groups.yahoo.com/group/XL-mania/files/Promotion/ |
+-------------------------------------------------------------------+
| Berikan testimoni di :
http://www.friendster.com/xlmania atau... |
|
http://www.xl-mania.com/2008/06/testimoni-xl-mania.html |
+-------------------------------------------------------------------+
| Message lama ada di : |
|
http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id] |
|
http://www.mail-archive.com/xl-mania@yahoogroups.com |
+-------------------------------------------------------------------+