15 New Messages
Digest #2513
6a
Trs: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di k by "Andy Ajhis Ramadhan" andy_ajhis37
6c
Trs: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di k by "Andy Ajhis Ramadhan" andy_ajhis37
Messages
Wed Sep 4, 2013 8:33 pm (PDT) . Posted by:
"Eko Noviyanto" nopenk77
Dear Master XL,
Mohon bantuannya untuk case terlampir.
Terimakasih diucapkan atas bantuannya.
Salam,
Nopenk
Mohon bantuannya untuk case terlampir.
Terimakasih diucapkan atas bantuannya.
Salam,
Nopenk
Wed Sep 4, 2013 9:37 pm (PDT) . Posted by:
"nangAgus" nangagoez
Dear Belajar-Excel
Salam sejahtera.
Saya memiliki sebuah file eXcel dengan Date and Time picker, File
tersebut saya bagikan pada rekan kerja satu kantor. namun pada komputer
tertentu Date and Time Picker tidak dapat dibuka (tanda silang merah).
Saya minta tolong, bagaimana caranya mengubah office excel pada komputer
tersebut agar dapat membaca Date Time picker? Saya sudah down load
MSCOMCT2.cab dari microsoft dan sudah saya pasang, namun Date time
Picker belum dapat digunakan.
Terima kasih
Salam sejahtera
Nang Agus
--- Mods ---
Coba cari dipostingan lawas tentang mscal atau dtpicker atau register dtpicker
------------
Salam sejahtera.
Saya memiliki sebuah file eXcel dengan Date and Time picker, File
tersebut saya bagikan pada rekan kerja satu kantor. namun pada komputer
tertentu Date and Time Picker tidak dapat dibuka (tanda silang merah).
Saya minta tolong, bagaimana caranya mengubah office excel pada komputer
tersebut agar dapat membaca Date Time picker? Saya sudah down load
MSCOMCT2.cab dari microsoft dan sudah saya pasang, namun Date time
Picker belum dapat digunakan.
Terima kasih
Salam sejahtera
Nang Agus
--- Mods ---
Coba cari dipostingan lawas tentang mscal atau dtpicker atau register dtpicker
------------
Wed Sep 4, 2013 10:08 pm (PDT) . Posted by:
"Jan Raisin"
coba juga cara ini gan.. (jadi kayak sebutan di forum tetangga nih..)
asumsi data seperti ini:
[image: Gambar sisip 1]
antara nama kota kecamatan/kotamadya dengan kabupaten dan provinsi
dipisahkan dengan tanda koma.. tidak peduli berapa suku kata dalam setiap
bagiannya
solusinya sbb:
1. blok cel yang ingin dipisahkan menurut bagian-bagiannya
2. pada ribbon Data >> pilih Text To Column
[image: Gambar sisip 2]
3. Beri tanda di Delimited lalu tekan tombol Next
[image: Gambar sisip 3]
4. Beri tanda delimiters pada Comma, lalu tekan tombol Next
[image: Gambar sisip 4]
5. Pilih bentuk format data yang diinginkan dan lokasi penempatan hasil..
setelah itu tekan tombol Next
[image: Gambar sisip 5]
Setelah itu lihat hasi akhirnya..
semoga tutorial ini bermanfaat untuk semua..
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
æóÓóøáÇóãõ Úóáóíúßõãú æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
-Miss Jan Raisin-
Pada 5 September 2013 10.25, Bagus <bagus@kingjim.co.id> menulis:
> **
>
>
> **
> Coba ini Gan;
>
> A2 >> =LEFT(A1,FIND(", ",A1)-1)
> A3 >> =MID(A1,FIND(", ",A1)+2,FIND(", ",A1,FIND(",",A1)+2)-FIND(",
> ",A1)-2)
> A4 >> =RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1))
>
>
>
> Wassalam
>
> ~ Bagus ~
>
>
asumsi data seperti ini:
[image: Gambar sisip 1]
antara nama kota kecamatan/kotamadya dengan kabupaten dan provinsi
dipisahkan dengan tanda koma.. tidak peduli berapa suku kata dalam setiap
bagiannya
solusinya sbb:
1. blok cel yang ingin dipisahkan menurut bagian-bagiannya
2. pada ribbon Data >> pilih Text To Column
[image: Gambar sisip 2]
3. Beri tanda di Delimited lalu tekan tombol Next
[image: Gambar sisip 3]
4. Beri tanda delimiters pada Comma, lalu tekan tombol Next
[image: Gambar sisip 4]
5. Pilih bentuk format data yang diinginkan dan lokasi penempatan hasil..
setelah itu tekan tombol Next
[image: Gambar sisip 5]
Setelah itu lihat hasi akhirnya..
semoga tutorial ini bermanfaat untuk semua..
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
æóÓóøáÇóãõ Úóáóíúßõãú æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
-Miss Jan Raisin-
Pada 5 September 2013 10.25, Bagus <bagus@kingjim.
> **
>
>
> **
> Coba ini Gan;
>
> A2 >> =LEFT(A1,FIND(
> A3 >> =MID(A1,FIND(
> ",A1)-2)
> A4 >> =RIGHT(A1,LEN(
>
>
>
> Wassalam
>
> ~ Bagus ~
>
>
Wed Sep 4, 2013 11:17 pm (PDT) . Posted by:
"Haris Kartiwan"
Dear Para Master Excel..
Saya ada kasus excel tentang penggabungan 2 parameter, dan saya sudah cari
dan baca di milist ini dan mendapatkan formulanya yaitu : SUMPRODUCT dan
SUMIFS, tapi masih tidak benar hasilnya. (di kolom IN). lihat file lampiran
Note : data2x sebelah kiri di dapat dari data mesin absensi.
Kenapa yeah?, mohon bantuannya
Terima kasih
Haris Kartiwan
Saya ada kasus excel tentang penggabungan 2 parameter, dan saya sudah cari
dan baca di milist ini dan mendapatkan formulanya yaitu : SUMPRODUCT dan
SUMIFS, tapi masih tidak benar hasilnya. (di kolom IN). lihat file lampiran
Note : data2x sebelah kiri di dapat dari data mesin absensi.
Kenapa yeah?, mohon bantuannya
Terima kasih
Haris Kartiwan
Wed Sep 4, 2013 11:39 pm (PDT) . Posted by:
"Jan Raisin"
hai Haris..
kasus seperti ini kelihatannya bisa diselesaikan menggunakan PivotTable
coba pelajari caranya dari tulisan mr Kid di
sini<http://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html>
perhatikan format tanggal yang digunakan.. di komputer Jan yang menggunakan
format Indonesian data di kolom B harus disesuaikan terlebih dahulu..
mungkin yang menggunakan format English dapat langsung melakukan kalkulasi
tanpa harus melakukan penyesuaian data.
Salam,
-Miss Jan Raisin-
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
Pada 5 September 2013 13.11, Haris Kartiwan <hkartiwan@arahrestu.com>menulis:
> **
>
>
> Dear Para Master Excel..****
>
> ** **
>
> Saya ada kasus excel tentang penggabungan 2 parameter, dan saya sudah cari
> dan baca di milist ini dan mendapatkan formulanya yaitu : SUMPRODUCT dan
> SUMIFS, tapi masih tidak benar hasilnya. (di kolom IN). lihat file
> lampiran****
>
> ** **
>
> Note : data2x sebelah kiri di dapat dari data mesin absensi.****
>
> ** **
>
> Kenapa yeah?, mohon bantuannya****
>
> ** **
>
> Terima kasih****
>
> Haris Kartiwan
>
kasus seperti ini kelihatannya bisa diselesaikan menggunakan PivotTable
coba pelajari caranya dari tulisan mr Kid di
sini<http://excel-
perhatikan format tanggal yang digunakan.. di komputer Jan yang menggunakan
format Indonesian data di kolom B harus disesuaikan terlebih dahulu..
mungkin yang menggunakan format English dapat langsung melakukan kalkulasi
tanpa harus melakukan penyesuaian data.
Salam,
-Miss Jan Raisin-
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
Pada 5 September 2013 13.11, Haris Kartiwan <hkartiwan@arahrestu
> **
>
>
> Dear Para Master Excel..****
>
> ** **
>
> Saya ada kasus excel tentang penggabungan 2 parameter, dan saya sudah cari
> dan baca di milist ini dan mendapatkan formulanya yaitu : SUMPRODUCT dan
> SUMIFS, tapi masih tidak benar hasilnya. (di kolom IN). lihat file
> lampiran****
>
> ** **
>
> Note : data2x sebelah kiri di dapat dari data mesin absensi.****
>
> ** **
>
> Kenapa yeah?, mohon bantuannya**
>
> ** **
>
> Terima kasih****
>
> Haris Kartiwan
>
Thu Sep 5, 2013 12:05 am (PDT) . Posted by:
"Haris Kartiwan"
Terima Kasih Miss Jan,..
Wah, harus saya pelajari dulu nih, sebab saya belom pernah pakai pivot
table.
File excel yg saya kirim itu bukan hanya tanggal (16 July 2013) itu saja,
tapi untuk 30 hari, untuk IN dan OUT nya di ambil dari data mesin absen
(sebelah kiri).
dan setiap harinya beberapa karyawan, apakah efesien dan bisa menggunakan
pivot table.
Saya juga sudah coba untuk menggubah data tanggal dan jam yg di hasilkan
data mesin absensi tsb, lihat Cell yg telah saya warnai biru.
Untuk mr. Kid saya do'a kan supaya Cepat Sembuh [-O<
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
Terima Kasih
Haris
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of Jan Raisin
Sent: Thursday, September 05, 2013 1:39 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] penggabungan 2 parameter
hai Haris..
kasus seperti ini kelihatannya bisa diselesaikan menggunakan PivotTable
coba pelajari caranya dari tulisan mr Kid di sini
<http://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html>
perhatikan format tanggal yang digunakan.. di komputer Jan yang menggunakan
format Indonesian data di kolom B harus disesuaikan terlebih dahulu..
mungkin yang menggunakan format English dapat langsung melakukan kalkulasi
tanpa harus melakukan penyesuaian data.
Salam,
-Miss Jan Raisin-
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
Pada 5 September 2013 13.11, Haris Kartiwan <hkartiwan@arahrestu.com>
menulis:
Dear Para Master Excel..
Saya ada kasus excel tentang penggabungan 2 parameter, dan saya sudah cari
dan baca di milist ini dan mendapatkan formulanya yaitu : SUMPRODUCT dan
SUMIFS, tapi masih tidak benar hasilnya. (di kolom IN). lihat file lampiran
Note : data2x sebelah kiri di dapat dari data mesin absensi.
Kenapa yeah?, mohon bantuannya
Terima kasih
Haris Kartiwan
Wah, harus saya pelajari dulu nih, sebab saya belom pernah pakai pivot
table.
File excel yg saya kirim itu bukan hanya tanggal (16 July 2013) itu saja,
tapi untuk 30 hari, untuk IN dan OUT nya di ambil dari data mesin absen
(sebelah kiri).
dan setiap harinya beberapa karyawan, apakah efesien dan bisa menggunakan
pivot table.
Saya juga sudah coba untuk menggubah data tanggal dan jam yg di hasilkan
data mesin absensi tsb, lihat Cell yg telah saya warnai biru.
Untuk mr. Kid saya do'a kan supaya Cepat Sembuh [-O<
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
Terima Kasih
Haris
From: belajar-excel@
On Behalf Of Jan Raisin
Sent: Thursday, September 05, 2013 1:39 PM
To: belajar-excel@
Subject: Re: [belajar-excel] penggabungan 2 parameter
hai Haris..
kasus seperti ini kelihatannya bisa diselesaikan menggunakan PivotTable
coba pelajari caranya dari tulisan mr Kid di sini
<http://excel-
perhatikan format tanggal yang digunakan.. di komputer Jan yang menggunakan
format Indonesian data di kolom B harus disesuaikan terlebih dahulu..
mungkin yang menggunakan format English dapat langsung melakukan kalkulasi
tanpa harus melakukan penyesuaian data.
Salam,
-Miss Jan Raisin-
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
Pada 5 September 2013 13.11, Haris Kartiwan <hkartiwan@arahrestu
menulis:
Dear Para Master Excel..
Saya ada kasus excel tentang penggabungan 2 parameter, dan saya sudah cari
dan baca di milist ini dan mendapatkan formulanya yaitu : SUMPRODUCT dan
SUMIFS, tapi masih tidak benar hasilnya. (di kolom IN). lihat file lampiran
Note : data2x sebelah kiri di dapat dari data mesin absensi.
Kenapa yeah?, mohon bantuannya
Terima kasih
Haris Kartiwan
Thu Sep 5, 2013 12:30 am (PDT) . Posted by:
"Jan Raisin"
pak Heru..
coba cara seperti ini:
Set SomeThing = Nothing
seharusnya nilai object tersebut adalah Null
jika object tersebut adalah sebuah variabel yang dideklarasikan terlebih
dahulu, maka tipe data yang digunakan haruslah Variant, karena hanya tipe
data Variant saja yang dapat menyimpan nilai Null
cmiiw..
-Miss Jan Raisin-
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr.
Kid), semoga
sakitnya segera diangkat dan
mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
Pada 5 September 2013 08.44, Heru Safrudin <superheruu@gmail.com> menulis:
> **
>
>
> Dear Be-Exceller,****
>
> ** **
>
> Bagaimana menset nilai pada item dengan nilai Null, misal :****
>
> ** **
>
> Listbox1.list(0,0)=Null bukan blank atau Listbox1.list(0,0)=""****
>
> ** **
>
> Terima kasih atas petunjuknya****
>
> ** **
>
> ** **
>
> ****** **
>
> ** **
>
>
>
coba cara seperti ini:
Set SomeThing = Nothing
seharusnya nilai object tersebut adalah Null
jika object tersebut adalah sebuah variabel yang dideklarasikan terlebih
dahulu, maka tipe data yang digunakan haruslah Variant, karena hanya tipe
data Variant saja yang dapat menyimpan nilai Null
cmiiw..
-Miss Jan Raisin-
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr.
Kid), semoga
sakitnya segera diangkat dan
mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Hilangkanlah penyakitnya, wahai Tuhan manusia! Berilah kesembuhan karena
Engkaulah Penyembuh (segala penyakit). Tiada kesembuhan kecuali
kesembuhan-Mu, yaitu kesembuhan yang tidak meninggalkan penyakit
Pada 5 September 2013 08.44, Heru Safrudin <superheruu@gmail.
> **
>
>
> Dear Be-Exceller,
>
> ** **
>
> Bagaimana menset nilai pada item dengan nilai Null, misal :****
>
> ** **
>
> Listbox1.list(
>
> ** **
>
> Terima kasih atas petunjuknya*
>
> ** **
>
> ** **
>
> ****** **
>
> ** **
>
>
>
Thu Sep 5, 2013 1:00 am (PDT) . Posted by:
"Andy Ajhis Ramadhan" andy_ajhis37
Wah... maaf andy kurang deatil ya ^_^, jadi gak dijawab...Â
Trima Kasih Miss -_-' ( Mantra ) ada-ada aja nih si Miss... hehe ^_^
Sebenernya andy dah coba kode ini tapi rumus di search bisa terhapus miss.
mungkin gak ya miss jan agar search dapat mencari dan tidak bisa dihapus ?
Salam,
Andy
----- Pesan yang Diteruskan -----
Dari: Jan Raisin <miss.jan.raisin@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Rabu, 4 September 2013 11:53
Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di ketik.
Â
thread ini sudah 2 hari tidak ada yang nyentuh,, mungkin karena pertanyaannya membingungkan.. ^_^
setelah membaca pertanyaannya.. Jan lalu merenung.. dalam masa merenung itulah muncul wangsit yang memberikan pencerahan berupa sebuah titik terang..
mungkin maksud dari bang Andy ini seperti ini:
1. di sheet1 cel A2 ada tulisan yang bunyinya SEARCH
2. tulisan itu gak boleh hilang atau diganti oleh user, makanya dilock
3. lalu cel A2 tadi harus di klik untuk bisa milih sesuatu yang harus di pilih di sheet yang bernama Ngetes
[walah.. Jan ini kok ngomongnya berbelit2 gini sih]
kalo itu masalahnya.. maka solusinya seperti ini:
1. buka dulu proteksi sheetnya
2. hilangkan lock dari cel A2
3. tekan tombol F11, atau klik kanan di nama sheet lalu pilih View Code, atau pergi ke ribbon Developer lalu klik Visual Basic.. intinya adalah gimana caranya bisa pindah dari lembar kerja ke VBE
4. di VBE, lihat frame VBA Project di sebelah kiri, cari sesuatu yang bernama This WorkBook, lalu diklik dua kali
5. akan terbuka lembar kerja editor yang baru.. cari sesuatu yang ada tulisan General dan ganti menjadi WorkBook
secara default event dari WorkBook adalah Open dan secara tiba-tiba akan muncul 2 baris mantra di VB Editor tadi..
hiii serem kan.. Â (dont try this at home)
di tengah2 baris mantra yang tadi masukkan mantra seperti ini:
Sheets("sheet1").Protect "Tester", userinterfaceonly:=True
simpan workbook tersebut, tutup, lalu buka kembali.. lalu coba klik cel A2 yang tadi
hiii.. Jan masih merinding saat mencoba menerapkan cara di atas..
masih bingung dari mana asal 2 baris mantra di atasÂ
Salam,
-Miss Jan Raisin-
Pada 2 September 2013 09.57, Andy Ajhis Ramadhan <andyajhisramadhan@ymail.com> menulis:
>Â
>Dear,
>Be-Exceller
>
>
>Bagaimana protect sheet & Cell tetapi Coding Hyerlink bisa di ketik. Dalam posisi Cell yang ter-coding tersebut dikunci cell. apa
>ada perumusan menggunakan macro. Permasalahan terlampir. Terima Kasih banyak Be- Exceller.
>
>
>Salam,
>Andy
>__._,
Trima Kasih Miss -_-' ( Mantra ) ada-ada aja nih si Miss... hehe ^_^
Sebenernya andy dah coba kode ini tapi rumus di search bisa terhapus miss.
mungkin gak ya miss jan agar search dapat mencari dan tidak bisa dihapus ?
Salam,
Andy
----- Pesan yang Diteruskan -----
Dari: Jan Raisin <miss.jan.raisin@
Kepada: belajar-excel@
Dikirim: Rabu, 4 September 2013 11:53
Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di ketik.
Â
thread ini sudah 2 hari tidak ada yang nyentuh,, mungkin karena pertanyaannya membingungkan.
setelah membaca pertanyaannya.
mungkin maksud dari bang Andy ini seperti ini:
1. di sheet1 cel A2 ada tulisan yang bunyinya SEARCH
2. tulisan itu gak boleh hilang atau diganti oleh user, makanya dilock
3. lalu cel A2 tadi harus di klik untuk bisa milih sesuatu yang harus di pilih di sheet yang bernama Ngetes
[walah.. Jan ini kok ngomongnya berbelit2 gini sih]
kalo itu masalahnya.. maka solusinya seperti ini:
1. buka dulu proteksi sheetnya
2. hilangkan lock dari cel A2
3. tekan tombol F11, atau klik kanan di nama sheet lalu pilih View Code, atau pergi ke ribbon Developer lalu klik Visual Basic.. intinya adalah gimana caranya bisa pindah dari lembar kerja ke VBE
4. di VBE, lihat frame VBA Project di sebelah kiri, cari sesuatu yang bernama This WorkBook, lalu diklik dua kali
5. akan terbuka lembar kerja editor yang baru.. cari sesuatu yang ada tulisan General dan ganti menjadi WorkBook
secara default event dari WorkBook adalah Open dan secara tiba-tiba akan muncul 2 baris mantra di VB Editor tadi..
hiii serem kan.. Â (dont try this at home)
di tengah2 baris mantra yang tadi masukkan mantra seperti ini:
Sheets("
simpan workbook tersebut, tutup, lalu buka kembali.. lalu coba klik cel A2 yang tadi
hiii.. Jan masih merinding saat mencoba menerapkan cara di atas..
masih bingung dari mana asal 2 baris mantra di atasÂ
Salam,
-Miss Jan Raisin-
Pada 2 September 2013 09.57, Andy Ajhis Ramadhan <andyajhisramadhan@
>Â
>Dear,
>Be-Exceller
>
>
>Bagaimana protect sheet & Cell tetapi Coding Hyerlink bisa di ketik. Dalam posisi Cell yang ter-coding tersebut dikunci cell. apa
>ada perumusan menggunakan macro. Permasalahan terlampir. Terima Kasih banyak Be- Exceller.
>
>
>Salam,
>Andy
>__._,
Thu Sep 5, 2013 1:23 am (PDT) . Posted by:
"Jan Raisin"
oh.. iya ya..
ternyata masih bisa diubah.. maklum kemarin bikinnya buru-buru xixixix ^_^
masih di project explorer, dobel klik yang ada tulisannya sheet1
lalu copas mantra berikut ini:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("a2").Address Then
Application.EnableEvents = False
Target.Value = "Search"
Application.EnableEvents = True
End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = Range("a2").Address Then
Application.EnableEvents = False
Target.Value = "Search"
Application.EnableEvents = True
End If
End Sub
coba di tes.. mudah-mudahan mantranya bekerja dengan baik
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga
sakitnya segera diangkat dan
mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Salam,
-Miss Jan Raisin-
Pada 5 September 2013 09.22, Andy Ajhis Ramadhan <
andyajhisramadhan@ymail.com> menulis:
> **
>
>
> Wah... maaf andy kurang deatil ya ^_^, jadi gak dijawab...
> Trima Kasih Miss -_-' ( Mantra ) ada-ada aja nih si Miss... hehe ^_^
> Sebenernya andy dah coba kode ini tapi rumus di search bisa terhapus miss.
> mungkin gak ya miss jan agar search dapat mencari dan tidak bisa dihapus ?
>
> Salam,
> Andy
>
> ----- Pesan yang Diteruskan -----
> Dari: Jan Raisin <miss.jan.raisin@gmail.com>
> Kepada: belajar-excel@yahoogroups.com
> Dikirim: Rabu, 4 September 2013 11:53
> Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di
> ketik.
>
>
>
>
> thread ini sudah 2 hari tidak ada yang nyentuh,, mungkin karena
> pertanyaannya membingungkan.. ^_^
>
> setelah membaca pertanyaannya.. Jan lalu merenung.. dalam masa merenung
> itulah muncul wangsit yang memberikan pencerahan berupa sebuah titik
> terang..
> mungkin maksud dari bang Andy ini seperti ini:
>
> 1. di sheet1 cel A2 ada tulisan yang bunyinya SEARCH
> 2. tulisan itu gak boleh hilang atau diganti oleh user, makanya dilock
> 3. lalu cel A2 tadi harus di klik untuk bisa milih sesuatu yang harus di
> pilih di sheet yang bernama Ngetes
>
> [walah.. Jan ini kok ngomongnya berbelit2 gini sih]
>
> kalo itu masalahnya.. maka solusinya seperti ini:
>
> 1. buka dulu proteksi sheetnya
>
> 2. hilangkan lock dari cel A2
>
> 3. tekan tombol F11, atau klik kanan di nama sheet lalu pilih View Code,
> atau pergi ke ribbon Developer lalu klik Visual Basic.. intinya adalah
> gimana caranya bisa pindah dari lembar kerja ke VBE
>
> 4. di VBE, lihat frame VBA Project di sebelah kiri, cari sesuatu yang
> bernama This WorkBook, lalu diklik dua kali
>
> 5. akan terbuka lembar kerja editor yang baru.. cari sesuatu yang ada
> tulisan General dan ganti menjadi WorkBook
>
>
> secara default event dari WorkBook adalah Open dan secara tiba-tiba akan
> muncul 2 baris mantra di VB Editor tadi..
> hiii serem kan.. (dont try this at home)
>
> di tengah2 baris mantra yang tadi masukkan mantra seperti ini:
>
> Sheets("sheet1").Protect "Tester", userinterfaceonly:=True
>
> simpan workbook tersebut, tutup, lalu buka kembali.. lalu coba klik cel A2
> yang tadi
>
> hiii.. Jan masih merinding saat mencoba menerapkan cara di atas..
> masih bingung dari mana asal 2 baris mantra di atas
>
> Salam,
>
> -Miss Jan Raisin-
>
> Pada 2 September 2013 09.57, Andy Ajhis Ramadhan <
> andyajhisramadhan@ymail.com> menulis:
>
> >
> >Dear,
> >Be-Exceller
> >
> >
> >Bagaimana protect sheet & Cell tetapi Coding Hyerlink bisa di ketik.
> Dalam posisi Cell yang ter-coding tersebut dikunci cell. apa
> >ada perumusan menggunakan macro. Permasalahan terlampir. Terima Kasih
> banyak Be- Exceller.
> >
> >
> >Salam,
> >Andy
> >__._,
>
>
>
ternyata masih bisa diubah.. maklum kemarin bikinnya buru-buru xixixix ^_^
masih di project explorer, dobel klik yang ada tulisannya sheet1
lalu copas mantra berikut ini:
Private Sub Worksheet_Change(
If Target.Address = Range("
Application.
Target.Value = "Search"
Application.
End If
End Sub
Private Sub Worksheet_Selection
If Target.Address = Range("
Application.
Target.Value = "Search"
Application.
End If
End Sub
coba di tes.. mudah-mudahan mantranya bekerja dengan baik
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid),
semoga
sakitnya segera diangkat dan
mr Kid dapat segera beraktifitas seperti sedia kala.
ÃóÐúåöÈö ÇáúÈóÃúÓó. ÑóÈóø ÇáäóøÇÓö. æóÇÔúÝö ÃóäúÊó ÇáÔóøÇÝöí. áÇó ÔöÝóÇÁó
ÅöáÇóø ÔöÝóÇÄõßó. ÔöÝóÇÁð áÇó íõÛóÇÏöÑõ ÓóÞóãðÇ
Salam,
-Miss Jan Raisin-
Pada 5 September 2013 09.22, Andy Ajhis Ramadhan <
andyajhisramadhan@
> **
>
>
> Wah... maaf andy kurang deatil ya ^_^, jadi gak dijawab...
> Trima Kasih Miss -_-' ( Mantra ) ada-ada aja nih si Miss... hehe ^_^
> Sebenernya andy dah coba kode ini tapi rumus di search bisa terhapus miss.
> mungkin gak ya miss jan agar search dapat mencari dan tidak bisa dihapus ?
>
> Salam,
> Andy
>
> ----- Pesan yang Diteruskan -----
> Dari: Jan Raisin <miss.jan.raisin@
> Kepada: belajar-excel@
> Dikirim: Rabu, 4 September 2013 11:53
> Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di
> ketik.
>
>
>
>
> thread ini sudah 2 hari tidak ada yang nyentuh,, mungkin karena
> pertanyaannya membingungkan.
>
> setelah membaca pertanyaannya.
> itulah muncul wangsit yang memberikan pencerahan berupa sebuah titik
> terang..
> mungkin maksud dari bang Andy ini seperti ini:
>
> 1. di sheet1 cel A2 ada tulisan yang bunyinya SEARCH
> 2. tulisan itu gak boleh hilang atau diganti oleh user, makanya dilock
> 3. lalu cel A2 tadi harus di klik untuk bisa milih sesuatu yang harus di
> pilih di sheet yang bernama Ngetes
>
> [walah.. Jan ini kok ngomongnya berbelit2 gini sih]
>
> kalo itu masalahnya.. maka solusinya seperti ini:
>
> 1. buka dulu proteksi sheetnya
>
> 2. hilangkan lock dari cel A2
>
> 3. tekan tombol F11, atau klik kanan di nama sheet lalu pilih View Code,
> atau pergi ke ribbon Developer lalu klik Visual Basic.. intinya adalah
> gimana caranya bisa pindah dari lembar kerja ke VBE
>
> 4. di VBE, lihat frame VBA Project di sebelah kiri, cari sesuatu yang
> bernama This WorkBook, lalu diklik dua kali
>
> 5. akan terbuka lembar kerja editor yang baru.. cari sesuatu yang ada
> tulisan General dan ganti menjadi WorkBook
>
>
> secara default event dari WorkBook adalah Open dan secara tiba-tiba akan
> muncul 2 baris mantra di VB Editor tadi..
> hiii serem kan.. (dont try this at home)
>
> di tengah2 baris mantra yang tadi masukkan mantra seperti ini:
>
> Sheets("
>
> simpan workbook tersebut, tutup, lalu buka kembali.. lalu coba klik cel A2
> yang tadi
>
> hiii.. Jan masih merinding saat mencoba menerapkan cara di atas..
> masih bingung dari mana asal 2 baris mantra di atas
>
> Salam,
>
> -Miss Jan Raisin-
>
> Pada 2 September 2013 09.57, Andy Ajhis Ramadhan <
> andyajhisramadhan@
>
> >
> >Dear,
> >Be-Exceller
> >
> >
> >Bagaimana protect sheet & Cell tetapi Coding Hyerlink bisa di ketik.
> Dalam posisi Cell yang ter-coding tersebut dikunci cell. apa
> >ada perumusan menggunakan macro. Permasalahan terlampir. Terima Kasih
> banyak Be- Exceller.
> >
> >
> >Salam,
> >Andy
> >__._,
>
>
>
Thu Sep 5, 2013 4:20 am (PDT) . Posted by:
"Andy Ajhis Ramadhan" andy_ajhis37
Miss jan Hebat!!
Miss mau tanya donk, kalau searchnya dihapus, lalu'kan muncul lagi tetapi kok linknya jadi tdk bisa bekerja ya miss ? apa berubah textnya hanya menjadi nama "Search" ya Miss ? kalau memasukan rumusan yang ada di cell pengganti Target.Value = "Search" berubah menjadi =IFERROR(IF(B2="","",HYPERLINK("[Protect sheet & Cell tetapi Hyperlink bisa di ketik..xlsm]Ngetes!A"&B2+1,"Search")),"") Kode39;nya menjadi apa ya miss ? andy dah masukin langsung tanpa (") tapi gagal miss. hehe maaf miss merepotkan. ^_^ Miss Jan Baik deh, Bantu ya Miss... Please. tapi gak maksa kok miss cuma berharap... hehe :D. bcanda miss... ^_^
Mr. Kid sakit... Semoga Allah SWT mengangkat penyakitnya, dan kembali seceria sebelumnya... Amin...
Thanks,
Andy
----- Pesan yang Diteruskan -----
Dari: Jan Raisin <miss.jan.raisin@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 5 September 2013 15:22
Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di ketik.
Â
oh.. iya ya..
ternyata masih bisa diubah.. maklum kemarin bikinnya buru-buru xixixix ^_^
masih di project explorer, dobel klik yang ada tulisannya sheet1
lalu copas mantra berikut ini:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = Range("a2").Address Then
    Application.EnableEvents = False
    Target.Value = "Search"
    Application.EnableEvents = True
  End If
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address = Range("a2").Address Then
    Application.EnableEvents = False
    Target.Value = "Search"
    Application.EnableEvents = True
  End If
End Sub
coba di tes.. mudah-mudahan mantranya bekerja dengan baik
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid), semogaÂ
sakitnya segera diangkat dan mr Kid dapat segera beraktifitas seperti sedia kala.
Ø£ÙØ°Ù'ÙÙب٠اÙÙ'بÙØ£Ù'سÙ. رÙبÙÙ' اÙÙÙÙ'اسÙ. ÙÙاشÙ'Ù٠أÙÙÙ'ت٠اÙØ´ÙÙ'اÙÙÙ. Ùا٠شÙÙÙاء٠إÙÙاÙÙ' Ø´ÙÙÙاؤÙÙÙ. Ø´ÙÙÙاء٠Ùا٠ÙÙغÙادÙر٠سÙÙÙÙ Ùا
Salam,
-Miss Jan Raisin-
Pada 5 September 2013 09.22, Andy Ajhis Ramadhan <andyajhisramadhan@ymail.com> menulis:
>Â
>Wah... maaf andy kurang deatil ya ^_^, jadi gak dijawab...Â
>Trima Kasih Miss -_-' ( Mantra ) ada-ada aja nih si Miss... hehe ^_^
>Sebenernya andy dah coba kode ini tapi rumus di search bisa terhapus miss.
>mungkin gak ya miss jan agar search dapat mencari dan tidak bisa dihapus ?
>
>Salam,
>Andy
>
>----- Pesan yang Diteruskan -----
>Dari: Jan Raisin <miss.jan.raisin@gmail.com>
>Kepada: belajar-excel@yahoogroups.com
>Dikirim: Rabu, 4 September 2013 11:53
>Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di ketik.
>
>
>
>Â
>thread ini sudah 2 hari tidak ada yang nyentuh,, mungkin karena pertanyaannya membingungkan.. ^_^
>
>setelah membaca pertanyaannya.. Jan lalu merenung.. dalam masa merenung itulah muncul wangsit yang memberikan pencerahan berupa sebuah titik terang..
>mungkin maksud dari bang Andy ini seperti ini:
>
>1. di sheet1 cel A2 ada tulisan yang bunyinya SEARCH
>2. tulisan itu gak boleh hilang atau diganti oleh user, makanya dilock
>3. lalu cel A2 tadi harus di klik untuk bisa milih sesuatu yang harus di pilih di sheet yang bernama Ngetes
>
>[walah.. Jan ini kok ngomongnya berbelit2 gini sih]
>
>kalo itu masalahnya.. maka solusinya seperti ini:
>
>
1. buka dulu proteksi sheetnya
>
>2. hilangkan lock dari cel A2
>
>3. tekan tombol F11, atau klik kanan di nama sheet lalu pilih View Code, atau pergi ke ribbon Developer lalu klik Visual Basic.. intinya adalah gimana caranya bisa pindah dari lembar kerja ke VBE
>
>4. di VBE, lihat frame VBA Project di sebelah kiri, cari sesuatu yang bernama This WorkBook, lalu diklik dua kali
>
>5. akan terbuka lembar kerja editor yang baru.. cari sesuatu yang ada tulisan General dan ganti menjadi WorkBook
>
>
>secara default event dari WorkBook adalah Open dan secara tiba-tiba akan muncul 2 baris mantra di VB Editor tadi..
>hiii serem kan.. Â (dont try this at home)
>
>di tengah2 baris mantra yang tadi masukkan mantra seperti ini:
>
>Sheets("sheet1").Protect "Tester", userinterfaceonly:=True
>
>simpan workbook tersebut, tutup, lalu buka kembali.. lalu coba klik cel A2 yang tadi
>
>hiii.. Jan masih merinding saat mencoba menerapkan cara di atas..
>masih bingung dari mana asal 2 baris mantra di atasÂ
>
>Salam,
>
>-Miss Jan Raisin-
>
>Pada 2 September 2013 09.57, Andy Ajhis Ramadhan <andyajhisramadhan@ymail.com> menulis:
>
>>Â
>>Dear,
>>Be-Exceller
>>
>>
>>Bagaimana protect sheet & Cell tetapi Coding Hyerlink bisa di ketik. Dalam posisi Cell yang ter-coding tersebut dikunci cell. apa
>>ada perumusan menggunakan macro. Permasalahan terlampir. Terima Kasih banyak Be- Exceller.
>>
>>
>>Salam,
>>Andy
>>__._,
>
>
Miss mau tanya donk, kalau searchnya dihapus, lalu'kan muncul lagi tetapi kok linknya jadi tdk bisa bekerja ya miss ? apa berubah textnya hanya menjadi nama "Search" ya Miss ? kalau memasukan rumusan yang ada di cell pengganti Target.
Mr. Kid sakit... Semoga Allah SWT mengangkat penyakitnya, dan kembali seceria sebelumnya..
Thanks,
Andy
----- Pesan yang Diteruskan -----
Dari: Jan Raisin <miss.jan.raisin@
Kepada: belajar-excel@
Dikirim: Kamis, 5 September 2013 15:22
Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di ketik.
Â
oh.. iya ya..
ternyata masih bisa diubah.. maklum kemarin bikinnya buru-buru xixixix ^_^
masih di project explorer, dobel klik yang ada tulisannya sheet1
lalu copas mantra berikut ini:
Private Sub Worksheet_Change(
  If Target.Address = Range("
    Application.
    Target.Value = "Search"
    Application.
  End If
End Sub
Private Sub Worksheet_Selection
  If Target.Address = Range("
    Application.
    Target.Value = "Search"
    Application.
  End If
End Sub
coba di tes.. mudah-mudahan mantranya bekerja dengan baik
Mohon do'a dari Be-Exceller untuk kesembuhan moderator milis ini (mr. Kid), semogaÂ
sakitnya segera diangkat dan mr Kid dapat segera beraktifitas seperti sedia kala.
Ø£ÙØ°Ù'ÙÙب٠اÙÙ'بÙØ£Ù'سÙ. رÙبÙÙ' اÙÙÙÙ'اسÙ. ÙÙاشÙ'Ù٠أÙÙÙ'ت٠اÙØ´ÙÙ'اÙÙÙ. Ùا٠شÙÙÙاء٠إÙÙاÙÙ' Ø´ÙÙÙاؤÙÙÙ. Ø´ÙÙÙاء٠Ùا٠ÙÙغÙادÙر٠سÙÙÙÙ Ùا
Salam,
-Miss Jan Raisin-
Pada 5 September 2013 09.22, Andy Ajhis Ramadhan <andyajhisramadhan@
>Â
>Wah... maaf andy kurang deatil ya ^_^, jadi gak dijawab...Â
>Trima Kasih Miss -_-' ( Mantra ) ada-ada aja nih si Miss... hehe ^_^
>Sebenernya andy dah coba kode ini tapi rumus di search bisa terhapus miss.
>mungkin gak ya miss jan agar search dapat mencari dan tidak bisa dihapus ?
>
>Salam,
>Andy
>
>----- Pesan yang Diteruskan -----
>Dari: Jan Raisin <miss.jan.raisin@
>Kepada: belajar-excel@
>Dikirim: Rabu, 4 September 2013 11:53
>Judul: Re: [belajar-excel] Protect sheet & Cell tetapi Hyperlink bisa di ketik.
>
>
>
>Â
>thread ini sudah 2 hari tidak ada yang nyentuh,, mungkin karena pertanyaannya membingungkan.
>
>setelah membaca pertanyaannya.
>mungkin maksud dari bang Andy ini seperti ini:
>
>1. di sheet1 cel A2 ada tulisan yang bunyinya SEARCH
>2. tulisan itu gak boleh hilang atau diganti oleh user, makanya dilock
>3. lalu cel A2 tadi harus di klik untuk bisa milih sesuatu yang harus di pilih di sheet yang bernama Ngetes
>
>[walah.. Jan ini kok ngomongnya berbelit2 gini sih]
>
>kalo itu masalahnya.. maka solusinya seperti ini:
>
>
1. buka dulu proteksi sheetnya
>
>2. hilangkan lock dari cel A2
>
>3. tekan tombol F11, atau klik kanan di nama sheet lalu pilih View Code, atau pergi ke ribbon Developer lalu klik Visual Basic.. intinya adalah gimana caranya bisa pindah dari lembar kerja ke VBE
>
>4. di VBE, lihat frame VBA Project di sebelah kiri, cari sesuatu yang bernama This WorkBook, lalu diklik dua kali
>
>5. akan terbuka lembar kerja editor yang baru.. cari sesuatu yang ada tulisan General dan ganti menjadi WorkBook
>
>
>secara default event dari WorkBook adalah Open dan secara tiba-tiba akan muncul 2 baris mantra di VB Editor tadi..
>hiii serem kan.. Â (dont try this at home)
>
>di tengah2 baris mantra yang tadi masukkan mantra seperti ini:
>
>Sheets("
>
>simpan workbook tersebut, tutup, lalu buka kembali.. lalu coba klik cel A2 yang tadi
>
>hiii.. Jan masih merinding saat mencoba menerapkan cara di atas..
>masih bingung dari mana asal 2 baris mantra di atasÂ
>
>Salam,
>
>-Miss Jan Raisin-
>
>Pada 2 September 2013 09.57, Andy Ajhis Ramadhan <andyajhisramadhan@
>
>>Â
>>Dear,
>>Be-Exceller
>>
>>
>>Bagaimana protect sheet & Cell tetapi Coding Hyerlink bisa di ketik. Dalam posisi Cell yang ter-coding tersebut dikunci cell. apa
>>ada perumusan menggunakan macro. Permasalahan terlampir. Terima Kasih banyak Be- Exceller.
>>
>>
>>Salam,
>>Andy
>>__._
>
>
Thu Sep 5, 2013 2:41 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Dear be-Exellers,
Saya jarang bermain-main dengan kedua mahluk tsb di atas.
Namun ketika saya membuka-buka mainan si Mbah di app.box, saya menemukan code ini,
Option Explicit
Sub CommandButton1_Click()
'randomized index
' by siti Vi / jakarta, june 12, 2011
'------------------------------------
Dim Matrix As Range, cel As Range
Dim i As Integer, X As Integer, temp
Set Matrix = Cells(1).CurrentRegion
For Each cel In Matrix
Randomize 'apa manfaatnya, tanpa ini juga tetap jalan ?
i = i + 1
X = 1 + Int(Rnd * Matrix.Cells.Count) 'mengapa harus ditambah satu ?
temp = Matrix(i).Value
Matrix(i).Value = Matrix(X).Value
Matrix(X).Value = temp
Next
End Sub
Tujuan dari code di atas adalah memutar-mutar angka secara random namun jumlahnya tetap sama.
Yang ingin saya tanyakan:
- Apa manfaat dan bagaimana penggunaan Randomize ?
Dari pengetesan saya, tanpa fungsi tsb pun hasilnya akan tetap sama.
- Mengapa X harus selalu = 1 + .......
Salam,
HK
Saya jarang bermain-main dengan kedua mahluk tsb di atas.
Namun ketika saya membuka-buka mainan si Mbah di app.box, saya menemukan code ini,
Option Explicit
Sub CommandButton1_
'randomized index
' by siti Vi / jakarta, june 12, 2011
'-------
Dim Matrix As Range, cel As Range
Dim i As Integer, X As Integer, temp
Set Matrix = Cells(1).CurrentReg
For Each cel In Matrix
Randomize 'apa manfaatnya, tanpa ini juga tetap jalan ?
i = i + 1
X = 1 + Int(Rnd * Matrix.Cells.
temp = Matrix(i).Value
Matrix(i).Value = Matrix(X).Value
Matrix(X).Value = temp
Next
End Sub
Tujuan dari code di atas adalah memutar-mutar angka secara random namun jumlahnya tetap sama.
Yang ingin saya tanyakan:
- Apa manfaat dan bagaimana penggunaan Randomize ?
Dari pengetesan saya, tanpa fungsi tsb pun hasilnya akan tetap sama.
- Mengapa X harus selalu = 1 + .......
Salam,
HK
Thu Sep 5, 2013 3:33 am (PDT) . Posted by:
"De Premor" de.premor
*Apa manfaat dan bagaimana penggunaan Randomize ?*
Di Dalam Kitab Betaljemur AdamExcel tertulis: To repeat sequences of
random numbers, call *Rnd* with a negative argument immediately before
using *Randomize* with a numeric argument. Using *Randomize* with the
same value for /number/ does not repeat the previous sequence.
Jadi, penggunaan pungsi randomizer diperlukan untuk mengantisipasi
jikalau fungsi Rnd sebelumnya itu dialokasikanuntuk merandom value
negatif, jadi si Randomizer akan mengambil sebuah nilai baru dari timer,
kalau nilainya jelas2 selalu positif ya ndak dipakai Randomizernya juga
ndak apa
/Sub tes_rnd3()
Dim i As Integer
[B1] = Rnd(-1)
'Randomize
For i = 1 To 100
Cells(i, 1) = Rnd
Next
End Sub
/
Paste baris diatas pada Kamar Sheet2
Pada sub routine diatas di hidup dan matikan fungsi Randomize nya
kemudian coba juga untuk mematikan 1 baris diatasnya, lalu coba jalankan
beberapa kali serta dilihat hasilnya
*Mengapa X harus selalu = 1 + .......*
Ini dikarenakan fungsi pada .... (titik-titik nya) yang bunyinya
*Int(Rnd * Matrix.Cells.Count)*, dimana fungsi dari INT adalah memangkas
angka dibelakang koma, maka pada saat si Cell Matrix.Cells.Count
bernilai 1, maka hasil perkalian bisa dipastikan lebih kecil dari 1
(0,xxxxxxx) jadi fungsi INT akan mengubah angka 0,xxxx menjadi 0 saja,
dan jika ini dibiarkan maka akan mengakibatkan error, dikarenakan matrix
hitunganya dimulai dari 1
Kira2 begitu :D
On 05-09-2013 16:41, hendrik karnadi wrote:
> Yang ingin saya tanyakan:
> - Apa manfaat dan bagaimana penggunaan Randomize ?
> Dari pengetesan saya, tanpa fungsi tsb pun hasilnya akan tetap sama.
> - Mengapa X harus selalu = 1 + .......
Di Dalam Kitab Betaljemur AdamExcel tertulis: To repeat sequences of
random numbers, call *Rnd* with a negative argument immediately before
using *Randomize* with a numeric argument. Using *Randomize* with the
same value for /number/ does not repeat the previous sequence.
Jadi, penggunaan pungsi randomizer diperlukan untuk mengantisipasi
jikalau fungsi Rnd sebelumnya itu dialokasikanuntuk merandom value
negatif, jadi si Randomizer akan mengambil sebuah nilai baru dari timer,
kalau nilainya jelas2 selalu positif ya ndak dipakai Randomizernya juga
ndak apa
/Sub tes_rnd3()
Dim i As Integer
[B1] = Rnd(-1)
'Randomize
For i = 1 To 100
Cells(i, 1) = Rnd
Next
End Sub
/
Paste baris diatas pada Kamar Sheet2
Pada sub routine diatas di hidup dan matikan fungsi Randomize nya
kemudian coba juga untuk mematikan 1 baris diatasnya, lalu coba jalankan
beberapa kali serta dilihat hasilnya
*Mengapa X harus selalu = 1 + .......*
Ini dikarenakan fungsi pada .... (titik-titik nya) yang bunyinya
*Int(Rnd * Matrix.Cells.
angka dibelakang koma, maka pada saat si Cell Matrix.Cells.
bernilai 1, maka hasil perkalian bisa dipastikan lebih kecil dari 1
(0,xxxxxxx) jadi fungsi INT akan mengubah angka 0,xxxx menjadi 0 saja,
dan jika ini dibiarkan maka akan mengakibatkan error, dikarenakan matrix
hitunganya dimulai dari 1
Kira2 begitu :D
On 05-09-2013 16:41, hendrik karnadi wrote:
> Yang ingin saya tanyakan:
> - Apa manfaat dan bagaimana penggunaan Randomize ?
> Dari pengetesan saya, tanpa fungsi tsb pun hasilnya akan tetap sama.
> - Mengapa X harus selalu = 1 + .......
Thu Sep 5, 2013 4:19 am (PDT) . Posted by:
"Muhammad HENDRA" robertmart77
Alhamdullilah, Terima kasih banyak bantuannya Miss Jan
Salam Excel,
Hendra
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of Jan Raisin
Sent: Wednesday, September 04, 2013 4:43 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Mencari data yang sesuai
coba solusi pada file terlampir... semoga gak salah2 amat
salam,
-Miss Jan Raisin-
Pada 4 September 2013 11.07, Muhammad HENDRA <muhammad.hendra@external.total.com<mailto:muhammad.hendra@external.total.com>> menulis:
Dear Be-Exceller.
Saya mempunyai data yang cukup banyak seperti file terlampir
dari data tersebut yang dicari adalah Kode, Posisi, Max & Tahun sisa berdasarkan Jabatan & nilai minimum dari
masing-masing jabatan tersebut.
Namun apabila dalam satu jabatan mempunyai nilai minimum yang sama, maka Kode, Posisi dan tahun sisa diambil
Dengan tambahan kolom maximum dengan nilai terbesar + Jabatan & Nilai terkecil
Mohon bantuan & arahannya,
Terima kasih
salam Excel
Hendra
Salam Excel,
Hendra
From: belajar-excel@
Sent: Wednesday, September 04, 2013 4:43 PM
To: belajar-excel@
Subject: Re: [belajar-excel] Mencari data yang sesuai
coba solusi pada file terlampir... semoga gak salah2 amat
salam,
-Miss Jan Raisin-
Pada 4 September 2013 11.07, Muhammad HENDRA <muhammad.hendra@
Dear Be-Exceller.
Saya mempunyai data yang cukup banyak seperti file terlampir
dari data tersebut yang dicari adalah Kode, Posisi, Max & Tahun sisa berdasarkan Jabatan & nilai minimum dari
masing-masing jabatan tersebut.
Namun apabila dalam satu jabatan mempunyai nilai minimum yang sama, maka Kode, Posisi dan tahun sisa diambil
Dengan tambahan kolom maximum dengan nilai terbesar + Jabatan & Nilai terkecil
Mohon bantuan & arahannya,
Terima kasih
salam Excel
Hendra
Thu Sep 5, 2013 4:19 am (PDT) . Posted by:
"Muhammad HENDRA" robertmart77
Wah, bisa seperti ini juga ya selain yang diberi jalan oleh Miss Jan,
Terima kasih banyak Mas Bagus âº
Salam Excel
Hendra
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of Bagus
Sent: Wednesday, September 04, 2013 5:22 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Mencari data yang sesuai

Dear Hendra;
Coba ketik di Cell C21;
=LOOKUP(2,1/(A$5:A$16&B$5:B$16=A21&B21),C$5:C$16)
Copy paste kebawah dan ke kanan
Wassalam
~ Bagus ~
----- Original Message -----
From: Muhammad HENDRA<mailto:muhammad.hendra@external.total.com>
To: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>
Sent: Wednesday, September 04, 2013 11:07 AM
Subject: [belajar-excel] Mencari data yang sesuai
Dear Be-Exceller.
Saya mempunyai data yang cukup banyak seperti file terlampir
dari data tersebut yang dicari adalah Kode, Posisi, Max & Tahun sisa berdasarkan Jabatan & nilai minimum dari
masing-masing jabatan tersebut.
Namun apabila dalam satu jabatan mempunyai nilai minimum yang sama, maka Kode, Posisi dan tahun sisa diambil
Dengan tambahan kolom maximum dengan nilai terbesar + Jabatan & Nilai terkecil
Mohon bantuan & arahannya,
Terima kasih
salam Excel
Hendra
Terima kasih banyak Mas Bagus âº
Salam Excel
Hendra
From: belajar-excel@
Sent: Wednesday, September 04, 2013 5:22 PM
To: belajar-excel@
Subject: Re: [belajar-excel] Mencari data yang sesuai

Dear Hendra;
Coba ketik di Cell C21;
=LOOKUP(2,1/
Copy paste kebawah dan ke kanan
Wassalam
~ Bagus ~
----- Original Message -----
From: Muhammad HENDRA<mailto:muhammad.hendra@
To: belajar-excel@
Sent: Wednesday, September 04, 2013 11:07 AM
Subject: [belajar-excel] Mencari data yang sesuai
Dear Be-Exceller.
Saya mempunyai data yang cukup banyak seperti file terlampir
dari data tersebut yang dicari adalah Kode, Posisi, Max & Tahun sisa berdasarkan Jabatan & nilai minimum dari
masing-masing jabatan tersebut.
Namun apabila dalam satu jabatan mempunyai nilai minimum yang sama, maka Kode, Posisi dan tahun sisa diambil
Dengan tambahan kolom maximum dengan nilai terbesar + Jabatan & Nilai terkecil
Mohon bantuan & arahannya,
Terima kasih
salam Excel
Hendra
Thu Sep 5, 2013 4:19 am (PDT) . Posted by:
"Ferdinan Imers" dinanfu
Trims Pak Heru dan Pak BAgus. sip sudah
2013/9/5 Bagus <bagus@kingjim.co.id>
> **
>
>
> **
> Coba ini pak;
> =CONCATENATE("Pembayaran untuk pengadaan ....dengan kontrak ","Rp.
> ",TEXT(B3,"#,##0"),",-")
>
>
> Wassalam
>
> ~ Bagus ~
>
>
>
> ----- Original Message -----
> *From:* Ferdinan Imers <ferdinan36@gmail.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Thursday, September 05, 2013 9:43 AM
> *Subject:* [belajar-excel] Gabung angka tdk ada titik kog ilang
>
>
>
> master semua mohon bantuan kasus sy plis gabung sel tapi titik pada angka
> ilang
> trims seblmnya
>
>
>
2013/9/5 Bagus <bagus@kingjim.
> **
>
>
> **
> Coba ini pak;
> =CONCATENATE(
> ",TEXT(
>
>
> Wassalam
>
> ~ Bagus ~
>
>
>
> ----- Original Message -----
> *From:* Ferdinan Imers <ferdinan36@gmail.
> *To:* belajar-excel@
> *Sent:* Thursday, September 05, 2013 9:43 AM
> *Subject:* [belajar-excel] Gabung angka tdk ada titik kog ilang
>
>
>
> master semua mohon bantuan kasus sy plis gabung sel tapi titik pada angka
> ilang
> trims seblmnya
>
>
>
GROUP FOOTER MESSAGE
=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com
berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com
berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Tidak ada komentar:
Posting Komentar