kacian bang momod, membernya gak pada nurut rules...
Private Sub CmdSAVE_Click()
' siti Vi / 24 may 2010
Dim Isian As Range, NewPos As Range
With Sheets("OUTPUT")
Set Isian = Range("D5,D7,D9,D11,D13")
Set NewPos = .Range("B65536").End(xlUp).Cells(2, 1)
NewPos(1, 0) = NewPos.Row - 2
Isian.Copy
NewPos.PasteSpecial _
Paste:=xlPasteValuesAndNumberFormats, Transpose:=True
Application.CutCopyMode = False
.Select
.Range("A1").Select
End With
End Sub
' siti Vi / 24 may 2010
Dim Isian As Range, NewPos As Range
With Sheets("OUTPUT"
Set Isian = Range("D5,D7,
Set NewPos = .Range("B65536"
NewPos(1, 0) = NewPos.Row - 2
Isian.Copy
NewPos.PasteSpecial _
Paste:=xlPasteValue
Application.
.Select
.Range("A1")
End With
End Sub
Private Sub CmdReset_Click()
Range("D5:D13").ClearContents
End Sub
Range("D5:D13"
End Sub
----- Original Message -----From: Jaya Thalib(sampe capek deh... itu banyak message masuk sp4m folder karena pada cc individu)Sent: Monday, May 24, 2010 12:45 AMSubject: ]] XL-mania [[ gimana caranya format input data tersave ke sheet lainnya
.
__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| momods di tempat terpencil... moderasi lemots. |
| 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 |
+-------------------------------------------------------------------+
| momods di tempat terpencil... moderasi lemots. |
| 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