mengambil data dari workbook lain tidak ada masalah
selama workbook tsb sudah dibuka **)
yaitu tinggal menyebutkan nama Workbooknya atau Variable-object
yg mewakilinya
Worksheets("Target").Cells(NewRow, 1) = _
ExpresiObjectWorkbook .Worksheets("Source").Range("B1")
----- Original Message -----
From: Alie Salimul Ilman
To: xl-mania@yahoogroup
Sent: Friday, February 05, 2010 2:29 PM
Subject: ]] XL-mania [[ gmn cara add record ke workbook lain dengan macro?
Hi all, salam kenal
mo nanya nih,
saya sedang buat add record dengan menggunakan button,
saya sudah berhasil untuk meng-add record dalam satu workbook
(dari sheet1 ke sheet yg lain dalam satu file workbook)
adakah cara untuk meng-add record ke file workbook lain....
mohon bantuannya...
ini code VBA saya........
Sub add_Click()
Dim NewRow As Integer
NewRow = Worksheets("Source").Range("A1").Value + 1
Worksheets("Target").Cells(NewRow, 1).Value = _
adakah cara untuk meng-add record ke file workbook lain....
mohon bantuannya..
ini code VBA saya........
Sub add_Click()
Dim NewRow As Integer
NewRow = Worksheets("
Worksheets("
Worksheets("Source").Range("B1").Value
MsgBox "Data added", vbOKOnly, "Message"
Worksheets("Source").Range("A1").Value = NewRow
Worksheets("Source").Range("B1").Select
End Sub
Mohon bantuan master xl,.... makasih
Worksheets("
Worksheets("
End Sub
Mohon bantuan master xl,.... makasih
__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Member ke 13,013 siapa ya? Sini mau dikirimin coklat :D |
| Member ke 31,031 dapet iPod dehh.... :D :D :D |
| 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 |
+-------------------------------------------------------------------+
| Member ke 13,013 siapa ya? Sini mau dikirimin coklat :D |
| Member ke 31,031 dapet iPod dehh.... :D :D :D |
| 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 |
+-------------------------------------------------------------------+
.
__,_._,___
Nenhum comentário:
Postar um comentário