15 New Messages
Digest #2275
3b
Re: Option button macro pada User form untuk menentukan range combo by "Mr. Kid" nmkid.family@ymail.com
Messages
Thu May 2, 2013 12:40 am (PDT) . Posted by:
"Helsy B" helsyb
Assalamu'alaikum para pakar Excell,
Mohon maaf kalau saya banyak bertanya pada kasus yang sama, sebelumnya sudah diberikan solusi oleh Miss Jan dan Mas Aji. Berikut ada pola yang sedikit berbeda dengan file sebelumnya. Saya coba menggunakan script dari Miss Jan dan Mas Aji, namun belum berhasil. Hasilnya msh ada pelanggan lain yang ikut, dan set nomor dari awal belum start 1. Maklum saya baru belajar makro dari forum ini yang sangat banyak menambah ilmu excel saya.
Mohon bantuan para pakar, sebelumnya saya ucapkan banyak terima kasih.
Wassalam,
Helsy
Mohon maaf kalau saya banyak bertanya pada kasus yang sama, sebelumnya sudah diberikan solusi oleh Miss Jan dan Mas Aji. Berikut ada pola yang sedikit berbeda dengan file sebelumnya. Saya coba menggunakan script dari Miss Jan dan Mas Aji, namun belum berhasil. Hasilnya msh ada pelanggan lain yang ikut, dan set nomor dari awal belum start 1. Maklum saya baru belajar makro dari forum ini yang sangat banyak menambah ilmu excel saya.
Mohon bantuan para pakar, sebelumnya saya ucapkan banyak terima kasih.
Wassalam,
Helsy
Thu May 2, 2013 2:09 am (PDT) . Posted by:
"Jan Raisin"
Hai Helsy,
coba cara seperti ini:
1. deklarasikan 1 buah variabel baru bertipe Integer untuk menghitung
berapa banyak data tiap customer yang akan dikopi
2. non aktifkan script If .Cells(i, 2).Value = .Cells(i + 1, 2) Then, dan
script penutupnya (ini berarti cuma baris If dan End If saja, tidak
termasuk script diantara keduanya)
3. ganti nilai lData menjadi ldata = i + variabel_pada_nomor_1_di_atas - 1
4. sebelum message box, tambahkan script yang berbunyi i = i +
variabel_pada_nomor_1_di_atas
5. coba jalankan lagi script yang sudah diubah
silakan dicoba dulu, semoga langsung berhasil.. kalo gagal nanti Jan bantu
lagi deh, insya ALLAH
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
pooling berikut
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat
berharga untuk Be-Exceler yang lain
Wassalam,
-Miss Jan Raisin-
*>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan Jan
jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1
pertanyaan yang diajukan;*
*>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
belajar-excel@yahoogroups.com ;*
*>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan
orang-orang yang sabar QS 2:153;*
Pada 2 Mei 2013 14.38, Helsy B <helsyb@yahoo.com > menulis:
> **
>
>
> Assalamu'alaikum para pakar Excell,
>
> Mohon maaf kalau saya banyak bertanya pada kasus yang sama, sebelumnya
> sudah diberikan solusi oleh Miss Jan dan Mas Aji. Berikut ada pola yang
> sedikit berbeda dengan file sebelumnya. Saya coba menggunakan script dari
> Miss Jan dan Mas Aji, namun belum berhasil. Hasilnya msh ada pelanggan lain
> yang ikut, dan set nomor dari awal belum start 1. Maklum saya baru belajar
> makro dari forum ini yang sangat banyak menambah ilmu excel saya.
>
> Mohon bantuan para pakar, sebelumnya saya ucapkan banyak terima kasih.
>
> Wassalam,
> Helsy
>
>
>
coba cara seperti ini:
1. deklarasikan 1 buah variabel baru bertipe Integer untuk menghitung
berapa banyak data tiap customer yang akan dikopi
2. non aktifkan script If .Cells(i, 2).Value = .Cells(i + 1, 2) Then, dan
script penutupnya (ini berarti cuma baris If dan End If saja, tidak
termasuk script diantara keduanya)
3. ganti nilai lData menjadi ldata = i + variabel_pada_
4. sebelum message box, tambahkan script yang berbunyi i = i +
variabel_pada_
5. coba jalankan lagi script yang sudah diubah
silakan dicoba dulu, semoga langsung berhasil.. kalo gagal nanti Jan bantu
lagi deh, insya ALLAH
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
pooling berikut
http://tech.
Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat
berharga untuk Be-Exceler yang lain
Wassalam,
-Miss Jan Raisin-
*>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan Jan
jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1
pertanyaan yang diajukan;*
*>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
belajar-excel@
*>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan
orang-orang yang sabar QS 2:153;*
Pada 2 Mei 2013 14.38, Helsy B <helsyb@yahoo.
> **
>
>
> Assalamu'
>
> Mohon maaf kalau saya banyak bertanya pada kasus yang sama, sebelumnya
> sudah diberikan solusi oleh Miss Jan dan Mas Aji. Berikut ada pola yang
> sedikit berbeda dengan file sebelumnya. Saya coba menggunakan script dari
> Miss Jan dan Mas Aji, namun belum berhasil. Hasilnya msh ada pelanggan lain
> yang ikut, dan set nomor dari awal belum start 1. Maklum saya baru belajar
> makro dari forum ini yang sangat banyak menambah ilmu excel saya.
>
> Mohon bantuan para pakar, sebelumnya saya ucapkan banyak terima kasih.
>
> Wassalam,
> Helsy
>
>
>
Thu May 2, 2013 2:17 am (PDT) . Posted by:
"Jan Raisin"
ups.. ada yang ketinggalan..
variabel yang tadi dideklarasikan harus diisi dengan sebuah nilai yang
berasal dari jumlah nama customer yang sama,
salah satu caranya adalah dengan memanfaatkan fungsi CountIf milik
worksheet yang bisa dipanggil dengan cara
Application.WorksheetFunction.CountIf(range_datanya ,
kriterianya_dalam_hal_ini_adalah_nama_customer)
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
pooling berikut
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat
berharga untuk Be-Exceler yang lain
Wassalam,
-Miss Jan Raisin-
*>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan Jan
jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1
pertanyaan yang diajukan;*
*>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
belajar-excel@yahoogroups.com ;*
*>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan
orang-orang yang sabar QS 2:153;*
Pada 2 Mei 2013 16.09, Jan Raisin <miss.jan.raisin@gmail.com > menulis:
> Hai Helsy,
>
> coba cara seperti ini:
>
> 1. deklarasikan 1 buah variabel baru bertipe Integer untuk menghitung
> berapa banyak data tiap customer yang akan dikopi
> 2. non aktifkan script If .Cells(i, 2).Value = .Cells(i + 1, 2) Then, dan
> script penutupnya (ini berarti cuma baris If dan End If saja, tidak
> termasuk script diantara keduanya)
> 3. ganti nilai lData menjadi ldata = i + variabel_pada_nomor_1_di_atas - 1
> 4. sebelum message box, tambahkan script yang berbunyi i = i +
> variabel_pada_nomor_1_di_atas
> 5. coba jalankan lagi script yang sudah diubah
>
> silakan dicoba dulu, semoga langsung berhasil.. kalo gagal nanti Jan bantu
> lagi deh, insya ALLAH
>
> # sampaikan masalah yang sering anda temui saat menggunakan Excel pada
> pooling berikut
>
> http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
>
> Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat
> berharga untuk Be-Exceler yang lain
>
> Wassalam,
>
> -Miss Jan Raisin-
>
> *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan
> Jan jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1
> pertanyaan yang diajukan;*
> *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
> belajar-excel@yahoogroups.com ;*
> *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta
> dengan orang-orang yang sabar QS 2:153;*
>
>
> Pada 2 Mei 2013 14.38, Helsy B <helsyb@yahoo.com > menulis:
>
> **
>>
>>
>> Assalamu'alaikum para pakar Excell,
>>
>> Mohon maaf kalau saya banyak bertanya pada kasus yang sama, sebelumnya
>> sudah diberikan solusi oleh Miss Jan dan Mas Aji. Berikut ada pola yang
>> sedikit berbeda dengan file sebelumnya. Saya coba menggunakan script dari
>> Miss Jan dan Mas Aji, namun belum berhasil. Hasilnya msh ada pelanggan lain
>> yang ikut, dan set nomor dari awal belum start 1. Maklum saya baru belajar
>> makro dari forum ini yang sangat banyak menambah ilmu excel saya.
>>
>> Mohon bantuan para pakar, sebelumnya saya ucapkan banyak terima kasih.
>>
>> Wassalam,
>> Helsy
>>
>>
>>
>
>
variabel yang tadi dideklarasikan harus diisi dengan sebuah nilai yang
berasal dari jumlah nama customer yang sama,
salah satu caranya adalah dengan memanfaatkan fungsi CountIf milik
worksheet yang bisa dipanggil dengan cara
Application.
kriterianya_
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
pooling berikut
http://tech.
Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat
berharga untuk Be-Exceler yang lain
Wassalam,
-Miss Jan Raisin-
*>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan Jan
jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1
pertanyaan yang diajukan;*
*>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
belajar-excel@
*>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan
orang-orang yang sabar QS 2:153;*
Pada 2 Mei 2013 16.09, Jan Raisin <miss.jan.raisin@
> Hai Helsy,
>
> coba cara seperti ini:
>
> 1. deklarasikan 1 buah variabel baru bertipe Integer untuk menghitung
> berapa banyak data tiap customer yang akan dikopi
> 2. non aktifkan script If .Cells(i, 2).Value = .Cells(i + 1, 2) Then, dan
> script penutupnya (ini berarti cuma baris If dan End If saja, tidak
> termasuk script diantara keduanya)
> 3. ganti nilai lData menjadi ldata = i + variabel_pada_
> 4. sebelum message box, tambahkan script yang berbunyi i = i +
> variabel_pada_
> 5. coba jalankan lagi script yang sudah diubah
>
> silakan dicoba dulu, semoga langsung berhasil.. kalo gagal nanti Jan bantu
> lagi deh, insya ALLAH
>
> # sampaikan masalah yang sering anda temui saat menggunakan Excel pada
> pooling berikut
>
> http://tech.
>
> Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat
> berharga untuk Be-Exceler yang lain
>
> Wassalam,
>
> -Miss Jan Raisin-
>
> *>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan
> Jan jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1
> pertanyaan yang diajukan;*
> *>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
> belajar-excel@
> *>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta
> dengan orang-orang yang sabar QS 2:153;*
>
>
> Pada 2 Mei 2013 14.38, Helsy B <helsyb@yahoo.
>
> **
>>
>>
>> Assalamu'
>>
>> Mohon maaf kalau saya banyak bertanya pada kasus yang sama, sebelumnya
>> sudah diberikan solusi oleh Miss Jan dan Mas Aji. Berikut ada pola yang
>> sedikit berbeda dengan file sebelumnya. Saya coba menggunakan script dari
>> Miss Jan dan Mas Aji, namun belum berhasil. Hasilnya msh ada pelanggan lain
>> yang ikut, dan set nomor dari awal belum start 1. Maklum saya baru belajar
>> makro dari forum ini yang sangat banyak menambah ilmu excel saya.
>>
>> Mohon bantuan para pakar, sebelumnya saya ucapkan banyak terima kasih.
>>
>> Wassalam,
>> Helsy
>>
>>
>>
>
>
Thu May 2, 2013 12:51 am (PDT) . Posted by:
"Jan Raisin"
coba cara seperti ini (salah satu cara dari banyak cara):
1. ketik angka 1 di sembarang cell kosong
2. copy angka 1 tersebut
3. blok seluruh cell yang ingin diganti isinya dari Text menjadi Angka
4. klik kanan, pilih paste special, pilih Multiply, klik OK
insya ALLAH text tersebut akan berubah menjadi angka
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
pooling berikut
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat
berharga untuk Be-Exceler yang lain
Wassalam,
-Miss Jan Raisin-
*>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan Jan
jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1
pertanyaan yang diajukan;*
*>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
belajar-excel@yahoogroups.com ;*
*>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan
orang-orang yang sabar QS 2:153;*
Pada 2 Mei 2013 12.32, Arfianto Prasetyo <prast.excel@gmail.com > menulis:
> **
>
>
> Dear para master Excel,
>
> Mohon bantuannya untuk merubah data Value di file terlampir menjadi angka
> sehingga bisa dilakukan fungsi SUM.
>
> Terima kasih atas perhatiannya.
>
>
>
1. ketik angka 1 di sembarang cell kosong
2. copy angka 1 tersebut
3. blok seluruh cell yang ingin diganti isinya dari Text menjadi Angka
4. klik kanan, pilih paste special, pilih Multiply, klik OK
insya ALLAH text tersebut akan berubah menjadi angka
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
pooling berikut
http://tech.
Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat
berharga untuk Be-Exceler yang lain
Wassalam,
-Miss Jan Raisin-
*>>> Jangan mengirim pertanyaan melalui japri ke Jan karena tidak akan Jan
jawab kecuali anda mentransfer ke Jan senilai Rp 1 juta untuk setiap 1
pertanyaan yang diajukan;*
*>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
belajar-excel@
*>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan
orang-orang yang sabar QS 2:153;*
Pada 2 Mei 2013 12.32, Arfianto Prasetyo <prast.excel@
> **
>
>
> Dear para master Excel,
>
> Mohon bantuannya untuk merubah data Value di file terlampir menjadi angka
> sehingga bisa dilakukan fungsi SUM.
>
> Terima kasih atas perhatiannya.
>
>
>
Thu May 2, 2013 12:58 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Coba fitur Replace ya..
1. Blok kolom C lalu tekan CTRL H
2. bagian Find what diisi karakter titik (pencet tombol titik di keyboard)
3. tekan replace all
4. Sampai disini, jika data sudah berubah menjadi bertipe numerik, berarti
kemungkinan besar, regional setting komputer Anda adalah Indonesia dan
pencet Close
Jika sampai No 4 data belum berubah menjadi bertipe numerik (gak geser jadi
rata kanan dalam cell), berarti regional setting komputer Anda kemungkinan
besar adalah English atau yang menggunakan tanda desimal karakter titik.
Lanjutkan ke step 5
5. bagian Find what diisi karakter koma (pencet tombol koma di keyboard)
6. bagian replace with diisi karakter titik (pencet tombol titik di
keyboard)
7. tekan replace all
8. tekan Close
Wassalam,
Kid.
2013/5/2 Arfianto Prasetyo <prast.excel@gmail.com >
> **
>
>
> Dear para master Excel,
>
> Mohon bantuannya untuk merubah data Value di file terlampir menjadi angka
> sehingga bisa dilakukan fungsi SUM.
>
> Terima kasih atas perhatiannya.
>
>
>
1. Blok kolom C lalu tekan CTRL H
2. bagian Find what diisi karakter titik (pencet tombol titik di keyboard)
3. tekan replace all
4. Sampai disini, jika data sudah berubah menjadi bertipe numerik, berarti
kemungkinan besar, regional setting komputer Anda adalah Indonesia dan
pencet Close
Jika sampai No 4 data belum berubah menjadi bertipe numerik (gak geser jadi
rata kanan dalam cell), berarti regional setting komputer Anda kemungkinan
besar adalah English atau yang menggunakan tanda desimal karakter titik.
Lanjutkan ke step 5
5. bagian Find what diisi karakter koma (pencet tombol koma di keyboard)
6. bagian replace with diisi karakter titik (pencet tombol titik di
keyboard)
7. tekan replace all
8. tekan Close
Wassalam,
Kid.
2013/5/2 Arfianto Prasetyo <prast.excel@
> **
>
>
> Dear para master Excel,
>
> Mohon bantuannya untuk merubah data Value di file terlampir menjadi angka
> sehingga bisa dilakukan fungsi SUM.
>
> Terima kasih atas perhatiannya.
>
>
>
Thu May 2, 2013 2:29 am (PDT) . Posted by:
"Arfianto Prasetyo" arfianto.prasetyo
@Miss Jan... Cara tersebut sudah dicoba namun tidak berhasil...
@Mr. Kid... Terima kasih, berhasil dengan cara tersebut...
To All... Terima kasih atas jawaban dan perhatainnya.
2013/5/2 Mr. Kid <mr.nmkid@gmail.com >
> **
>
>
> Coba fitur Replace ya..
>
> 1. Blok kolom C lalu tekan CTRL H
> 2. bagian Find what diisi karakter titik (pencet tombol titik di keyboard)
> 3. tekan replace all
> 4. Sampai disini, jika data sudah berubah menjadi bertipe numerik, berarti
> kemungkinan besar, regional setting komputer Anda adalah Indonesia dan
> pencet Close
>
> Jika sampai No 4 data belum berubah menjadi bertipe numerik (gak geser
> jadi rata kanan dalam cell), berarti regional setting komputer Anda
> kemungkinan besar adalah English atau yang menggunakan tanda desimal
> karakter titik. Lanjutkan ke step 5
> 5. bagian Find what diisi karakter koma (pencet tombol koma di keyboard)
> 6. bagian replace with diisi karakter titik (pencet tombol titik di
> keyboard)
> 7. tekan replace all
> 8. tekan Close
>
> Wassalam,
> Kid.
>
>
>
>
>
> 2013/5/2 Arfianto Prasetyo <prast.excel@gmail.com >
>
>> **
>>
>>
>> Dear para master Excel,
>>
>> Mohon bantuannya untuk merubah data Value di file terlampir menjadi angka
>> sehingga bisa dilakukan fungsi SUM.
>>
>> Terima kasih atas perhatiannya.
>>
>>
>
>
@Mr. Kid... Terima kasih, berhasil dengan cara tersebut...
To All... Terima kasih atas jawaban dan perhatainnya.
2013/5/2 Mr. Kid <mr.nmkid@gmail.
> **
>
>
> Coba fitur Replace ya..
>
> 1. Blok kolom C lalu tekan CTRL H
> 2. bagian Find what diisi karakter titik (pencet tombol titik di keyboard)
> 3. tekan replace all
> 4. Sampai disini, jika data sudah berubah menjadi bertipe numerik, berarti
> kemungkinan besar, regional setting komputer Anda adalah Indonesia dan
> pencet Close
>
> Jika sampai No 4 data belum berubah menjadi bertipe numerik (gak geser
> jadi rata kanan dalam cell), berarti regional setting komputer Anda
> kemungkinan besar adalah English atau yang menggunakan tanda desimal
> karakter titik. Lanjutkan ke step 5
> 5. bagian Find what diisi karakter koma (pencet tombol koma di keyboard)
> 6. bagian replace with diisi karakter titik (pencet tombol titik di
> keyboard)
> 7. tekan replace all
> 8. tekan Close
>
> Wassalam,
> Kid.
>
>
>
>
>
> 2013/5/2 Arfianto Prasetyo <prast.excel@
>
>> **
>>
>>
>> Dear para master Excel,
>>
>> Mohon bantuannya untuk merubah data Value di file terlampir menjadi angka
>> sehingga bisa dilakukan fungsi SUM.
>>
>> Terima kasih atas perhatiannya.
>>
>>
>
>
Thu May 2, 2013 2:29 am (PDT) . Posted by:
"Heri Pamungkas ( Gmail )" dchoosen88
Semangat pagi,
Kalau gunannya untuk sum
Mungkin bisa dicoba CSE
{=SUM(VALUE(C2:C15))}
di C16
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat berharga untuk Be-Exceler yang lain
Salam Excell-ent
On 02/05/2013 12:32, Arfianto Prasetyo wrote:
> Dear para master Excel,
>
> Mohon bantuannya untuk merubah data Value di file terlampir menjadi
> angka sehingga bisa dilakukan fungsi SUM.
>
> Terima kasih atas perhatiannya.
>
Kalau gunannya untuk sum
Mungkin bisa dicoba CSE
{=SUM(VALUE(
di C16
# sampaikan masalah yang sering anda temui saat menggunakan Excel pada
http://tech.
Sedikit waktu yang anda luangkan untuk mengisi pooling tersebut sangat berharga untuk Be-Exceler yang lain
Salam Excell-ent
On 02/05/2013 12:32, Arfianto Prasetyo wrote:
> Dear para master Excel,
>
> Mohon bantuannya untuk merubah data Value di file terlampir menjadi
> angka sehingga bisa dilakukan fungsi SUM.
>
> Terima kasih atas perhatiannya.
>
Thu May 2, 2013 2:44 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Jika ingin menggunakan formula, sebaiknya diperhatikan kemungkinan regional
setting yang bisa berbeda-beda disetiap komputer.
Data angka yang wajar adalah tanpa pemisah ribuan dan ada pemisah desimal
jika ada nilai desimalnya.
Jadi pemisah ribuan dihapus saja dari data. Pemisah desimal milik data
diganti dengan pemisah desimal milik regional setting komputer.
Karena umumnya pemisah desimal adalah koma atau titik, jika data memiliki
pemisah desimal koma dan tidak bisa dikonversi menjadi numerik secara
langsung, maka pemisah desimal regional setting adalah karakter titik.
Data : pemisah desimal menggunakan karakter koma.
Proses dalam formula :
1. cek apakah proses mengkonversi secara langsung (misal dikali 1) tidak
menghasilkan error value.
2. jika proses cek (nomor 1) menghasilkan error value, maka hapus karakter
titik (pemisah ribuan data) [substitute]
3. kemudian karakter pemisah desimal data (karakter koma) diganti dengan
karakter titik [substitute]
4. hasil nomor 3 dikonversi menjadi data bertipe numerik [misal dikali 1]
*** Ganti karakter koma yang tidak diapit oleh petik dua dengan karakter
titik koma jika komputer setempat be-regional setting bukan english
Kira-kira bentuknya jadi : (misal diletakkan di kolom D untuk data baris 2
-> di D2)
=IF( IsError( 1*c2 ) , 1*Substitute( Substitute( c2 , "." , "" ) , "," ,
"." ) , 1*c2 )
Formula di xl2007 bisa menjadi :
=IFError( 1*c2 , 1*Substitute( Substitute( c2 , "." , "" ) , "," , "." ) )
Wassalam,
Kid.
2013/5/2 Arfianto Prasetyo <prast.excel@gmail.com >
> **
>
>
> @Miss Jan... Cara tersebut sudah dicoba namun tidak berhasil...
>
> @Mr. Kid... Terima kasih, berhasil dengan cara tersebut...
>
> To All... Terima kasih atas jawaban dan perhatainnya.
>
>
> 2013/5/2 Mr. Kid <mr.nmkid@gmail.com >
>
> **
>>
>>
>> Coba fitur Replace ya..
>>
>> 1. Blok kolom C lalu tekan CTRL H
>> 2. bagian Find what diisi karakter titik (pencet tombol titik di
>> keyboard)
>> 3. tekan replace all
>> 4. Sampai disini, jika data sudah berubah menjadi bertipe numerik,
>> berarti kemungkinan besar, regional setting komputer Anda adalah Indonesia
>> dan pencet Close
>>
>> Jika sampai No 4 data belum berubah menjadi bertipe numerik (gak geser
>> jadi rata kanan dalam cell), berarti regional setting komputer Anda
>> kemungkinan besar adalah English atau yang menggunakan tanda desimal
>> karakter titik. Lanjutkan ke step 5
>> 5. bagian Find what diisi karakter koma (pencet tombol koma di keyboard)
>> 6. bagian replace with diisi karakter titik (pencet tombol titik di
>> keyboard)
>> 7. tekan replace all
>> 8. tekan Close
>>
>> Wassalam,
>> Kid.
>>
>>
>>
>>
>>
>> 2013/5/2 Arfianto Prasetyo <prast.excel@gmail.com >
>>
>>> **
>>>
>>>
>>> Dear para master Excel,
>>>
>>> Mohon bantuannya untuk merubah data Value di file terlampir menjadi
>>> angka sehingga bisa dilakukan fungsi SUM.
>>>
>>> Terima kasih atas perhatiannya.
>>>
>>>
>>
>
>
setting yang bisa berbeda-beda disetiap komputer.
Data angka yang wajar adalah tanpa pemisah ribuan dan ada pemisah desimal
jika ada nilai desimalnya.
Jadi pemisah ribuan dihapus saja dari data. Pemisah desimal milik data
diganti dengan pemisah desimal milik regional setting komputer.
Karena umumnya pemisah desimal adalah koma atau titik, jika data memiliki
pemisah desimal koma dan tidak bisa dikonversi menjadi numerik secara
langsung, maka pemisah desimal regional setting adalah karakter titik.
Data : pemisah desimal menggunakan karakter koma.
Proses dalam formula :
1. cek apakah proses mengkonversi secara langsung (misal dikali 1) tidak
menghasilkan error value.
2. jika proses cek (nomor 1) menghasilkan error value, maka hapus karakter
titik (pemisah ribuan data) [substitute]
3. kemudian karakter pemisah desimal data (karakter koma) diganti dengan
karakter titik [substitute]
4. hasil nomor 3 dikonversi menjadi data bertipe numerik [misal dikali 1]
*** Ganti karakter koma yang tidak diapit oleh petik dua dengan karakter
titik koma jika komputer setempat be-regional setting bukan english
Kira-kira bentuknya jadi : (misal diletakkan di kolom D untuk data baris 2
-> di D2)
=IF( IsError( 1*c2 ) , 1*Substitute( Substitute( c2 , "." , "" ) , "," ,
"." ) , 1*c2 )
Formula di xl2007 bisa menjadi :
=IFError( 1*c2 , 1*Substitute( Substitute( c2 , "." , "" ) , "," , "." ) )
Wassalam,
Kid.
2013/5/2 Arfianto Prasetyo <prast.excel@
> **
>
>
> @Miss Jan... Cara tersebut sudah dicoba namun tidak berhasil...
>
> @Mr. Kid... Terima kasih, berhasil dengan cara tersebut...
>
> To All... Terima kasih atas jawaban dan perhatainnya.
>
>
> 2013/5/2 Mr. Kid <mr.nmkid@gmail.
>
> **
>>
>>
>> Coba fitur Replace ya..
>>
>> 1. Blok kolom C lalu tekan CTRL H
>> 2. bagian Find what diisi karakter titik (pencet tombol titik di
>> keyboard)
>> 3. tekan replace all
>> 4. Sampai disini, jika data sudah berubah menjadi bertipe numerik,
>> berarti kemungkinan besar, regional setting komputer Anda adalah Indonesia
>> dan pencet Close
>>
>> Jika sampai No 4 data belum berubah menjadi bertipe numerik (gak geser
>> jadi rata kanan dalam cell), berarti regional setting komputer Anda
>> kemungkinan besar adalah English atau yang menggunakan tanda desimal
>> karakter titik. Lanjutkan ke step 5
>> 5. bagian Find what diisi karakter koma (pencet tombol koma di keyboard)
>> 6. bagian replace with diisi karakter titik (pencet tombol titik di
>> keyboard)
>> 7. tekan replace all
>> 8. tekan Close
>>
>> Wassalam,
>> Kid.
>>
>>
>>
>>
>>
>> 2013/5/2 Arfianto Prasetyo <prast.excel@
>>
>>> **
>>>
>>>
>>> Dear para master Excel,
>>>
>>> Mohon bantuannya untuk merubah data Value di file terlampir menjadi
>>> angka sehingga bisa dilakukan fungsi SUM.
>>>
>>> Terima kasih atas perhatiannya.
>>>
>>>
>>
>
>
Thu May 2, 2013 1:05 am (PDT) . Posted by:
"daniel_aho" daniel_aho
Pak lapendosol opik,
wah mantabs pak, sesuai dengan yang saya harapkan pak, terima kasih ya
pak untuk ilmunya, sangat membantu sekali.
daniel,
On 5/2/2013 2:06 PM, lapendosol opik wrote:
> Dear Daniel,
> Coba pake kode berikut, meskipun rada panjang kodenya, mohon master2
> yang lain untuk mengkoreksi/meringkasnya:
> Private Sub OptionButton1_Click()
> Dim KP1 As Range
> Dim ws As Worksheet
> Set ws = Sheets("master")
> KodePart.Clear
> For Each KP1 In ws.Range("b4:b11")
> With Me
> KodePart.AddItem KP1.Value
> End With
> Next KP1
> End Sub
>
> Private Sub OptionButton2_Click()
> Dim KP2 As Range
> Dim ws As Worksheet
> Set ws = Sheets("master")
> KodePart.Clear
> For Each KP2 In ws.Range("e4:e11")
> With Me
> KodePart.AddItem KP2.Value
> End With
> Next KP2
> End Sub
>
> Private Sub OptionButton3_Click()
> Dim KP3 As Range
> Dim ws As Worksheet
> Set ws = Sheets("master")
> KodePart.Clear
> For Each KP3 In ws.Range("h4:h11")
> With Me
> KodePart.AddItem KP3.Value
> End With
> Next KP3
> End Sub
>
> Trimakasih,
> Wassalam,
>
> ----------------------------------------------------------
> *From:* daniel_aho <daniel_aho@yahoo.co.id >
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Thursday, May 2, 2013 10:58 AM
> *Subject:* [belajar-excel] Option button macro pada User form untuk
> menentukan range combo box
>
> Dear para master excel,
>
> Bagaimana code macro untuk Option Button yang dipakai untuk menentukan
> range dari combo box, jika pertanyaan saya kurang jelas, berikut saya
> lampirkan filenya,
>
> Mohon pencerahan dari master2 semua.
> Terima kasih,
>
> daniel
>
>
>
wah mantabs pak, sesuai dengan yang saya harapkan pak, terima kasih ya
pak untuk ilmunya, sangat membantu sekali.
daniel,
On 5/2/2013 2:06 PM, lapendosol opik wrote:
> Dear Daniel,
> Coba pake kode berikut, meskipun rada panjang kodenya, mohon master2
> yang lain untuk mengkoreksi/
> Private Sub OptionButton1_
> Dim KP1 As Range
> Dim ws As Worksheet
> Set ws = Sheets("
> KodePart.Clear
> For Each KP1 In ws.Range("
> With Me
> KodePart.AddItem KP1.Value
> End With
> Next KP1
> End Sub
>
> Private Sub OptionButton2_
> Dim KP2 As Range
> Dim ws As Worksheet
> Set ws = Sheets("
> KodePart.Clear
> For Each KP2 In ws.Range("
> With Me
> KodePart.AddItem KP2.Value
> End With
> Next KP2
> End Sub
>
> Private Sub OptionButton3_
> Dim KP3 As Range
> Dim ws As Worksheet
> Set ws = Sheets("
> KodePart.Clear
> For Each KP3 In ws.Range("
> With Me
> KodePart.AddItem KP3.Value
> End With
> Next KP3
> End Sub
>
> Trimakasih,
> Wassalam,
>
> ------------
> *From:* daniel_aho <daniel_aho@yahoo.
> *To:* belajar-excel@
> *Sent:* Thursday, May 2, 2013 10:58 AM
> *Subject:* [belajar-excel] Option button macro pada User form untuk
> menentukan range combo box
>
> Dear para master excel,
>
> Bagaimana code macro untuk Option Button yang dipakai untuk menentukan
> range dari combo box, jika pertanyaan saya kurang jelas, berikut saya
> lampirkan filenya,
>
> Mohon pencerahan dari master2 semua.
> Terima kasih,
>
> daniel
>
>
>
Thu May 2, 2013 2:07 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Sepertinya script dari mas Opik ini bisa menjadi bahan wacana tentang
prosedur, terutama bagi BeExceller yang lagi keranjingan VBA.
Dari 3 prosedur event milik control option button ini ada proses yang
tetap, yaitu menghapus isi combobox bernama Kodepart, kemudian mengisi
ulang item combobox dari suatu data range tertentu dengan menggunakan loop.
Kali ini kita ndak akan mempermasalahkan bagaimana cara mengisinya (pakai
loop atau set row source), tetapi kita akan melihat sedikit tentang *cara
mengirim dan menerima suatu nilai dari satu variabel ke variabel lain antar
prosedur*
1. bunyi script untuk proses yang berulang adalah pada bagian :
Dim KP1 As Range
Dim ws As Worksheet
Set ws = Sheets("master")
KodePart.Clear
For Each KP1 In ws.Range("b4:b11")
With Me
KodePart.AddItem KP1.Value
End With
Next KP1
2. satu blok script tersebut diletakkan pada sebuah prosedur baru, misal
bernama IsiComboBox()
private sub IsiComboBox()
Dim KP1 As Range
Dim ws As Worksheet
Set ws = Sheets("master")
KodePart.Clear
For Each KP1 In ws.Range("b4:b11")
With Me
KodePart.AddItem KP1.Value
End With
Next KP1
end sub
3. dibuang dulu bagian yang tidak pokok, yaitu With Me dan End Withmenjadi :
private sub IsiComboBox()
Dim KP1 As Range
Dim ws As Worksheet
Set ws = Sheets("master")
KodePart.Clear
For Each KP1 In ws.Range("b4:b11")
KodePart.AddItem KP1.Value
Next KP1
end sub
4. mendefinisikan object inputan yang dibutuhkan.
>> ternyata yang dibutuhkan adalah object range yang akan menjadi isi
combobox (yang dimasukkan lewat loop), yaitu pada baris berbunyi :
For Each KP1 In ws.Range("b4:b11")
>> karena object-nya adalah range, dibuat dulu sebuah variabel object range
sebagai wadah inputan
dim rngInput as range
>> kemudian object range baru itu menggantikan bagian yang diproses [bagian
berbunyi : ws.Range("b4:b11")], sehingga berbunyi :
For Each KP1 In rngInput
>> script secara keseluruhan akan berubah menjadi :
private sub IsiComboBox()
Dim KP1 As Range
Dim ws As Worksheet
dim rngInput as range
Set ws = Sheets("master")
KodePart.Clear
For Each KP1 In rngInput
KodePart.AddItem KP1.Value
Next KP1
end sub
5. buang lagi baris-baris tidak perlu, yaitu yang berkaitan dengan object
worksheet, mulai dari deklarasi sampai penggunaannya, yaitu :
Dim ws As Worksheet
Set ws = Sheets("master")
>> maka susunan prosedur akan menjadi :
private sub IsiComboBox()
Dim KP1 As Range
dim rngInput as range
KodePart.Clear
For Each KP1 In rngInput
KodePart.AddItem KP1.Value
Next KP1
end sub
6. karena rngInput dibutuhkan oleh proses dan harus diterima dari prosedur
lain (dalam hal ini kiriman dari prosedur event setiap option button), maka
deklarasi variabel rngInput dipindah ke baris deklarasi prosedur (tidak
perlu dim lagi), sehingga baris deklarasi prosedur menjadi :
private sub IsiComboBox(*rngInput as range*)
dan baris deklarasi input yang menggunakan dim bisa dihapus.
Susunan prosedur akan menjadi :
private sub IsiComboBox(*rngInput as range*)
Dim KP1 As Range
KodePart.Clear
For Each KP1 In rngInput
KodePart.AddItem KP1.Value
Next KP1
end sub
***** sampai sini, sudah didapat sebuah prosedur untuk mengisi ComboBox
bernama KodePart yang harus disediakan data yang harus dimasukkan ke
combobox berupa sebuah range yang jelas letaknya.
Pada masing-masing prosedur event OptionButton click, yang membutuhkan
pengisian combobox, bisa hanya diisi dengan memanggil prosedur bernama
IsiComboBox
asal bisa menyediakan range sumbernya.
Contoh untuk tombol OptionButton1 akan memiliki prosedur event click
seperti :
Private Sub OptionButton1_Click()
'akan isi combobox, panggil si prosedur IsiComboBox
'dengan data yang akan diisikan ada di sheet bernama master pada
range B4:B11
IsiComboBox *Sheets("master").Range("b4:b11")*
End Sub
(terapkan juga untuk event tombol lain yang membutuhkan)
:)
moga-moga bisa menjadi mainan baru dalam ber-VBA bagi BeExceller yang lagi
semangat mengeksplorasi VBA.
Wassalam,
Kid.
2013/5/2 lapendosol opik <lapendosol@yahoo.com >
> **
>
>
> Dear Daniel,
> Coba pake kode berikut, meskipun rada panjang kodenya, mohon master2 yang
> lain untuk mengkoreksi/meringkasnya:
> Private Sub OptionButton1_Click()
> Dim KP1 As Range
> Dim ws As Worksheet
> Set ws = Sheets("master")
> KodePart.Clear
> For Each KP1 In ws.Range("b4:b11")
> With Me
> KodePart.AddItem KP1.Value
> End With
> Next KP1
> End Sub
>
> Private Sub OptionButton2_Click()
> Dim KP2 As Range
> Dim ws As Worksheet
> Set ws = Sheets("master")
> KodePart.Clear
> For Each KP2 In ws.Range("e4:e11")
> With Me
> KodePart.AddItem KP2.Value
> End With
> Next KP2
> End Sub
>
> Private Sub OptionButton3_Click()
> Dim KP3 As Range
> Dim ws As Worksheet
> Set ws = Sheets("master")
> KodePart.Clear
> For Each KP3 In ws.Range("h4:h11")
> With Me
> KodePart.AddItem KP3.Value
> End With
> Next KP3
> End Sub
>
> Trimakasih,
> Wassalam,
>
> ------------------------------
> *From:* daniel_aho <daniel_aho@yahoo.co.id >
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Thursday, May 2, 2013 10:58 AM
> *Subject:* [belajar-excel] Option button macro pada User form untuk
> menentukan range combo box
>
>
> Dear para master excel,
>
> Bagaimana code macro untuk Option Button yang dipakai untuk menentukan
> range dari combo box, jika pertanyaan saya kurang jelas, berikut saya
> lampirkan filenya,
>
> Mohon pencerahan dari master2 semua.
> Terima kasih,
>
> daniel
>
>
>
>
prosedur, terutama bagi BeExceller yang lagi keranjingan VBA.
Dari 3 prosedur event milik control option button ini ada proses yang
tetap, yaitu menghapus isi combobox bernama Kodepart, kemudian mengisi
ulang item combobox dari suatu data range tertentu dengan menggunakan loop.
Kali ini kita ndak akan mempermasalahkan bagaimana cara mengisinya (pakai
loop atau set row source), tetapi kita akan melihat sedikit tentang *cara
mengirim dan menerima suatu nilai dari satu variabel ke variabel lain antar
prosedur*
1. bunyi script untuk proses yang berulang adalah pada bagian :
Dim KP1 As Range
Dim ws As Worksheet
Set ws = Sheets("
KodePart.Clear
For Each KP1 In ws.Range("
With Me
KodePart.AddItem KP1.Value
End With
Next KP1
2. satu blok script tersebut diletakkan pada sebuah prosedur baru, misal
bernama IsiComboBox(
private sub IsiComboBox(
Dim KP1 As Range
Dim ws As Worksheet
Set ws = Sheets("
KodePart.Clear
For Each KP1 In ws.Range("
With Me
KodePart.AddItem KP1.Value
End With
Next KP1
end sub
3. dibuang dulu bagian yang tidak pokok, yaitu With Me dan End Withmenjadi :
private sub IsiComboBox(
Dim KP1 As Range
Dim ws As Worksheet
Set ws = Sheets("
KodePart.Clear
For Each KP1 In ws.Range("
KodePart.AddItem KP1.Value
Next KP1
end sub
4. mendefinisikan object inputan yang dibutuhkan.
>> ternyata yang dibutuhkan adalah object range yang akan menjadi isi
combobox (yang dimasukkan lewat loop), yaitu pada baris berbunyi :
For Each KP1 In ws.Range("
>> karena object-nya adalah range, dibuat dulu sebuah variabel object range
sebagai wadah inputan
dim rngInput as range
>> kemudian object range baru itu menggantikan bagian yang diproses [bagian
berbunyi : ws.Range("
For Each KP1 In rngInput
>> script secara keseluruhan akan berubah menjadi :
private sub IsiComboBox(
Dim KP1 As Range
Dim ws As Worksheet
dim rngInput as range
Set ws = Sheets("
KodePart.Clear
For Each KP1 In rngInput
KodePart.AddItem KP1.Value
Next KP1
end sub
5. buang lagi baris-baris tidak perlu, yaitu yang berkaitan dengan object
worksheet, mulai dari deklarasi sampai penggunaannya, yaitu :
Dim ws As Worksheet
Set ws = Sheets("
>> maka susunan prosedur akan menjadi :
private sub IsiComboBox(
Dim KP1 As Range
dim rngInput as range
KodePart.Clear
For Each KP1 In rngInput
KodePart.AddItem KP1.Value
Next KP1
end sub
6. karena rngInput dibutuhkan oleh proses dan harus diterima dari prosedur
lain (dalam hal ini kiriman dari prosedur event setiap option button), maka
deklarasi variabel rngInput dipindah ke baris deklarasi prosedur (tidak
perlu dim lagi), sehingga baris deklarasi prosedur menjadi :
private sub IsiComboBox(
dan baris deklarasi input yang menggunakan dim bisa dihapus.
Susunan prosedur akan menjadi :
private sub IsiComboBox(
Dim KP1 As Range
KodePart.Clear
For Each KP1 In rngInput
KodePart.AddItem KP1.Value
Next KP1
end sub
***** sampai sini, sudah didapat sebuah prosedur untuk mengisi ComboBox
bernama KodePart yang harus disediakan data yang harus dimasukkan ke
combobox berupa sebuah range yang jelas letaknya.
Pada masing-masing prosedur event OptionButton click, yang membutuhkan
pengisian combobox, bisa hanya diisi dengan memanggil prosedur bernama
IsiComboBox
asal bisa menyediakan range sumbernya.
Contoh untuk tombol OptionButton1 akan memiliki prosedur event click
seperti :
Private Sub OptionButton1_
'akan isi combobox, panggil si prosedur IsiComboBox
'dengan data yang akan diisikan ada di sheet bernama master pada
range B4:B11
IsiComboBox *Sheets("
End Sub
(terapkan juga untuk event tombol lain yang membutuhkan)
:)
moga-moga bisa menjadi mainan baru dalam ber-VBA bagi BeExceller yang lagi
semangat mengeksplorasi VBA.
Wassalam,
Kid.
2013/5/2 lapendosol opik <lapendosol@yahoo.
> **
>
>
> Dear Daniel,
> Coba pake kode berikut, meskipun rada panjang kodenya, mohon master2 yang
> lain untuk mengkoreksi/
> Private Sub OptionButton1_
> Dim KP1 As Range
> Dim ws As Worksheet
> Set ws = Sheets("
> KodePart.Clear
> For Each KP1 In ws.Range("
> With Me
> KodePart.AddItem KP1.Value
> End With
> Next KP1
> End Sub
>
> Private Sub OptionButton2_
> Dim KP2 As Range
> Dim ws As Worksheet
> Set ws = Sheets("
> KodePart.Clear
> For Each KP2 In ws.Range("
> With Me
> KodePart.AddItem KP2.Value
> End With
> Next KP2
> End Sub
>
> Private Sub OptionButton3_
> Dim KP3 As Range
> Dim ws As Worksheet
> Set ws = Sheets("
> KodePart.Clear
> For Each KP3 In ws.Range("
> With Me
> KodePart.AddItem KP3.Value
> End With
> Next KP3
> End Sub
>
> Trimakasih,
> Wassalam,
>
> ------------
> *From:* daniel_aho <daniel_aho@yahoo.
> *To:* belajar-excel@
> *Sent:* Thursday, May 2, 2013 10:58 AM
> *Subject:* [belajar-excel] Option button macro pada User form untuk
> menentukan range combo box
>
>
> Dear para master excel,
>
> Bagaimana code macro untuk Option Button yang dipakai untuk menentukan
> range dari combo box, jika pertanyaan saya kurang jelas, berikut saya
> lampirkan filenya,
>
> Mohon pencerahan dari master2 semua.
> Terima kasih,
>
> daniel
>
>
>
>
Thu May 2, 2013 1:11 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Selamat sore,
1. Coba ganti Activesheet dengan object sheet-nya secara langsung. Misal
ganti activesheet dengan sheets("nama sheetnya")
>> Jika masih error, maka sheet tersebut belum punya Vertikal PageBreak.
Coba buat sebuah vertikal pagebreak atau pastikan minimal ada sebuah
vertikal page break dalam worksheet.
2. Coba ganti nama file BOS 2012 Tuban.xlam menjadi BOS 2012.xlam atau
apalah nama filenya.
Wassalam,
Kid.
2013/5/2 Dian Anas <anassheva20@yahoo.com >
> **
>
>
> selamat pagi para master excel,
>
> 1. saya mau tanya bagaimana cara memperbaiki/mengatasi debug subscript
> out of range, ketika saya menekan debug muncul tulisan
> kuning ActiveSheet.VPageBreaks(1).DragOff Direction:=xlToRight,
> RegionIndex:=1, maksud dari tulisan itu apa dan bagaimana cara
> memperbaikinya ?
> 2. bagaimana mengubah ribbon addins BOS 2012 Tuban menjadi BOS 2012
>
>
>
1. Coba ganti Activesheet dengan object sheet-nya secara langsung. Misal
ganti activesheet dengan sheets("
>> Jika masih error, maka sheet tersebut belum punya Vertikal PageBreak.
Coba buat sebuah vertikal pagebreak atau pastikan minimal ada sebuah
vertikal page break dalam worksheet.
2. Coba ganti nama file BOS 2012 Tuban.xlam menjadi BOS 2012.xlam atau
apalah nama filenya.
Wassalam,
Kid.
2013/5/2 Dian Anas <anassheva20@
> **
>
>
> selamat pagi para master excel,
>
> 1. saya mau tanya bagaimana cara memperbaiki/
> out of range, ketika saya menekan debug muncul tulisan
> kuning ActiveSheet.
> RegionIndex:
> memperbaikinya ?
> 2. bagaimana mengubah ribbon addins BOS 2012 Tuban menjadi BOS 2012
>
>
>
Thu May 2, 2013 1:39 am (PDT) . Posted by:
"Krisan Flower" krisan_flower@rocketmail.com
Wassalamu'alaikum Wr. Wb.
Kepada rekan2 semua,
Mohon bantuannya, saya ingin mengambil beberapa file data dalam satu sheet dan dipindahkan ke file yg laen dengan kriteria tertentu gimana caranya yaa?? berikut saya berikan contoh file yg saya kerjakan.
saya punya data main data dan data result
(dipindah dari gambar oleh mods)
"Yang ingin saya lakukan adalah mengambil data dari tabel diatas (workbook main data) dengan ketentuan data yg diambil adalah data yang memiliki value 1 dan 2 saja"
Dari range a sampai p diatas (kolom data dalam workbook main data) data langsung ke sheet data result.�
Mohon bantuannya karena data yg ada sangat banyak dan sangat sulit jika dipindahkan satu2. terimakasih sebelumnya
Krisan
--- Mods ---
Image yang di embed ke dalam body email dilepas karena memiliki ukuran melebihi batas peraturan milis 250KB.
------------
Kepada rekan2 semua,
Mohon bantuannya, saya ingin mengambil beberapa file data dalam satu sheet dan dipindahkan ke file yg laen dengan kriteria tertentu gimana caranya yaa?? berikut saya berikan contoh file yg saya kerjakan.
saya punya data main data dan data result
(dipindah dari gambar oleh mods)
"Yang ingin saya lakukan adalah mengambil data dari tabel diatas (workbook main data) dengan ketentuan data yg diambil adalah data yang memiliki value 1 dan 2 saja"
Dari range a sampai p diatas (kolom data dalam workbook main data) data langsung ke sheet data result.�
Mohon bantuannya karena data yg ada sangat banyak dan sangat sulit jika dipindahkan satu2. terimakasih sebelumnya
Krisan
--- Mods ---
Image yang di embed ke dalam body email dilepas karena memiliki ukuran melebihi batas peraturan milis 250KB.
------------
Thu May 2, 2013 3:04 am (PDT) . Posted by:
"hendrik karnadi" hendrikkarnadi
Coba langkah2 berikut ini dengan rekaman macro (macro recording):
- sorot main data termasuk judul
- lakukan data filter
- Pilih value 1 dan 2
- Copy hasil Filter (tanpa judul) ke data result
- Batalkan data filter pada main data
- Stop Macro recording.
Setelah lihat hasilnya (harusnya OK), coba ulangi langkah tsb (huruf tebal) dengan macro yang telah dibuat.
Salam,
HK
________________________________
From: Krisan Flower <krisan_flower@rocketmail.com >
To: "belajar-excel@yahoogroups.com " <belajar-excel@yahoogroups.com >
Sent: Thursday, 2 May 2013, 15:23
Subject: [belajar-excel] Mengambil Range dari data yg jumlahnya banyak.
Wassalamu'alaikum Wr. Wb.
Kepada rekan2 semua,
Mohon bantuannya, saya ingin mengambil beberapa file data dalam satu sheet dan dipindahkan ke file yg laen dengan kriteria tertentu gimana caranya yaa?? berikut saya berikan contoh file yg saya kerjakan.
saya punya data main data dan data result
(dipindah dari gambar oleh mods)
"Yang ingin saya lakukan adalah mengambil data dari tabel diatas (workbook main data) dengan ketentuan data yg diambil adalah data yang memiliki value 1 dan 2 saja"
Dari range a sampai p diatas (kolom data dalam workbook main data) data langsung ke sheet data result.�
Mohon bantuannya karena data yg ada sangat banyak dan sangat sulit jika dipindahkan satu2. terimakasih sebelumnya
Krisan
--- Mods ---
Image yang di embed ke dalam body email dilepas karena memiliki ukuran melebihi batas peraturan milis 250KB.
------------
- sorot main data termasuk judul
- lakukan data filter
- Pilih value 1 dan 2
- Copy hasil Filter (tanpa judul) ke data result
- Batalkan data filter pada main data
- Stop Macro recording.
Setelah lihat hasilnya (harusnya OK), coba ulangi langkah tsb (huruf tebal) dengan macro yang telah dibuat.
Salam,
HK
____________
From: Krisan Flower <krisan_flower@
To: "belajar-excel@
Sent: Thursday, 2 May 2013, 15:23
Subject: [belajar-excel] Mengambil Range dari data yg jumlahnya banyak.
Wassalamu'
Kepada rekan2 semua,
Mohon bantuannya, saya ingin mengambil beberapa file data dalam satu sheet dan dipindahkan ke file yg laen dengan kriteria tertentu gimana caranya yaa?? berikut saya berikan contoh file yg saya kerjakan.
saya punya data main data dan data result
(dipindah dari gambar oleh mods)
"Yang ingin saya lakukan adalah mengambil data dari tabel diatas (workbook main data) dengan ketentuan data yg diambil adalah data yang memiliki value 1 dan 2 saja"
Dari range a sampai p diatas (kolom data dalam workbook main data) data langsung ke sheet data result.�
Mohon bantuannya karena data yg ada sangat banyak dan sangat sulit jika dipindahkan satu2. terimakasih sebelumnya
Krisan
--- Mods ---
Image yang di embed ke dalam body email dilepas karena memiliki ukuran melebihi batas peraturan milis 250KB.
------------
Thu May 2, 2013 3:57 am (PDT) . Posted by:
"ghozi alkatiri" ghozialkatiri
ketik formula di D2
=--SUBSTITUTE(C2;".";"")
copy ke bawah
wassalam
Ghozi Alkatiri
________________________________
Dari: Arfianto Prasetyo <prast.excel@gmail.com >
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 2 Mei 2013 12:32
Judul: [belajar-excel] Merubah Text menjadi Angka
Dear para master Excel,
Mohon bantuannya untuk merubah data Value di file terlampir menjadi angka sehingga bisa dilakukan fungsi SUM.
Terima kasih atas perhatiannya.
=--SUBSTITUTE(
copy ke bawah
wassalam
Ghozi Alkatiri
____________
Dari: Arfianto Prasetyo <prast.excel@
Kepada: belajar-excel@
Dikirim: Kamis, 2 Mei 2013 12:32
Judul: [belajar-excel] Merubah Text menjadi Angka
Dear para master Excel,
Mohon bantuannya untuk merubah data Value di file terlampir menjadi angka sehingga bisa dilakukan fungsi SUM.
Terima kasih atas perhatiannya.
Thu May 2, 2013 3:57 am (PDT) . Posted by:
"Rusdiyanto, Nicodemus"
Dear Suhu(s),
Mohon bantuannya untuk menghitung jumlah jam kerja dalam satuan MENIT,
dengan ketentuan sebagai berikut;
* Jam kerja aktif adalah jam 08:00 - 17:00
* Tiap jam 10:00 - 10:10 dan 15:00 - 15:10 selalu ada break
* Tiap jam 11:30 - 12:30 selalu istirahat
* Yang di cari jumlah jam kerja dalam satuan meni.
Thanks in advance,
NR
Your message is ready to be sent with the following file or link
attachments:
HitungJamDanBreak.xlsx
Note: To protect against computer viruses, e-mail programs may prevent
sending or receiving certain types of file attachments. Check your
e-mail security settings to determine how attachments are handled.
Mohon bantuannya untuk menghitung jumlah jam kerja dalam satuan MENIT,
dengan ketentuan sebagai berikut;
* Jam kerja aktif adalah jam 08:00 - 17:00
* Tiap jam 10:00 - 10:10 dan 15:00 - 15:10 selalu ada break
* Tiap jam 11:30 - 12:30 selalu istirahat
* Yang di cari jumlah jam kerja dalam satuan meni.
Thanks in advance,
NR
Your message is ready to be sent with the following file or link
attachments:
HitungJamDanBreak.
Note: To protect against computer viruses, e-mail programs may prevent
sending or receiving certain types of file attachments. Check your
e-mail security settings to determine how attachments are handled.
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