Kamis, 15 September 2011

]] XL-mania [[ Digest Number 2252

Messages In This Digest (28 Messages)

1a.
Re: sumproduct yang gagal From: Ahmad Adriansyah
1b.
Re: sumproduct yang gagal From: Mr. Kid
1c.
Re: sumproduct yang gagal From: Haps
2a.
Re: Menggabungkan content 2 sel From: deden haryadi
2b.
Re: Menggabungkan content 2 sel From: eko
2c.
Re: Menggabungkan content 2 sel From: Mr. Kid
2d.
Re: Menggabungkan content 2 sel From: hadiat Supriatna
2e.
Re: Menggabungkan content 2 sel From: STDEV(i)
2f.
Re: Menggabungkan content 2 sel From: Haps
2g.
Re: Menggabungkan content 2 sel From: Ahmad Adriansyah
2h.
Re: Menggabungkan content 2 sel From: endi pob
3a.
Re: Menampilkan dan mencari tanggal yang kosong dalam urutan. From: Mr. Kid
3b.
Re: Menampilkan dan mencari tanggal yang kosong dalam urutan. From: STDEV(i)
3c.
Re: Menampilkan dan mencari tanggal yang kosong dalam urutan. From: Haps
4a.
Re: Memisah karakter From: Mr. Kid
4b.
Re: Memisah karakter From: STDEV(i)
5.
pemisahan tabel dengan ke form print From: Priyo Pratomo
6a.
Rumus memisahkan nama-nya saja dalam suatu kalimat From: To Anto
7a.
Code paste pada ActiveCell From: muja
7b.
Re: Code paste pada ActiveCell From: hendrik karnadi
7c.
Re: Code paste pada ActiveCell From: Haps
7d.
Re: Code paste pada ActiveCell From: Mr. Kid
8.
Bls: ]] XL-mania [[ 5 besar dari data kolom dan baris From: ghozi alkatiri
9a.
Maximum Loop From: Hachi Rizki
9b.
Re: Maximum Loop From: hendrik karnadi
9c.
Re: Maximum Loop From: Mr. Kid
10a.
Bls: ]] XL-mania [[ Menggabungkan content 2 sel From: Roni Efendi
11.
Registrasi Pasien Puskesmas Reubee From: Munawar

Messages

1a.

Re: sumproduct yang gagal

Posted by: "Ahmad Adriansyah" ahmad.adriansyah@trac.astra.co.id

Wed Sep 14, 2011 4:13 pm (PDT)



Hi Deny,

Bagaimana jika menggunakan formula sumifs (excel2007). Apakah sesuai?

=SUMIFS('Data (2)'!$C$11:$C$163;'Data (2)'!$A$11:$A$163;'Data
(1)'!$A7;'Data (2)'!$B$11:$B$163;'Data (1)'!$B7)

Coba cek lagi name manager, apakah sudah sesuai merujuk pada range yang
dimaksud pada formulasi sumproduct tersebut?

Kindly Regards,

Ahmad Adriansyah

Loket Shafira | Loket Perpanjangan STNK-KIR

Perum. Bukit Hijau II Blok K No. 11 Kec. Rambutan Banyuasin (Plaju)

T. (0711) 540 916 | H. 0813 7372 9772

E. ahmad.adriansyah@loketshafira.c
<mailto:ahmad.adriansyah@trac.astra.co.id> om | W. www.loketshafira.com
<http://www.loketshafira.co.cc/>

From: XL-mania@yahoogroups.com [mailto:XL-mania@yahoogroups.com] On
Behalf Of ined_mail
Sent: 13 September 2011 10:24
To: XL-mania@yahoogroups.com
Subject: ]] XL-mania [[ sumproduct yang gagal

Dear para master,

saya lagi ada masalah excel nih,

saya mempunyai data (2) yang maksudnya adalah database.

dan data (1) adalah data rincian yang sudah di sort berdasarkan nomor
kode job.

mohon bantuannya, cara menggunakan rumus di data (1) dimana data (2)
sebagai databasenya.

saya sudah mencoba pake sumproduct tapi gagal,

mohon pencerahan lebih lanjut.

terimakasih.

<http://media.nowpublic.net/files/mpics/ined.jpg>

Bayangkan jika aku tidak sesempurna yang kamu bayang, dan aku bisa
membuat kamu sempurna yang tidak pernah terbayang.

*** Muchas Gracias ***

regards,

"ined_mail

by:

DENY TRI SURYODINOTO

email : deny[dot]dino[at]gmail[dot]com

ducati_energy_nolan_yamaha[dot]ducati_ined_nolan_opel[at]gmail[dot]com

1b.

Re: sumproduct yang gagal

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Wed Sep 14, 2011 4:14 pm (PDT)



Coba named range SHEET, KODEJOB dan IN mulai dari record pertama (baris 10).

Kid.

2011/9/13 ined_mail <deny.dino@gmail.com>

> **
>
>
>
>
> Dear para master,
> saya lagi ada masalah excel nih,
>
> saya mempunyai data (2) yang maksudnya adalah database.
>
> dan data (1) adalah data rincian yang sudah di sort berdasarkan nomor kode
> job.
>
> mohon bantuannya, cara menggunakan rumus di data (1) dimana data (2)
> sebagai databasenya.
> saya sudah mencoba pake sumproduct tapi gagal,
> mohon pencerahan lebih lanjut.
>
> terimakasih.
>
>
>
>
>
>
> Bayangkan jika aku tidak sesempurna yang kamu bayang, dan aku bisa membuat
> kamu sempurna yang tidak pernah terbayang.
>
> *** Muchas Gracias ***
>
> regards,
>
> *"ined_mail*
>
>
>
> by:
>
> DENY TRI SURYODINOTO
>
> email : deny*[dot]*dino*[at]*gmail*[dot]*com
> *d*ucati_*e*nergy_*n*olan_*y*amaha*[dot]**d*ucati_*i*ned_*n*olan_*o*pel*
> [at]**gmail**[dot]**com*
>
>
>
>
>
1c.

Re: sumproduct yang gagal

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Wed Sep 14, 2011 4:17 pm (PDT)



=SUMPRODUCT(
('Data (2)'!$A$11:$A$159=A7)*
('Data (2)'!$B$11:$B$159=B7)*
('Data (2)'!$D$11:$D$159))

kesulitan berasal dari row yang kosung tapi diikutkan dikalkulasi

2011/9/13 ined_mail <deny.dino@gmail.com>
>
> Dear para master,
> saya lagi ada masalah excel nih,
> saya mempunyai data (2) yang maksudnya adalah database.
> dan data (1) adalah data rincian yang sudah di sort berdasarkan nomor kode
job.
> mohon bantuannya, cara menggunakan rumus di data (1) dimana data (2)
sebagai databasenya.
> saya sudah mencoba pake sumproduct tapi gagal,
> mohon pencerahan lebih lanjut.
> terimakasih.
> regards,
2a.

Re: Menggabungkan content 2 sel

Posted by: "deden haryadi" yadi_zoldix@yahoo.com   yadi_zoldix

Wed Sep 14, 2011 4:14 pm (PDT)



Dear pak Nugroho,

hanya bisa bantu dengan ini, silahkan dichek

 
Haryadi
Accounting Staff
PT Luxindo Raya
Jl. Agung Timur 9 Blok 01 No. 29-30
Sunter Agung Podomoro
Jakarta 14350

E-mail:Haryadi@lux.co.id
Telp. :021 6511513
HP :0856 9767 1408

________________________________
From: D. Nugroho <dnugrohost@yahoo.com>
To: XL-mania@yahoogroups.com
Sent: Wednesday, September 14, 2011 9:10 AM
Subject: ]] XL-mania [[ Menggabungkan content 2 sel

 
Dear masters,
Mohon bantuannya untuk menyelesaikan masalah berikut (terlampir).

Saya ingin menggabungkan sel nomer urut dengan sel tanggal gabung sehingga menjadi nomer register. Saya coba gunakan fungsi concatenate tp hasilnya tidak sesuai harapan.

Mohon bantuannya. Terimakasih.

Regards,
D. Nugroho
Representative Office Head
PT. MNC Finance
Kisaran (Ph.0623-348069)
2b.

Re: Menggabungkan content 2 sel

Posted by: "eko" ekoarif_graha@yahoo.com   ekoarif_graha

Wed Sep 14, 2011 4:14 pm (PDT)




coba :

=TEXT(C4,"#")&TEXT(D4,"0#")&TEXT(E4,"0#")&TEXT(A4,"0#")

semoga membantu

2c.

Re: Menggabungkan content 2 sel

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Wed Sep 14, 2011 4:14 pm (PDT)



COba :
=C3*10^6+D3*10^4+E3*100+A3

Kid.

2011/9/14 D. Nugroho <dnugrohost@yahoo.com>

> **
>
>
> Dear masters,
> Mohon bantuannya untuk menyelesaikan masalah berikut (terlampir).
>
> Saya ingin menggabungkan sel nomer urut dengan sel tanggal gabung sehingga
> menjadi nomer register. Saya coba gunakan fungsi concatenate tp hasilnya
> tidak sesuai harapan.
>
> Mohon bantuannya. Terimakasih.
>
> Regards,
> D. Nugroho
> Representative Office Head
> PT. MNC Finance
> Kisaran (Ph.0623-348069)
>
>
2d.

Re: Menggabungkan content 2 sel

Posted by: "hadiat Supriatna" hadiat.supriatna@yahoo.com   hadiat.supriatna

Wed Sep 14, 2011 4:14 pm (PDT)



Hi Nugroho,

apakah seperti ini???

mungkin dari master lain ada ide yang lain

salam
hadiat

________________________________
From: D. Nugroho <dnugrohost@yahoo.com>
To: XL-mania@yahoogroups.com
Sent: Wednesday, September 14, 2011 9:10 AM
Subject: ]] XL-mania [[ Menggabungkan content 2 sel

 
Dear masters,
Mohon bantuannya untuk menyelesaikan masalah berikut (terlampir).

Saya ingin menggabungkan sel nomer urut dengan sel tanggal gabung sehingga menjadi nomer register. Saya coba gunakan fungsi concatenate tp hasilnya tidak sesuai harapan.

Mohon bantuannya. Terimakasih.

Regards,
D. Nugroho
Representative Office Head
PT. MNC Finance
Kisaran (Ph.0623-348069)
2e.

Re: Menggabungkan content 2 sel

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Wed Sep 14, 2011 4:17 pm (PDT)



=TEXT(F3,"yyymmdd")&TEXT(A3,"00")
atau

=TEXT(F3,"yyymmdd")&RIGHT("00"&A3,2)
atau

=C3&TEXT(D3,"00")&TEXT(E3,"00")&TEXT(A3,"00")

nomor id (yg tidak akan di aritmatikkan) sebaiknya tidak perlu di konvnersi
menjadi
data type Bilangan, biarlah tetap type text seperti hasil rumus (cmiiw)

2011/9/14 D. Nugroho <dnugrohost@yahoo.com>

> Mohon bantuannya untuk menyelesaikan masalah berikut (terlampir).
> Saya ingin menggabungkan sel nomer urut dengan sel tanggal gabung sehingga
> menjadi nomer register. Saya coba gunakan fungsi concatenate tp hasilnya
> tidak sesuai harapan.
> Mohon bantuannya. Terimakasih.
>
> Regards,
> D. Nugroho
>
>
2f.

Re: Menggabungkan content 2 sel

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Wed Sep 14, 2011 4:18 pm (PDT)



mudah mudahan ini adalah formula terpanjang dibanding dgn formula
jawaban lain yg ada (sesuai permintaan hanya merujuk kolom F dan A saja)

*=YEAR(F3) & RIGHT("00"& MONTH(F3), 2) & RIGHT("00" & DAY(F3), 2) &
RIGHT("00" & A3, 2)*

rumus lain:
=TEXT(F3,"yyyymmdd")&TEXT(A3,"00")

2011/9/14 D. Nugroho <dnugrohost@yahoo.com>
>
> Saya ingin menggabungkan sel nomer urut dengan sel tanggal gabung sehingga
menjadi nomer register.
> Saya coba gunakan fungsi concatenate tp hasilnya tidak sesuai harapan.
> D. Nugroho
> Kisaran
2g.

Re: Menggabungkan content 2 sel

Posted by: "Ahmad Adriansyah" ahmad.adriansyah@trac.astra.co.id

Wed Sep 14, 2011 5:37 pm (PDT)



Bisa pakai formula berikut ini : (fungsi text)...

=VALUE(TEXT(F3;"yyyymmdd")&TEXT(A3;"00"))

Bila ingin hasilnya tetap sebagai text, hilangkan saja fungsi
value-nya....

Kindly Regards,

Ahmad Adriansyah

Loket Shafira | Loket Perpanjangan STNK-KIR

Perum. Bukit Hijau II Blok K No. 11 Kec. Rambutan Banyuasin (Plaju)

T. (0711) 540 916 | H. 0813 7372 9772

E. ahmad.adriansyah@loketshafira.c
<mailto:ahmad.adriansyah@trac.astra.co.id> om | W. www.loketshafira.com
<http://www.loketshafira.co.cc/>

From: XL-mania@yahoogroups.com [mailto:XL-mania@yahoogroups.com] On
Behalf Of D. Nugroho
Sent: 14 September 2011 9:10
To: XL-mania@yahoogroups.com
Subject: ]] XL-mania [[ Menggabungkan content 2 sel

Dear masters,
Mohon bantuannya untuk menyelesaikan masalah berikut (terlampir).

Saya ingin menggabungkan sel nomer urut dengan sel tanggal gabung
sehingga menjadi nomer register. Saya coba gunakan fungsi concatenate tp
hasilnya tidak sesuai harapan.

Mohon bantuannya. Terimakasih.

Regards,
D. Nugroho
Representative Office Head
PT. MNC Finance
Kisaran (Ph.0623-348069)

2h.

Re: Menggabungkan content 2 sel

Posted by: "endi pob" endi_pob@yahoo.com   endi_pob

Thu Sep 15, 2011 5:53 am (PDT)



Kalo saya seh kayak gini betul ga??? dari para master da yg lebih mudah ga

tks

________________________________
From: D. Nugroho <dnugrohost@yahoo.com>
To: XL-mania@yahoogroups.com
Sent: Wednesday, 14 September 2011 9:10 AM
Subject: ]] XL-mania [[ Menggabungkan content 2 sel

 
Dear masters,
Mohon bantuannya untuk menyelesaikan masalah berikut (terlampir).

Saya ingin menggabungkan sel nomer urut dengan sel tanggal gabung sehingga menjadi nomer register. Saya coba gunakan fungsi concatenate tp hasilnya tidak sesuai harapan.

Mohon bantuannya. Terimakasih.

Regards,
D. Nugroho
Representative Office Head
PT. MNC Finance
Kisaran (Ph.0623-348069)
3a.

Re: Menampilkan dan mencari tanggal yang kosong dalam urutan.

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Wed Sep 14, 2011 4:14 pm (PDT)



Dear Green,

Dengan array formula small(IF)

Kid.

2011/9/13 green_child7 <green_child7@yahoo.de>

> **
>
>
> dear XL-mania,
>
> mohon bantuanya untuk mencari urutan yang hilang dalam suatu periode
> tanggal.
>
> A B C
> nama tanggal tanggal dispen
> 1 yanto 03/09/2011
> 2 yanto 05/09/2011
> 3 yanto 06/09/2011
> 4 yanto 07/09/2011
> 5 yanto 09/09/2011 2,4,8,10,11,12
> 6 mardi 03/09/2011
> 7 mardi 05/09/2011
> 8 mardi 06/09/2011
> 9 mardi 07/09/2011
> 10 mardi 08/09/2011
> 11 mardi 09/09/2011
>
> jadi saya mempunyai problem mencari urutan tanggal dari kolom tanggal yang
> sudah dibuat.
> seperti contoh untuk periode yang saya cari kali ini adalah periode tanggal
> 2-12 september. untuk (C5) adalah hasil yang saya inginkan. yang diambil
> dari kolom (B1 - B5) karena yanto untuk periode kerja 2-12 sept hanya masuk
> tanggal 3,5,6,7,9.
>
> kalau untuk karyawan mardi, bagaimana cara saya mencari tanggal karyawan
> yang tidak masuk pada kolom (C11) seperti yg saya kerjakan pada kolom (C5)
> karna selama ini saya mengisikanya secara manual.
>
> intinya yang saya cari disini adalah daftar tanggal karyawan yg kosong
> selama periode yang saya kasih.
>
> terima kasih sebanyak2nya dan mohon bantuanya.
>
>
>
>
3b.

Re: Menampilkan dan mencari tanggal yang kosong dalam urutan.

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Wed Sep 14, 2011 4:16 pm (PDT)



array formula multi hasil (30 cells sebaris)

=TRANSPOSE(DAY(SMALL(IF(COUNTIF(B2:B6,ROW(INDIRECT($B$2-DAY($B$2)+1
&":"&DATE(YEAR($B$2),MONTH($B$2)+1,0))))=0,ROW(INDIRECT($B$2-DAY($B$2)+1
&":"&DATE(YEAR($B$2),MONTH($B$2)+1,0)))),ROW($1:$31))))

2011/9/13 green_child7 <green_child7@yahoo.de>:
> dear XL-mania,
>
> mohon bantuanya untuk mencari urutan yang hilang dalam suatu periode
tanggal.
> A B C
> nama tanggal tanggal dispen
> 1 yanto 03/09/2011
> 2 yanto 05/09/2011
> 3 yanto 06/09/2011
> 4 yanto 07/09/2011
> 5 yanto 09/09/2011 2,4,8,10,11,12
> 6 mardi 03/09/2011
> 7 mardi 05/09/2011
> 8 mardi 06/09/2011
> 9 mardi 07/09/2011
> 10 mardi 08/09/2011
> 11 mardi 09/09/2011
>
> jadi saya mempunyai problem mencari urutan tanggal dari kolom tanggal yang
sudah dibuat.
> seperti contoh untuk periode yang saya cari kali ini adalah periode
tanggal 2-12 september. untuk (C5) adalah hasil yang saya inginkan. yang
diambil dari kolom (B1 - B5) karena yanto untuk periode kerja 2-12 sept
hanya masuk tanggal 3,5,6,7,9.
>
> kalau untuk karyawan mardi, bagaimana cara saya mencari tanggal karyawan
yang tidak masuk pada kolom (C11) seperti yg saya kerjakan pada kolom (C5)
karna selama ini saya mengisikanya secara manual.
>
> intinya yang saya cari disini adalah daftar tanggal karyawan yg kosong
selama* periode yang saya kasih.
>*
> terima kasih sebanyak2nya dan mohon bantuanya.
3c.

Re: Menampilkan dan mencari tanggal yang kosong dalam urutan.

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Wed Sep 14, 2011 4:18 pm (PDT)



kalau mau pakai UDF; ini (gambar) coding udfnya

[image: FungsiKatro vs SuperSiti.PNG]

di worksheet cara menuliskannya
=FungsiKatro(RangeTanggal, BatasBawah, BatasAtas)

misalnya
=FungsiKatro(*C3:C7*, *2*, *12*)

=menggabung angka tanggal dari tgl 2 s/d 12 tetapi khusus Tgl
yg *tidak ada* di Range C3:C7; menjadi data text dlm satu cell.

Pak Green_Child sebenarnya tidak pernah memberi batas 2 sampai 12;
dia hanya bilang dengan santai "selama periode yg saya kasih" yg menurutku
sulit di wujudkan dlm data kuantititip...

Batas itu *saya karang* sendiri,... biar seru ajahh..

Saya tadi melihat mbak siti membuat versi FORMULA, dimana batas (periode)
nya
juga dia tentukan sendiri =1 bulan (bulan yg ada pada tgl petama yg berarti
1 sd 30 Sept)

2011/9/13 green_child7 <green_child7@yahoo.de>

> **
>
> dear XL-mania,
> mohon bantuanya untuk mencari urutan yang hilang dalam suatu periode
> tanggal.
>
> A B C
> nama tanggal tanggal dispen
> 1 yanto 03/09/2011
> 2 yanto 05/09/2011
> 3 yanto 06/09/2011
> 4 yanto 07/09/2011
> 5 yanto 09/09/2011 2,4,8,10,11,12
> 6 mardi 03/09/2011
> 7 mardi 05/09/2011
> 8 mardi 06/09/2011
> 9 mardi 07/09/2011
> 10 mardi 08/09/2011
> 11 mardi 09/09/2011
>
> jadi saya mempunyai problem mencari urutan tanggal dari kolom tanggal yang
> sudah dibuat.
> seperti contoh untuk periode yang saya cari kali ini adalah periode tanggal
> 2-12 september. untuk (C5) adalah hasil yang saya inginkan. yang diambil
> dari kolom (B1 - B5) karena yanto untuk periode kerja 2-12 sept hanya masuk
> tanggal 3,5,6,7,9.
>
> kalau untuk karyawan mardi, bagaimana cara saya mencari tanggal karyawan
> yang tidak masuk pada kolom (C11) seperti yg saya kerjakan pada kolom (C5)
> karna selama ini saya mengisikanya secara manual.
>
> intinya yang saya cari disini adalah daftar tanggal karyawan yg kosong
> selama periode yang saya kasih.
>
> terima kasih sebanyak2nya dan mohon bantuanya.
>
>
4a.

Re: Memisah karakter

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Wed Sep 14, 2011 4:14 pm (PDT)



Dear Eko,

Coba :
=TRIM(MID(SUBSTITUTE(SUBSTITUTE($A1,",",REPT(" ",99)),".",REPT("
",99)),(COLUMNS($A1:A1)-1)*99+1,99))

Kid.

2011/9/14 eko <ekoarif_graha@yahoo.com>

> **
>
>
> Salam hangat,
>
> Mohon pencerahan
> Bagaimana memecah karakter seperti berikut
>
> kolom 1 kolom 2 kolom 3 kolom 4 kolom 5
> X,XY.X,Y.X Menjadi x ,xy .x ,y .x
>
> Terimakasih atas segala bantuannya.
>
> Salam
>
> Catatan: pemisahan ditandai koma (,) / (.)
>
>
>
4b.

Re: Memisah karakter

Posted by: "STDEV(i)" setiyowati.devi@gmail.com   siti_vi

Wed Sep 14, 2011 4:17 pm (PDT)



kalau pakai *Data > Text-To-Column*,
dengan delimiternya titik dan koma
konsekwensinya hasil tidak ada titik dan koma nya
boleh kah ??

[image: txttocoll.GIF]

2011/9/14 eko <ekoarif_graha@yahoo.com>

> Salam hangat,
> Mohon pencerahan
> Bagaimana memecah karakter seperti berikut
>
> * kolom 1 kolom 2 kolom 3 kolom 4 kolom 5
> X,XY.X,Y.X Menjadi x ,xy .x ,y .x
> *
> Terimakasih atas segala bantuannya.
> Salam
>
> Catatan: pemisahan ditandai koma (,) / (.)
5.

pemisahan tabel dengan ke form print

Posted by: "Priyo Pratomo" priyo3pratomo@yahoo.com   priyo3pratomo

Wed Sep 14, 2011 5:35 pm (PDT)



Salam hormat untuk semua XL-Mania
 
langsung aja, saya ada tabel database yang akan saya pindahkan ke form print. (file terlampir)
 
saya menemui kesulitan untuk memisahkan / mengelompokkan database tsb.
 
saya mohon teman2 dapat membantu problem saya, terima kasih.
 
hormat saya,
 
 
 
priyo
 
6a.

Rumus memisahkan nama-nya saja dalam suatu kalimat

Posted by: "To Anto" anto.wijayakusumo@yahoo.com   anto.wijayakusumo

Wed Sep 14, 2011 5:35 pm (PDT)



Dear All
Owner, Para Guru XL Mania,

Mohon bantuannya untuk rumus menampilkan nama-nya saya dari suatu data dan rumus
menghitung utilisasi (jumlah frekuensi) per tanggal sesuai file (terlampir)..

Terima kasih.

Salam,

Anto W
7a.

Code paste pada ActiveCell

Posted by: "muja" mail4muja@yahoo.co.id   muja_muje

Wed Sep 14, 2011 5:36 pm (PDT)



Salam buat XL Masters,....

Code Copy Paste standar biasanya berbentuk :

Range("D11:F17").Copy Destination:=Range("A2")
Mau tanya nih, gemana ya code untuk mem-Paste data pada ActiveCell.....? MISAL : range data yang akan di copy D11:F17 tapi akan di paste di ActiveCell H3....

Demikian,,,,, Mohon responnya Tks

7b.

Re: Code paste pada ActiveCell

Posted by: "hendrik karnadi" hendrikkarnadi@yahoo.com   hendrikkarnadi

Thu Sep 15, 2011 5:54 am (PDT)





Pakai formula Range("D11:F17").Copy ActiveCell
 
Salam,
Hendrik Karnadi
 
From: muja <mail4muja@yahoo.co.id>
To: XL-mania@yahoogroups.com
Sent: Wednesday, September 14, 2011 3:29 PM
Subject: ]] XL-mania [[ Code paste pada ActiveCell

 
Salam buat XL Masters,....

Code Copy Paste standar biasanya berbentuk :

Range("D11:F17").Copy Destination:=Range("A2")
Mau tanya nih, gemana ya code untuk mem-Paste data pada ActiveCell.....? MISAL : range data yang akan di copy D11:F17 tapi akan di paste di ActiveCell H3....

Demikian,,,,, Mohon responnya Tks

7c.

Re: Code paste pada ActiveCell

Posted by: "Haps" hapsari.stlizbeth@gmail.com   liz_hap

Thu Sep 15, 2011 5:59 am (PDT)



ActiveCell itu kan *object RANGE* juga

Sub Ngopi1()
Range("D11:D17").Copy ActiveCell
End Sub

atau

Sub Ngopi2()
Range("D11:D17").Copy
ActiveCell.PasteSpecial xlPasteAll
End Sub

2011/9/14 muja <mail4muja@yahoo.co.id>

> **
>
> Code Copy Paste standar biasanya berbentuk :
>
> Range("D11:F17").Copy Destination:=Range("A2")
> Mau tanya nih, gemana ya code untuk mem-Paste data pada ActiveCell.....?
>
MISAL : range data yang akan di copy D11:F17 tapi akan di paste di
> ActiveCell H3....
>
> Demikian,,,,, Mohon responnya Tks
>
>
>
7d.

Re: Code paste pada ActiveCell

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Sep 15, 2011 5:59 am (PDT)



Hai Muja,

Untuk copy paste ke active cell :
dim rngAktif as range
set rngAktif=activecell
range("d11:f17").copy rngaktif

Salam,
Kid.

2011/9/14 muja <mail4muja@yahoo.co.id>

> **
>
>
> Salam buat XL Masters,....
>
> Code Copy Paste standar biasanya berbentuk :
>
> Range("D11:F17").Copy Destination:=Range("A2")
> Mau tanya nih, gemana ya code untuk mem-Paste data pada ActiveCell.....?
> MISAL : range data yang akan di copy D11:F17 tapi akan di paste di
> ActiveCell H3....
>
> Demikian,,,,, Mohon responnya Tks
>
>
>
>
>
8.

Bls: ]] XL-mania [[ 5 besar dari data kolom dan baris

Posted by: "ghozi alkatiri" ghozialkatiri@yahoo.co.id   ghozialkatiri

Wed Sep 14, 2011 5:37 pm (PDT)



langsung lihat di attachment

wassalam

Ghozi Alkatiri

--- Pada Sab, 10/9/11, tresna <tresna@ihara.co.id> menulis:

Dari: tresna <tresna@ihara.co.id>
Judul: ]] XL-mania [[ 5 besar dari data kolom dan baris
Kepada: XL-mania@yahoogroups.com
Tanggal: Sabtu, 10 September, 2011, 2:10 PM

 

 

Mohon Bantuannya…

 

Saya ingin membuat rumus atau fungsi untuk mendapatkan data
5 besar berdasar dari data kolom dan baris berikut..

Berikut data dan contoh data file nya

 

 

Priatna Tresna N

 

P Save a tree! Please don't print this e-mail unless you
really need to.

 

9a.

Maximum Loop

Posted by: "Hachi Rizki" hachiuz_ld27@yahoo.co.id   hachiuz_ld27

Wed Sep 14, 2011 6:09 pm (PDT)



Dear Excel Expert,

Saya ketemu masalah dengan looping for next pada VBA

saya menggunakan sintaks sebagai berikut

For i = 2 To baris
        If proses.Cells(i, "X").Value = "delete" Then
            proses.Range(Cells(i, 1), Cells(i, "Z")).Value = vbNullString
            proses.Cells(i, 1).Select
        End If
Next i

sebelumnya saya gunakan count untuk baris, sehingga baris mencerminkan jumlah baris dari data yang bersangkutan.
Saya run macro tersebut 2 kali. Pertama saya menggunakan data dengan jumlah row sebanyak 28000-an dan berjalan dengan baik
Selanjutnya saya coba dengan data dengan jumlah row sebanyak 105.000-an. Dan muncuk error. 'type mismatch'

pertanyaan saya :
- apakah memang ada batas maksimum untuk loop for - next ? kalau ada, berapakah jumlah maksimumnya ..??
- ada teman2 yang punya alternatif untuk scrip nya. Tujuan saya adalah menghilangkan baris yang pada kolom X ada tulisan "delete"

terima kasih,
hachi
9b.

Re: Maximum Loop

Posted by: "hendrik karnadi" hendrikkarnadi@yahoo.com   hendrikkarnadi

Thu Sep 15, 2011 5:54 am (PDT)



Dari penjelasan anda kelihatanya ada masalah dengan Deklarasi Variabel baris, mungkin dideklarasikan sebagai Integer (batasnya 32.767 saja).
Kalau benar asumsi saya ganti Integer dengan Long.
 
Salam,
Hendrik Karnadi

From: Hachi Rizki <hachiuz_ld27@yahoo.co.id>
To: "XL-mania@yahoogroups.com" <XL-mania@yahoogroups.com>
Sent: Wednesday, September 14, 2011 11:59 AM
Subject: ]] XL-mania [[ Maximum Loop

 
Dear Excel Expert,

Saya ketemu masalah dengan looping for next pada VBA

saya menggunakan sintaks sebagai berikut

For i = 2 To baris
        If proses.Cells(i, "X").Value = "delete" Then
            proses.Range(Cells(i, 1), Cells(i, "Z")).Value = vbNullString
            proses.Cells(i, 1).Select
        End If
Next i

sebelumnya saya gunakan count untuk baris, sehingga baris mencerminkan jumlah baris dari data yang bersangkutan.
Saya run macro tersebut 2 kali. Pertama saya menggunakan data dengan jumlah row sebanyak 28000-an dan berjalan dengan baik
Selanjutnya saya coba dengan data dengan jumlah row sebanyak 105.000-an. Dan muncuk error. 'type mismatch'

pertanyaan saya :
- apakah memang ada batas maksimum untuk loop for - next ? kalau ada, berapakah jumlah maksimumnya ..??
- ada teman2 yang punya alternatif untuk scrip nya. Tujuan saya adalah menghilangkan baris yang pada kolom X ada tulisan "delete"

terima kasih,
hachi

9c.

Re: Maximum Loop

Posted by: "Mr. Kid" mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Sep 15, 2011 5:59 am (PDT)



Dear Hachi,

Asumsinya tabel adalah tabel yang baik, yaitu :
1. tabel data dari kolom A
2. Header di baris 1 dan hanya 1 baris serta tidak ada merge cell
3. Tidak ada kolom blank atau kolom tanpa header
4. Data mulai dari baris 2
5. Tidak ada baris kosong antar record

dim rngData as rng

activesheet.autofiltermode=false

'jika proses dipilih untuk men-delete baris (bukan menghapus nilai)
set rngdata=range("a1").currentregion

'jika proses dipilih untuk menghapus nilai saja (akan ada baris kosong)
*'*set rngdata=range("a1:x1").resize(activesheet.usedrange.rows.count)

with rngdata
.autofilter 24,"delete"

'jika akan delete seluruh baris data (supaya tidak ada baris blank
antar record = terjaga tetap sebagai tabel yang baik)

.offset(1).specialcells(xlcelltypevisible).entrirerow.delete
'ganti *.entirerow.delete *dengan *.clearcontents *jika ingin membiarkan ada
baris kosong
end with
activesheet.autofiltermode=false

Thank You and regards
Kid.

2011/9/14 Hachi Rizki <hachiuz_ld27@yahoo.co.id>

> **
>
>
> Dear Excel Expert,
>
> Saya ketemu masalah dengan looping for next pada VBA
>
> saya menggunakan sintaks sebagai berikut
>
> For i = 2 To baris
> If proses.Cells(i, "X").Value = "delete" Then
> proses.Range(Cells(i, 1), Cells(i, "Z")).Value = vbNullString
> proses.Cells(i, 1).Select
> End If
> Next i
>
> sebelumnya saya gunakan count untuk baris, sehingga baris mencerminkan
> jumlah baris dari data yang bersangkutan.
> Saya run macro tersebut 2 kali. Pertama saya menggunakan data dengan jumlah
> row sebanyak 28000-an dan berjalan dengan baik
> Selanjutnya saya coba dengan data dengan jumlah row sebanyak 105.000-an.
> Dan muncuk error. 'type mismatch'
>
> pertanyaan saya :
> - apakah memang ada batas maksimum untuk loop for - next ? kalau ada,
> berapakah jumlah maksimumnya ..??
> - ada teman2 yang punya alternatif untuk scrip nya. Tujuan saya adalah
> menghilangkan baris yang pada kolom X ada tulisan "delete"
>
> terima kasih,
> hachi
>
>
>
>
10a.

Bls: ]] XL-mania [[ Menggabungkan content 2 sel

Posted by: "Roni Efendi" surya_mukti@yahoo.com   surya_mukti

Thu Sep 15, 2011 5:53 am (PDT)



gmna klo gini aja rumusnya : TEXT(F3,"yyyymmdd")&TEXT(A3,"0#")

________________________________
Dari: D. Nugroho <dnugrohost@yahoo.com>
Kepada: XL-mania@yahoogroups.com
Terkirim: Rab, 14 September, 2011 09:10:26
Judul: ]] XL-mania [[ Menggabungkan content 2 sel

Dear masters,
Mohon bantuannya untuk menyelesaikan masalah berikut (terlampir).

Saya ingin menggabungkan sel nomer urut dengan sel tanggal gabung sehingga
menjadi nomer register. Saya coba gunakan fungsi concatenate tp hasilnya tidak
sesuai harapan.

Mohon bantuannya. Terimakasih.

Regards,
D. Nugroho
Representative Office Head
PT. MNC Finance
Kisaran (Ph.0623-348069)
11.

Registrasi Pasien Puskesmas Reubee

Posted by: "Munawar" munawar_aceh@yahoo.com   munawar_aceh

Thu Sep 15, 2011 6:00 am (PDT)



Dear Master..

Maaf sebelumnya,saya newbie diforum dan program excel.
Mohon bimbingan dan pencerahan.
Saya sedang belajar memasukkan data hasil inputan dari sheet(form) yang telah ter-input di sheet(data) ke sheet(laporan). Tapi saya terkendala dalam memasukkan hasil input tadi kekolombaris yang ada di sheet(laporan) secara otomatis.
Sebelumnya saya memasukkan rumus manual dengan menggunakan '=SUMPRODUCT((data!A:A=laporan!B12)*(data!L:L=laporan!C11)) dikolom sheet(laporan),program ini berjalan dengan baik memang,tapi jika saya tetap memaksakan menggunakan rumus sumproduct ini untuk setiap kolom untuk setiap tanggal,bulan dan tahun,maka program akan berjalan dengan sangat-sangat lambat.
karenanya,apakah ada sedikit pencerahan dari master semua untuk design vba makro yang bisa saya lakukan sehingga hasil inputan disheet(data) yang sama "tanggal" dan sama "kategori"nya bisa juga secara otomatis masuk ke kolom sheet(laporan) tanpa memperlambat loading file?
terimakasih untuk pencerahannya master semua..
salam kenal.

Munawar
Mobile : +6285260117717
Skype : munawardr
YM : munawar_aceh
Recent Activity
Visit Your Group
Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Yahoo! Groups

Small Business Group

Improve your business

by community exchange

Find helpful tips

for Moderators

on the Yahoo!

Groups team blog.

Need to Reply?

Click one of the "Reply" links to respond to a specific message in the Daily Digest.

Create New Topic | Visit Your Group on the Web
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| selamat idul fitri, mohon maaf lahir dan batin...                 |
| www.linkedin.com/company/xl-mania                                 |
| ayo pesan buku "mengapa boss benci chart anda"  :D :D :D          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
MARKETPLACE

Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.


A bad score is 596. A good idea is checking yours at freecreditscore.com.

Tidak ada komentar:

Posting Komentar