Sabtu, 14 Juli 2012

]] XL-mania [[ Digest Number 2444

15 New Messages

Digest #2444
1a
Conditional Formatting by "Yohanes" ybudisuryanto
2a
Re: menandai nilai terkecil by "Ki Semprul" ki_semprull
2b
Re: menandai nilai terkecil by "Ki Semprul" ki_semprull
2d
Re: menandai nilai terkecil by "hendrik karnadi" hendrikkarnadi
3a
merubah format tgl by "Agung Haryanto" agunglombo
3b
Re: merubah format tgl by "Kid Mr." nmkid.family@ymail.com
3c
Re: merubah format tgl by "hendrik karnadi" hendrikkarnadi
4
memantau pengambilan BBM by "aries Tio" ar13s_tio
5a
Bls: ]] XL-mania [[ menandai nilai terkecil by "Hendra Kurniawan" hendr4k
7a
Re: Copy Paste Semua Sheet by "Rara Wilis" rr_wilis
8
rekap absensi dengan kondisi by "aris sujat" caksujat
9
Fw: ]] XL-mania [[ Output Produksi by "hendrik karnadi" hendrikkarnadi
10a
Re: Output Produksi by "Rara Wilis" rr_wilis

Messages

Sat Jul 14, 2012 6:47 am (PDT) . Posted by:

"Yohanes" ybudisuryanto

Maaf, saya baru bergabung dg XL-Mania. Saya mau nanya, saat ini saya membuat form isian Surat Setoran Pajak. Saya kasih pilihan setoran: Ber-NPWP atau tidak, Jenis Pajak dan Jenis Setoran menggunakan menu drop-down di XL 2003. Saya mau menampilkan optional yaitu apabila salah menempatkan pilihan setoran dng jenis pajak dengan jenis setoran, maka muncul peringatan salahnya. Apakah bisa dengan conditional fomatting atau tex box. Mohon bantuannya. Saya kerja di kantor "enggan" menerima masukan entang pentingnya suatu aplikasi untuk memudahkan pekerjaan. Trima kasih atas bantuannya.

Sat Jul 14, 2012 6:48 am (PDT) . Posted by:

"Ki Semprul" ki_semprull

Tanpa Kolom Bantu; tetap dengan Conditional Formatting dengan Formula
RULES nya sbb:

=AND(COUNTIF($B2:$B$18,$B2)>1,$B2<>$B1)

[image: Inline image 1]

*Semprull Ki!*

2012/7/10 Abdu Rachman <adoel.0519@yahoo.com>

> **
> mohon bantuan dari para master...
> bagaimana cara menandai salah satu data yang sama untuk kolom NIK dan NAMA
> namun yang di beri tanda hanya NIK yang terkecil dari data yang dobel
> tersebut.
> jadi maksudnya hanya salah satu saja yang di beri tanda (misalnya dengan
> pewarnaan)
> terima kasih.
>

Sat Jul 14, 2012 6:49 am (PDT) . Posted by:

"Ki Semprul" ki_semprull

Menandainya dengan : *Conditional Formatting* dengan Rules sbb (lihat
gambar)
[image: Inline image 1]

*Semprull Ki!..*

2012/7/10 Abdu Rachman <adoel.0519@yahoo.com>

> **
>
> bagaimana cara menandai salah satu data yang sama untuk kolom NIK dan NAMA
> namun yang di beri tanda hanya NIK yang terkecil dari data yang dobel
> tersebut.
> jadi maksudnya hanya salah satu saja yang di beri tanda (misalnya dengan
> pewarnaan)
> terima kasih.
>

Sat Jul 14, 2012 6:53 am (PDT) . Posted by:

"NANG Agus"

2012/7/11 NANG Agus <nangagus@gmail.com>

> Dear Abu Rachman,
>
> Pewarnaan cel dengan syarat tertentu dapat dibuat dengan Conditional
> formating. pilih Use a formula
>
>
> Ketik rumusnya
> =AND(COUNTIF($B$2:$B$18;$B2)>1;SMALL(IF($B$2:$B$18=$B2;(RIGHT($A$2:$A$18;12))*1;"");1)=RIGHT($A2;12)*1)
> Buat formatnya, Klik OK
>
> Aduh, attacment lupa ini filenya.

>
> 2012/7/10 Abdu Rachman <adoel.0519@yahoo.com>
>
>> **
>>
>>
>> mohon bantuan dari para master...
>>
>> bagaimana cara menandai salah satu data yang sama untuk kolom NIK dan
>> NAMA namun yang di beri tanda hanya NIK yang terkecil dari data yang dobel
>> tersebut.
>> jadi maksudnya hanya salah satu saja yang di beri tanda (misalnya dengan
>> pewarnaan)
>>
>> terima kasih.
>>
>>
>>
>
>

Sat Jul 14, 2012 6:54 am (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Jika yang dimaksud adalah menandai (memberi warna) NIK terkecil dari dua atau lebih nama yang sama maka diperlukan kolom bantu untuk memberi no urut pada nama2 yang sama tersebut, dengan syarat susunan nama2 yang sama mulai dari NIK terkecil.

Berdasarkan no urut pada kolom bantu tersebut kita bisa menggunakan Conditional Formating untuk memberi warna.

Salam,
Hendrik Karnadi

________________________________
From: Abdu Rachman <adoel.0519@yahoo.com>
To: "XL-mania@yahoogroups.com" <XL-mania@yahoogroups.com>
Sent: Tuesday, 10 July 2012, 22:31
Subject: ]] XL-mania [[ menandai nilai terkecil


 
mohon bantuan dari para master...

bagaimana cara menandai salah satu data yang sama untuk kolom NIK dan NAMA namun yang di beri tanda hanya NIK yang terkecil dari data yang dobel tersebut.
jadi maksudnya hanya salah satu saja yang di beri tanda (misalnya dengan pewarnaan)

terima kasih.

Sat Jul 14, 2012 6:49 am (PDT) . Posted by:

"Agung Haryanto" agunglombo

Dear all,
tolong bantuannya utk merubah format tanggal berikut mjd dd/mm/yyyy

thanks.

Sat Jul 14, 2012 3:32 pm (PDT) . Posted by:

"Kid Mr." nmkid.family@ymail.com

Coba :
=DATEVALUE(A4)

Kid.

2012/7/13 Agung Haryanto <agunglombo@yahoo.com>

> **
>
>
> Dear all,
> tolong bantuannya utk merubah format tanggal berikut mjd dd/mm/yyyy
>
> thanks.
>
>
>
>

Sat Jul 14, 2012 3:32 pm (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Ketik =VALUE(A4), kemudian copy ke bawah, format dengan Format"Indonesian" "dd/mm/yyyy"

Salam,
Hendrik Karnadi

________________________________
From: Agung Haryanto <agunglombo@yahoo.com>
To: "XL-mania@yahoogroups.com" <XL-mania@yahoogroups.com>
Sent: Friday, 13 July 2012, 16:13
Subject: ]] XL-mania [[ merubah format tgl


 
Dear all,
tolong bantuannya utk merubah format tanggal berikut mjd dd/mm/yyyy

thanks.

Sat Jul 14, 2012 6:50 am (PDT) . Posted by:

"aries Tio" ar13s_tio

Dear Para Pakar Excel Macro. Saya di tugaskan
memantau pengambilan BBM untuk Unit-unit. saya membuat sebuah format
tapi formatnya belum sempurna sesuai yang saya inginkan .  Kemampuan saya tidak begitu tinggi dalam mebuat sebuah format . boleh kah saya memohon ke ikhlasan dan kemurahan hati dari saudara
untuk memberi tahu atau meneruskan fail saya. Pliiiisssssss
Ne Filenya saya lampirkan juga...
saya terinspirasi mengirim ini setelah saya Menemukan Blog XL-Mania

Sebelumnya Terimakasih Banyak yah Kepada para master/pakar...

Sat Jul 14, 2012 6:50 am (PDT) . Posted by:

"Hendra Kurniawan" hendr4k

Dear Mas Abduel

Coba bantu ya,
Saya hanya memanfaatkan tools excel "filter" dan rumus "if" karena lebih mudah menurut saya dibandingkan dengan full rumus..

Step Pengerjaan
1. ubah format data NIK menjadi numbering (jangan dalam format text)
2. aktifkan tools filter.
3. filter by NIK "acending", kemudian filter by NAMA "acending"
4. masukkan rumus "IF" untuk mengetahui apakah data terkecil

Lengkapnya bisa dilihat di lampiran..

kalau ingin cara full rumus atau pakai macro, mungkin member yang lebih master bisa menjawabnya.. :)

BR

Hendra
 

    

________________________________
Dari: Abdu Rachman <adoel.0519@yahoo.com>
Kepada: "XL-mania@yahoogroups.com" <XL-mania@yahoogroups.com>
Dikirim: Selasa, 10 Juli 2012 22:31
Judul: ]] XL-mania [[ menandai nilai terkecil


 
mohon bantuan dari para master...

bagaimana cara menandai salah satu data yang sama untuk kolom NIK dan NAMA namun yang di beri tanda hanya NIK yang terkecil dari data yang dobel tersebut.
jadi maksudnya hanya salah satu saja yang di beri tanda (misalnya dengan pewarnaan)

terima kasih.

Sat Jul 14, 2012 6:52 am (PDT) . Posted by:

"Faridatur Rohimah"

Dear Master XL,

Saya sedang mengembangkan tabel untuk pemantauan dokumen perijinan yang sudah kadaluarsa.
Problemnya adalah saya ingin membuat kotak isian di sheet1 untuk input data tapi
hasilnya menjadi berupa list di sheet2. Kotak isian di sheet1 otomatis kosong untuk
isian berikutnya.
Untuk itu saya pakai contekan makro dari XL-mania tapi setelah  saya praktekkan ternyata hanya
berlaku untuk satu sel saja (sel-sel lainnya blank meskipun alamat sel sudah diganti satu per satu):

Private Sub Worksheet_Change(ByVal aa12 As range)
   Dim R As Long
   R = 4
   If aa12.Cells.Count = 1 Then
      If aa12.Address = Cells(12, 27).Address Then
         If Len(aa12) > 0 Then
            Do While Len(Sheets("Sheet1").Cells(R, 9).Value) > 0
               R = R + 1
            Loop
         Else
            Exit Sub
         End If
         Sheets("Sheet1").Cells(R, 9) = aa12
      End If
   End If
End Sub

Mohon  bantuan para master untuk membuatkan makro yang lebih tepat (kalo bisa juga dengan

karena saya masih awam tentang makro) atau lebih baik lagi tanpa makro. File terlampir.

Atas bantuannya saya ucapkan terima kasih.

Rgds,
FARIDATUR ROHIMAH

Sat Jul 14, 2012 6:52 am (PDT) . Posted by:

"Rara Wilis" rr_wilis

Makro berikut ini cara kerjanya sbb:

1. Mengcopy *SHEET(s) yg di-Select*, di PASTE ke Workbook Baru (berisi 1
sheet)
2. Penyalinan datanya hanya dibatasi pada area yg ada datanya (bukan
seluruh cells dlm sheet)
3. Methode penyalinan-data-nya = hanya di copy Values, Number Formattingnya
dan Columns-Width nya
4. Sheet baru diberi nama sama dengan sheet yg dicopy
5. Workbook baru diberi nama dengan data yg ada di *cell S2 pada sheet yg
dicopy.*
6. Workbook baru langsung disave & ditutup, untuk melanjutkan kerja copy
paste sheet lain (jika ada)
7 Sheet yg diCopy & Paste menjadi Workbook : adalah sejumlah sheet yg anda
SELECT
(anda dapat men-Select 1 maupun banyak sheet sekaligus secara Multi
Selection, maupun SEMUA Sheets;
tidak harus urut tetapi boleh "loncat-loncat"

[image: Inline image 1]

Sebaiknya file ini <https://www.box.com/s/5874a03318055cc097a9> disave di
suatu FOLDER KHUSUS (apapun namanya)
karena workbook hasil-kerjanya akan di tampung di folder khusus tsb.

Btw..
Di dalam text makro yg diajukan, saya tidak tahu babar-blas : 'jalan
ceritaknya'
Mengapa mau mengcopy Sheet COVER saja kok harus menselect SEMUA sheet yg
ada lebih dulu
(baru kemudian dilepaskan lagi)

Boleh-kah kami diberi penjelasan (mudah-mudahan ada tanggapan dari pak
Jhony atau pun dari
pemilik makro yg dikutip oleh pak Jhonny)
tidak mau menyebutkan link-nya sih..!)

~Rara

*2012/7/10 Jhony Xl <jhony.excel@yahoo.co.id>
>
> saya mau tanya saya pernah dapat macro seperti ini dari milist ini :
>
> Sub PALUE()
> Sheets(Array("COVER", "AP DETAIL CUR", "GL 08", "REPORT AP", "AP DETAIL",
> "Kurs", "GBP", "IDR", "USD", "SGD", "MYR", "EUR")).Select
> Sheets("COVER").Activate
> Cells.Select
> Selection.Copy
> Selection.PasteSpecial Paste:=xlPasteValues
> Sheets("COVER").Select
> ActiveWorkbook.SaveAs Filename:=Range("S2")
> End Sub
>
> ini berfungsi untuk paste file dgn beberapa sheet saja seperti "GL 08",
> "REPORT AP" dll,
> yang saya tanyakan bagaimana untuk copy paste file semua sheet ?
>
> Terima kasih sebelumnya
>
> Sincerely yours,
> Jhony Syarif*

Sat Jul 14, 2012 6:53 am (PDT) . Posted by:

"aris sujat" caksujat

Tolong pencerahannya rekan2 xl mania karena saya pemula excel, pengin membuat rekap berapa kali seorang pegawai datang terlambat atau pulang mendahului dengan ketentuan jam kerja senin s/d kamis 07.30 s/d 16.00
kalo hari jum'at pukul 07.30 s/d 15.30
terima kasih sebelumnya

Sat Jul 14, 2012 6:53 am (PDT) . Posted by:

"hendrik karnadi" hendrikkarnadi

Sheet1 dihapus saja.

----- Forwarded Message -----
From: hendrik karnadi <hendrikkarnadi@yahoo.com>
To: "XL-mania@yahoogroups.com" <XL-mania@yahoogroups.com>
Sent: Wednesday, 11 July 2012, 11:33
Subject: Re: ]] XL-mania [[ Output Produksi


Dengan kolom bantu menggunakan fungsi Countif (untuk menentukan tanggal yang angkanya <>0) maka dapat digunakan formula Index berikut ini:
=INDEX($A$2:$F$16,MATCH(J5,$A$3:$A$16,0)+1,MATCH(I5,$B$2:$F$2,0)+1)

kemudian ditularkan ke bawah.

File terlampir.

Salam,
Hendrik Karnadi

Catatan : "+1" adalah baris atau kolom judul

________________________________
From: Dwi Suprayogi <dwisupra4091@yahoo.com>
To: excel mania <xl-mania@yahoogroups.com>
Sent: Tuesday, 10 July 2012, 15:09
Subject: ]] XL-mania [[ Output Produksi


 
Dear Pakar Excel,

Mohon bantuannya untuk advice ketika data harus dirubah dari urutan item material menjadi urutan per tanggal transaksi (seperti terlampir).

Terima kasih sebelumnya.

Salam,
Dwi

Sat Jul 14, 2012 6:53 am (PDT) . Posted by:

"Rara Wilis" rr_wilis

Sub MengubahStrukturTabel()
'~Rara - XL-mania #20790 - 11 Juli 2012
'--------------------------------------
For c = 1 To dTbl.Columns.Count
For r = 2 To dTbl.Columns.Count
If dTbl(r, c + 1).Value <> 0 Then
i = i + 1
End If
Next r
Next c
End Sub

lengkapnya lihat gambar di bawah ini
[image: Inline image 1]

~Rr

*2012/7/10 Dwi Suprayogi <dwisupra4091@yahoo.com>
> Mohon bantuannya untuk advice ketika data harus dirubah dari urutan item
material menjadi urutan per tanggal transaksi (seperti terlampir).
> Terima kasih sebelumnya.
> Salam,
> Dwi*
GROUP FOOTER MESSAGE
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| linkedin.com/groups/XLmania-4083986?home=&gid=4083986&trk=anet_ug_hm
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di :                                            |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+

Tidak ada komentar:

Posting Komentar