Memberi nama tabSheet dengan ANGKA yg selalu urut sesuai letaknya
Private Sub RenameSheet()
Dim w As Worksheet
For Each w In Worksheets
w.Name = w.Index
Next
End Sub
Dim w As Worksheet
For Each w In Worksheets
w.Name = w.Index
Next
End Sub
atetapi, sebelum prosedur tsb dijalankan, harus ada prosedur lain yg
"jalan" lebih dulu, dan jalannya harus otomatis (tidak perlu user menjalankannya)
pada prosedur yg "jalan lebih dulu itu" perlu juga dicegah hal-hal yg "membahayakan"
misalnya mencegah duplikasi penamaan tab sheet)
(lihat modules di VBE pada workbook lampiran mail ini)
Jika hasilnya tidak anda sukai, nama tab-sheet dapat dikembalikan ke aslinya
dengan :
Sub Reset_SheetName()
Dim w As Worksheet
For Each w In Worksheets
w.Name = w.CodeName
Next w
End Sub
Dim w As Worksheet
For Each w In Worksheets
w.Name = w.CodeName
Next w
End Sub
----- Original Message -----
From: Paulus Yokie Radnan K.
To: XL-mania@yahoogroup
Sent: Wednesday, November 25, 2009 10:00 AM
Subject: ]] XL-mania [[ Bikin nomor urut di sheet excel
Dear Para Suhu Excel,
Saya ada kendala nih bikin nomor urut di sheet…contohnya :
Sheet 1 dikasih nomor 1, sheet 2 dikasih nomor 2 dan begitu mo move or
copy sheet dia langsung berubah otomatis jadi nomor 3 dan seterusnya…
Please help ya…
Terima kasih
Terima kasih
__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Setelah bang momods kawin bulan lalu... bulan ini tanggal |
| 2 Desember bu guru Siti Vi ulang tahun lhooo.... |
| 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 |
+-------------------------------------------------------------------+
| Setelah bang momods kawin bulan lalu... bulan ini tanggal |
| 2 Desember bu guru Siti Vi ulang tahun lhooo.... |
| 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