gunakan shape aja, setuju? lanjut...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'anton suryadi 23/Jun/2010
With ActiveSheet.Shapes("line")
.Top = Cells(ActiveCell.Row, ActiveCell.Column).Top
.Left = Cells(ActiveCell.Row, 1).Left
.Width = Range("A1:Z1").Width
.Height = Cells(ActiveCell.Row, ActiveCell.Column).Height
End With
End Sub
File terlampir
>semoga bermanfaat
From: Roji Bahaudin <dagmedt@gmail.com>
To: XL-mania@yahoogroups.com
Sent: Wed, June 23, 2010 10:38:55 AM
Subject: ]] XL-mania [[ Row aktif berwarna
Private Sub Worksheet_Selection
'anton suryadi 23/Jun/2010
With ActiveSheet.
.Top = Cells(ActiveCell.
.Left = Cells(ActiveCell.
.Width = Range("A1:Z1"
.Height = Cells(ActiveCell.
End With
End Sub
File terlampir
>semoga bermanfaat
From: Roji Bahaudin <dagmedt@gmail.
To: XL-mania@yahoogroup
Sent: Wed, June 23, 2010 10:38:55 AM
Subject: ]] XL-mania [[ Row aktif berwarna
Dear Pakar2 Excel
Saya lagi punya masalah, beberapa kali ngutek-utek macro belum berhasil.
Saya pingin ketika klik sebuah kolom, maka row-nya menjadi warna kuning, saat pindah kolom maka row yg tidak aktif warnanya kembali normal. Akan tetapi tidak mempengaruhi warna kolom jika sudah ada warnanya.
pada file lampiran, row bisa berwarna kuning, tetapi saat pindah kolom warna row yang tidak aktif tetap kuning, kira2 giman ya scriptnya...
Mohon bantuannya
__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| momod akan terdampar seminggu lagi, moderasi akan lemodmod... |
| hidup tanpa google dan fesbuk dan yahuuuu... ampun dehhh... |
| 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 |
+-------------------------------------------------------------------+
| momod akan terdampar seminggu lagi, moderasi akan lemodmod... |
| hidup tanpa google dan fesbuk dan yahuuuu... ampun dehhh... |
| 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 |
+-------------------------------------------------------------------+
MARKETPLACE
.
__,_._,___
Nenhum comentário:
Postar um comentário