Coba pakai Code ini, buatan salah satu pakar yang pernah dimuat dalam milis ini
Sub hapus_shape()
Dim wsh As Worksheet
Dim sh As Shape
Set wsh = Worksheets("NamaWorkSheet")
For Each sh In wsh.Shapes
sh.Delete
Next
End Sub
Salam,
Hendrik Karnadi
From: rizal <icalg009@yahoo.co.id>
To: XL-mania@yahoogroups.com
Sent: Tuesday, 19 June 2012, 10:17
Subject: ]] XL-mania [[ Bahasa VB Select & delete bitmap
Dear Pakar Excel,
Saya ada masalah di pembuatan report di excel.
Di dalam report tsb, ada gambar dgn nama prtpie1.
Sya juga menggunakan macro untuk otomatisasi laporan.
Mohon bantuannya, bagaimana bahasa VB untuk select dan hapus gambar prtpie1 tsb?
Atas perhatiannya terima kasih.
Salam,
Icalg
Saya ada masalah di pembuatan report di excel.
Di dalam report tsb, ada gambar dgn nama prtpie1.
Sya juga menggunakan macro untuk otomatisasi laporan.
Mohon bantuannya, bagaimana bahasa VB untuk select dan hapus gambar prtpie1 tsb?
Atas perhatiannya terima kasih.
Salam,
Icalg
__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Woooowwww... member XL-mania tembus 20,000!!! |
+-------------------------------------------------------------------+
| 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.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 |
+-------------------------------------------------------------------+
| Woooowwww... member XL-mania tembus 20,000!!! |
+-------------------------------------------------------------------+
| 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.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