[belajar-excel] Digest Number 1480

Milis Belajar Microsoft Excel

Messages In This Digest (25 Messages)

1a.

Re: REKAP NILAI SISWA MULTI SHEET From: Kid Mr.

1b.

Bls: [belajar-excel] REKAP NILAI SISWA MULTI SHEET From: Wxwx Tit

2a.

Re: booking calendar From: Muhammad Sholeh

2b.

Re: booking calendar From: Kid Mr.

3a.

Bls: [belajar-excel] booking calendar From: widodo aji

3b.

Bls: [belajar-excel] booking calendar From: widodo aji

3c.

Re: Bls: [belajar-excel] booking calendar From: Arie Bowo Witjaksono

3d.

Re: Bls: [belajar-excel] booking calendar From: Kid Mr.

4a.

Re: Memasukkan data ke dalam sheet lain dengan dua kriteria From: Isti Astro

5a.

Re: search dengan criteria tertentu From: Adi Irawan

5b.

Re: search dengan criteria tertentu From: dimas ricky

5c.

Re: search dengan criteria tertentu From: Kid Mr.

5d.

Re: search dengan criteria tertentu From: dimas ricky

5e.

Re: search dengan criteria tertentu From: Kid Mr.

6a.

Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: guru muda

6b.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: Kid Mr.

6c.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: guru muda

6d.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: Kid Mr.

6e.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: guru muda

6f.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: Kid Mr.

6g.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: guru muda

6h.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: Kid Mr.

6i.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang From: guru muda

7a.

Bls: [belajar-excel] Bagaimana menggabung nama dengan gelar depan da From: ghozi alkatiri

7b.

Re: Bls: [belajar-excel] Bagaimana menggabung nama dengan gelar depa From: guru muda

View All Topics | Create New Topic

Messages

1a.

Re: REKAP NILAI SISWA MULTI SHEET

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

Tue Jan 17, 2012 7:10 am (PST)

Karena ada pesan :
'KARNA DATANYA ADA 30 SHEETS'
di dalam file kasus, maka dicoba dengan udf SumIF3D

'----------------------------------------------------------'
'Fungsi : SumIF3D
'Author : Kid (2012-01-17)
'Input :
' s3dCriteria | range data lokasi kriteria | type :
string | exp : "Sheet2:Sheet34!C1:C234"
' sCriteriaValue | teks kriteria | type :
string | exp : A3 atau ">2" atau "<>Aku"
' s3dData | range data yang di-Sum | type :
string | exp : "Sheet2:Sheet34!D1:D234"
'Output : SumIF3D | nilai hasil sum dengan 1 kriteria | type :
double
'Sifat : fungsi volatil
'Ket. : Gunakan dengan bijak karena sifatnya yang volatil
'----------------------------------------------------------'
Public Function SumIF3D(ByVal s3dCriteria As String, _
Optional ByVal sCriteriaValue As String =
vbNullString, _
Optional ByVal s3dData As String = vbNullString) As
Double
Dim sCrit() As String, sData() As String
Dim sShtCrit() As String, sShtData() As String
Dim lIdxCritStart As Long, lIdxDataStart As Long
Dim lShtCount As Long, lSht As Long
Dim dblRes As Double

Application.Volatile

sCrit = Split(s3dCriteria, "!")
sShtCrit = Split(sCrit(0), ":")
lIdxCritStart = Sheets(sShtCrit(0)).Index
lSht = Sheets(sShtCrit(1)).Index
lShtCount = Abs(lIdxCritStart - lSht)
If lIdxCritStart > lSht Then
lIdxCritStart = lSht
End If

If LenB(s3dData) <> 0 Then
sData = Split(s3dData, "!")
sShtData = Split(sData(0), ":")
lIdxDataStart = Sheets(sShtData(0)).Index
lSht = Sheets(sShtData(1)).Index
If lIdxDataStart > lSht Then
lIdxDataStart = lSht
End If
End If

For lSht = 0 To lShtCount
If LenB(s3dData) <> 0 Then
dblRes = dblRes + WorksheetFunction.SumIf(Sheets(lIdxCritStart
+ lSht).Range(sCrit(1)), _
sCriteriaValue, _
Sheets(lIdxDataStart +
lSht).Range(sData(1)))
Else
dblRes = dblRes + WorksheetFunction.SumIf(Sheets(lIdxCritStart
+ lSht).Range(sCrit(1)), _
sCriteriaValue)
End If
Next lSht

SumIF3D = dblRes
End Function

Syntax :
=SumIF3D( *teks_alamat_3d_sheet_dan_range_kriteria *, *ekspresi_kriteria* ,
*teks_alamat_3d_sheet_dan_range_data_yang_di_Sum* )

Contoh pemakaian pada worksheet :
=SumIF3D(*"Sheet2:Sheet7!b2:b7"*,*B2*,*"Sheet2:Sheet7!c2:c7"*)

Pengembangan untuk CountIF, AverageIF, dsb bisa dengan mengubah bagian
worksheetfunction yang digunakan.

Wassalamualaikum Wr. Wb.
Kid.

2012/1/17 Wxwx Tit <wxwxtit@yahoo.co.id>

> **
>
>
> Terima kasih atas pencerahannya Mr Kid
> namun masalah timbul lagi ketika data setiap sheet urutan nama siswanya
> berbeda-beda
> gimana yah caranya,
>
> ------------------------------
> *Dari:* Kid Mr. <mr.nmkid@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Selasa, 17 Januari 2012 4:25
> *Judul:* Re: [belajar-excel] REKAP NILAI SISWA MULTI SHEET
>
>
> Selamat Pagi Pak Alex,
>
> Coba agregat dengan 3d reference
> di sheet hasil rekap,
> untuk data pertama, pasang formula :
> =SUM(Sheet2:Sheet7!C2)
> copy ke data berikutnya.
>
> Syarat :
> 1. Data harus berurutan dan pada cell yang tetap disetiap sheetnya.
> 2. Hati-hati dalam memfilter sheet rekap, pastikan seluruh kolom telah
> terselect
> 3. Jangan ubah urutan disheet-sheet data.
>
> Kid.
>
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)

1b.

Bls: [belajar-excel] REKAP NILAI SISWA MULTI SHEET

Posted by: "Wxwx Tit" wxwxtit@yahoo.co.id   wxwxtit

Tue Jan 17, 2012 7:44 am (PST)

met malam Mr Kid
Big Jempooooool
terima kasih atas waktu, solusi, dan pencerahannya

udf SumIF3Dnya berjalan 100 %

saya sampai bengong,   hebat banget Mr Kid

________________________________
Dari: Kid Mr. <mr.nmkid@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Selasa, 17 Januari 2012 22:10
Judul: Re: [belajar-excel] REKAP NILAI SISWA MULTI SHEET


 
Karena ada pesan :
'KARNA DATANYA ADA 30 SHEETS'
di dalam file kasus, maka dicoba dengan udf SumIF3D

'----------------------------------------------------------'
'Fungsi :   SumIF3D
'Author :   Kid (2012-01-17)
'Input  :
'           s3dCriteria     | range data lokasi kriteria        | type : string | exp : "Sheet2:Sheet34!C1:C234"
'           sCriteriaValue  | teks kriteria                     | type : string | exp : A3 atau ">2" atau "<>Aku"
'           s3dData         | range data yang di-Sum            | type : string | exp : "Sheet2:Sheet34!D1:D234"
'Output :   SumIF3D         | nilai hasil sum dengan 1 kriteria | type : double
'Sifat  :   fungsi volatil
'Ket.   :   Gunakan dengan bijak karena sifatnya yang volatil
'----------------------------------------------------------'
Public Function SumIF3D(ByVal s3dCriteria As String, _
                        Optional ByVal sCriteriaValue As String = vbNullString, _
                        Optional ByVal s3dData As String = vbNullString) As Double
    Dim sCrit() As String, sData() As String
    Dim sShtCrit() As String, sShtData() As String
    Dim lIdxCritStart As Long, lIdxDataStart As Long
    Dim lShtCount As Long, lSht As Long
    Dim dblRes As Double
   
    Application.Volatile
   
    sCrit = Split(s3dCriteria, "!")
    sShtCrit = Split(sCrit(0), ":")
    lIdxCritStart = Sheets(sShtCrit(0)).Index
    lSht = Sheets(sShtCrit(1)).Index
    lShtCount = Abs(lIdxCritStart - lSht)
    If lIdxCritStart > lSht Then
        lIdxCritStart = lSht
    End If
   
    If LenB(s3dData) <> 0 Then
        sData = Split(s3dData, "!")
        sShtData = Split(sData(0), ":")
        lIdxDataStart = Sheets(sShtData(0)).Index
        lSht = Sheets(sShtData(1)).Index
        If lIdxDataStart > lSht Then
            lIdxDataStart = lSht
        End If
    End If
   
    For lSht = 0 To lShtCount
        If LenB(s3dData) <> 0 Then
            dblRes = dblRes + WorksheetFunction.SumIf(Sheets(lIdxCritStart + lSht).Range(sCrit(1)), _
                                            sCriteriaValue, _
                                            Sheets(lIdxDataStart + lSht).Range(sData(1)))
        Else
            dblRes = dblRes + WorksheetFunction.SumIf(Sheets(lIdxCritStart + lSht).Range(sCrit(1)), _
                                            sCriteriaValue)
        End If
    Next lSht
   
    SumIF3D = dblRes
End Function

Syntax :
=SumIF3D( teks_alamat_3d_sheet_dan_range_kriteria , ekspresi_kriteria , teks_alamat_3d_sheet_dan_range_data_yang_di_Sum )

Contoh pemakaian pada worksheet :
=SumIF3D("Sheet2:Sheet7!b2:b7",B2,"Sheet2:Sheet7!c2:c7")

Pengembangan untuk CountIF, AverageIF, dsb bisa dengan mengubah bagian worksheetfunction yang digunakan.

Wassalamualaikum Wr. Wb.
Kid.

2012/1/17 Wxwx Tit <wxwxtit@yahoo.co.id>

> 
>Terima kasih atas pencerahannya Mr Kid
>namun masalah timbul lagi ketika data setiap sheet urutan nama siswanya berbeda-beda
>gimana yah caranya,
>
>
>
>
>________________________________
> Dari: Kid Mr. <mr.nmkid@gmail.com>
>Kepada: belajar-excel@yahoogroups.com
>Dikirim: Selasa, 17 Januari 2012 4:25
>Judul: Re: [belajar-excel] REKAP NILAI SISWA MULTI SHEET
>
>
>
> 
>Selamat Pagi Pak Alex,
>
>Coba agregat dengan 3d reference
>di sheet hasil rekap,
>untuk data pertama, pasang formula :
>=SUM(Sheet2:Sheet7!C2)
>copy ke data berikutnya.
>
>Syarat :
>1. Data harus berurutan dan pada cell yang tetap disetiap sheetnya.
>2. Hati-hati dalam memfilter sheet rekap, pastikan seluruh kolom telah terselect
>3. Jangan ubah urutan disheet-sheet data.
>
>Kid.
>
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (6)

2a.

Re: booking calendar

Posted by: "Muhammad Sholeh" sholeh.mdr@gmail.com

Tue Jan 17, 2012 5:18 pm (PST)

Om Seno,kalau di Excel 2007 adanya dimana?

Pada 17 Januari 2012 19:13, o' Seno <ontoseno84@gmail.com> menulis:

> katanya... : bisa pakai Conditional Formatting
>
> Perkenalkan fiture: Conditional Formatting (memformat berdasarkan syarat)
> di Excel 2003 ada di menu Format > Conditonal Formatting
>
> Formula kondisinya : =(F$2>=$B3)*(F$2<=$C3)
> ( tgl kalender berada di rentang tgl booking )
>
> [image: condit format booking.PNG]
>
> tinggal memperindah
> atau mempernorak tampilan lainnya seperti contoh di lampiran
> antara lain BULAN bisa diganti ganti dengan SpinButton
>
>
> *o'Seno*
> http://www.box.com/s/1c5lpx7mcb8y0t2meaxh
>
>
>
> *2012/1/17 widodo aji <bosseaz@yahoo.com>**
> > Dear Pakar Excel,
> > Bisa tolong bantu saya untuk membuat booking calendar berdasar data
> tanggal check in/out yang telah diinput menjadi blocking cell dengan warna
> tertentu di kolom sebelah kanan. Prefer tidak pakai VBA ;).....
> > Regards
> > Wied.*
>

--

 Go green... Please don't print this e-mail unless you really need to

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (7)

2b.

Re: booking calendar

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

Tue Jan 17, 2012 5:21 pm (PST)

Mungkin omb seno belum sempet ol pagi ini,

Coba di :
menu Home -> grup Styles -> Conditional Formatting -> New Rules -> pilih
Use formula to bla-bla -> isi formula di textbox -> atur formatnya -> OK
sampai keluar

Kid.

2012/1/18 Muhammad Sholeh <sholeh.mdr@gmail.com>

> **
>
>
> Om Seno,kalau di Excel 2007 adanya dimana?
>
>
>
> Pada 17 Januari 2012 19:13, o' Seno <ontoseno84@gmail.com> menulis:
>
> katanya... : bisa pakai Conditional Formatting
>>
>> Perkenalkan fiture: Conditional Formatting (memformat berdasarkan syarat)
>> di Excel 2003 ada di menu Format > Conditonal Formatting
>>
>> Formula kondisinya : =(F$2>=$B3)*(F$2<=$C3)
>> ( tgl kalender berada di rentang tgl booking )
>>
>> [image: condit format booking.PNG]
>>
>> tinggal memperindah
>> atau mempernorak tampilan lainnya seperti contoh di lampiran
>> antara lain BULAN bisa diganti ganti dengan SpinButton
>>
>>
>> *o'Seno*
>> http://www.box.com/s/1c5lpx7mcb8y0t2meaxh
>>
>>
>>
>> *2012/1/17 widodo aji <bosseaz@yahoo.com>**
>> > Dear Pakar Excel,
>> > Bisa tolong bantu saya untuk membuat booking calendar berdasar data
>> tanggal check in/out yang telah diinput menjadi blocking cell dengan warna
>> tertentu di kolom sebelah kanan. Prefer tidak pakai VBA ;).....
>> > Regards
>> > Wied.*
>>
>
>
>
> --
>
>  Go green... Please don't print this e-mail unless you really need to
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (7)

3a.

Bls: [belajar-excel] booking calendar

Posted by: "widodo aji" bosseaz@yahoo.com   bosseaz

Tue Jan 17, 2012 6:01 pm (PST)

Masalahnya di kolom A, B dan C dipastikan pengulangan (penambahan baris) villa yang sama untuk tanggal check in/out yang lain.Jadi pastinya villa A-J tidak hanya ada di cell a2 sampai a11 saja om....

________________________________
Dari: o' Seno <ontoseno84@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Selasa, 17 Januari 2012 21:03
Judul: Re: [belajar-excel] booking calendar


 
terlampir koreksi conditional formatting untuk kolom B, C dan E
(yg sebenarnya tidak diminta oleh pak widodoaji)

urutan nama villa di data input (kolom A) maupun di kolom E untuk saat ini
harus dibuat SAMA agar mudah membuat solusinya; dan yg penting : 
paham dulu "hal yg ditanyakan"

hal hal lain dapat dipelajari berikutnya secara bertahap..

o'Seno

2012/1/17 o' Seno <ontoseno84@gmail.com>

katanya... : bisa pakai Conditional Formatting
>
>
>Perkenalkan fiture: Conditional Formatting (memformat berdasarkan syarat)
>
>di Excel 2003 ada di menu Format > Conditonal Formatting
>
>
>Formula kondisinya :  =(F$2>=$B3)*(F$2<=$C3)
>( tgl kalender berada di rentang tgl booking )
>
>
>tinggal memperindah 
>atau mempernorak tampilan lainnya seperti contoh di lampiran
>antara lain BULAN bisa diganti ganti dengan SpinButton
>
>o'Seno
>http://www.box.com/s/1c5lpx7mcb8y0t2meaxh
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (7)

3b.

Bls: [belajar-excel] booking calendar

Posted by: "widodo aji" bosseaz@yahoo.com   bosseaz

Tue Jan 17, 2012 6:09 pm (PST)

Seperti pada file yang saya attach,. Misalnya saja Villa A dalam satu bulan ada 2x check in/out.
Di booking calendarnyapun tertampil pada baris villa A juga.
Terima kasih

________________________________
Dari: widodo aji <bosseaz@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Rabu, 18 Januari 2012 9:59
Judul: Bls: [belajar-excel] booking calendar


 
Masalahnya di kolom A, B dan C dipastikan pengulangan (penambahan baris) villa yang sama untuk tanggal check in/out yang lain.Jadi pastinya villa A-J tidak hanya ada di cell a2 sampai a11 saja om....

________________________________
Dari: o' Seno <ontoseno84@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Selasa, 17 Januari 2012 21:03
Judul: Re: [belajar-excel] booking calendar


 
terlampir koreksi conditional formatting untuk kolom B, C dan E
(yg sebenarnya tidak diminta oleh pak widodoaji)

urutan nama villa di data input (kolom A) maupun di kolom E untuk saat ini
harus dibuat SAMA agar mudah membuat solusinya; dan yg penting : 
paham dulu "hal yg ditanyakan"

hal hal lain dapat dipelajari berikutnya secara bertahap..

o'Seno

2012/1/17 o' Seno <ontoseno84@gmail.com>

katanya... : bisa pakai Conditional Formatting
>
>
>Perkenalkan fiture: Conditional Formatting (memformat berdasarkan syarat)
>
>di Excel 2003 ada di menu Format > Conditonal Formatting
>
>
>Formula kondisinya :  =(F$2>=$B3)*(F$2<=$C3)
>( tgl kalender berada di rentang tgl booking )
>
>
>tinggal memperindah 
>atau mempernorak tampilan lainnya seperti contoh di lampiran
>antara lain BULAN bisa diganti ganti dengan SpinButton
>
>o'Seno
>http://www.box.com/s/1c5lpx7mcb8y0t2meaxh
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (7)

3c.

Re: Bls: [belajar-excel] booking calendar

Posted by: "Arie Bowo Witjaksono" arie_b_w@yahoo.com   arie_b_w

Tue Jan 17, 2012 8:13 pm (PST)

Dh P. widodo,
 

   Update dari worksheet P. seno, berikut modifikasi untuk conditional formatting-nya, tetapi di kolom "D" saya tambahkan angka 1 guna generate conditional formatting yang telah saya edit, yaitu menggunakan formula sumifs
 
=SUMIFS($D$3:$D$12;$A$3:$A$12;$E3;$B$3:$B$12;"<="&F$2;$C$3:$C$12;">="&F$2)=1
penjelesannya, mencocok-kan tanggal check in, check out dan nama villa. mohon masukannya saya anggota baru. terima kasih.
 
Arie
--- On Tue, 1/17/12, widodo aji <bosseaz@yahoo.com> wrote:

From: widodo aji <bosseaz@yahoo.com>
Subject: Bls: [belajar-excel] booking calendar
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Date: Tuesday, January 17, 2012, 8:07 PM

 

Seperti pada file yang saya attach,. Misalnya saja Villa A dalam satu bulan ada 2x check in/out.
Di booking calendarnyapun tertampil pada baris villa A juga.
Terima kasih

Dari: widodo aji <bosseaz@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Rabu, 18 Januari 2012 9:59
Judul: Bls: [belajar-excel] booking calendar

 

Masalahnya di kolom A, B dan C dipastikan pengulangan (penambahan baris) villa yang sama untuk tanggal check in/out yang lain.Jadi pastinya villa A-J tidak hanya ada di cell a2 sampai a11 saja om....

Dari: o' Seno <ontoseno84@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Selasa, 17 Januari 2012 21:03
Judul: Re: [belajar-excel] booking calendar

 

terlampir koreksi conditional formatting untuk kolom B, C dan E
(yg sebenarnya tidak diminta oleh pak widodoaji)

urutan nama villa di data input (kolom A) maupun di kolom E untuk saat ini
harus dibuat SAMA agar mudah membuat solusinya; dan yg penting : 
paham dulu "hal yg ditanyakan"

hal hal lain dapat dipelajari berikutnya secara bertahap..

o'Seno

2012/1/17 o' Seno <ontoseno84@gmail.com>

katanya... : bisa pakai Conditional Formatting

Perkenalkan fiture: Conditional Formatting (memformat berdasarkan syarat)

di Excel 2003 ada di menu Format > Conditonal Formatting

Formula kondisinya :  =(F$2>=$B3)*(F$2<=$C3)
( tgl kalender berada di rentang tgl booking )

tinggal memperindah 
atau mempernorak tampilan lainnya seperti contoh di lampiran
antara lain BULAN bisa diganti ganti dengan SpinButton

o'Seno
http://www.box.com/s/1c5lpx7mcb8y0t2meaxh

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (7)

3d.

Re: Bls: [belajar-excel] booking calendar

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

Tue Jan 17, 2012 8:33 pm (PST)

Tampaknya, data numerik yang pokok adalah B dan C, sedangkan A adalah
kriteria.
Hasil formula yang dituntut =1 artinya siformula sendiri tampaknya hanya
menghasilkan 1 atau 0.
Kolom D (yang di-sum) sepertinya hanya berisi nilai 1 atau 0, atau sekedar
sebuah kolom bantu.
Formula Pak Arie bisa sedikit diubah
dari :
=SUMIFS($D$3:$D$12;$A$3:$A$12;$E3;$B$3:$B$12;"<="&F$2;$C$3:$C$12;">="&F$2)=1

menjadi :
=SUMIFS(*$b$3:$b$12*;$A$3:$A$12;$E3;$B$3:$B$12;"<="&F$2;$C$3:$C$12;">="&F$2)
*>0*

Jika mulai terasa berat kerja kalkulasi excel akibat conditional
formatting, maka pindahkan formula di conditional formatting ke cell.
Kemudian, format cell number custom dengan ;;;
Conditional formatting juga diubah, dari Formula Is (di excel 2003) atau
use Formula (excel 2007), bisa diganti dengan
cell values atau based on cell values equal 1

Mungkin Pak Arie masih sempat untuk sedikit mengubah dan memposting ke
milis.
Maaf untuk saat ini ndak bisa buka Excel.

Wassalamualaikum Wr. Wb.
Kid.
2012/1/18 Arie Bowo Witjaksono <arie_b_w@yahoo.com>

> **
>
>
> Dh P. widodo,
>
>
> Update dari worksheet P. seno, berikut modifikasi untuk conditional
> formatting-nya, tetapi di kolom "D" saya tambahkan angka 1 guna generate
> conditional formatting yang telah saya edit, yaitu menggunakan formula
> sumifs
>
>
> =SUMIFS($D$3:$D$12;$A$3:$A$12;$E3;$B$3:$B$12;"<="&F$2;$C$3:$C$12;">="&F$2)=1
> penjelesannya, mencocok-kan tanggal check in, check out dan nama villa.
> mohon masukannya saya anggota baru. terima kasih.
>
> Arie
> --- On *Tue, 1/17/12, widodo aji <bosseaz@yahoo.com>* wrote:
>
>
> From: widodo aji <bosseaz@yahoo.com>
> Subject: Bls: [belajar-excel] booking calendar
> To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
> Date: Tuesday, January 17, 2012, 8:07 PM
>
>
>
> Seperti pada file yang saya attach,. Misalnya saja Villa A dalam satu
> bulan ada 2x check in/out.
> Di booking calendarnyapun tertampil pada baris villa A juga.
> Terima kasih
>
> ------------------------------
> *Dari:* widodo aji <bosseaz@yahoo.com>
> *Kepada:* "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
> *Dikirim:* Rabu, 18 Januari 2012 9:59
> *Judul:* Bls: [belajar-excel] booking calendar
>
>
> Masalahnya di kolom A, B dan C dipastikan pengulangan (penambahan baris)
> villa yang sama untuk tanggal check in/out yang lain.Jadi pastinya villa
> A-J tidak hanya ada di cell a2 sampai a11 saja om....
>
>
> ------------------------------
> *Dari:* o' Seno <ontoseno84@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Selasa, 17 Januari 2012 21:03
> *Judul:* Re: [belajar-excel] booking calendar
>
>
> terlampir koreksi conditional formatting untuk *kolom B, C dan E*
> (yg sebenarnya tidak diminta oleh pak widodoaji)
>
> urutan nama villa di data input (kolom A) maupun di kolom E untuk saat ini
> harus dibuat SAMA agar mudah membuat solusinya; dan yg penting :
> paham dulu "hal yg ditanyakan"
>
> hal hal lain dapat dipelajari berikutnya secara bertahap..
>
>
> *o'Seno*
>
>
>
>
> 2012/1/17 o' Seno <ontoseno84@gmail.com<http://us.mc1620.mail.yahoo.com/mc/compose?to=ontoseno84@gmail.com>
> >
>
> katanya... : bisa pakai Conditional Formatting
>
> Perkenalkan fiture: Conditional Formatting (memformat berdasarkan syarat)
> di Excel 2003 ada di menu Format > Conditonal Formatting
>
> Formula kondisinya : =(F$2>=$B3)*(F$2<=$C3)
> ( tgl kalender berada di rentang tgl booking )
>
> tinggal memperindah
> atau mempernorak tampilan lainnya seperti contoh di lampiran
> antara lain BULAN bisa diganti ganti dengan SpinButton
>
> *o'Seno*
> http://www.box.com/s/1c5lpx7mcb8y0t2meaxh
>
>
>
>
>
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (7)

4a.

Re: Memasukkan data ke dalam sheet lain dengan dua kriteria

Posted by: "Isti Astro" milisastro@gmail.com   isti_astro

Tue Jan 17, 2012 6:23 pm (PST)

Dear Para Master,

Apakah ada yang mau membantu lagi untuk kasus lanjutan dibawah...terima
kasih.

2012/1/17 Isti Astro <milisastro@gmail.com>

> Setelah diutak-atik lagi menjadi seperti ini:
> ===============================================================
>
> Sub Generate_CutiReport()
> ' coded by: Indri Hapsari
> ' 12 dec 2012 // jkt. / BeExcelCase #15152
> ' modified by: oSeno (ontoseno84@gmail.com)
> '------------------------------------------
> Dim dTabel As Range, dRekap As Range, Libur As Range
> Dim TglAwal As Date, TglAkir As Date, vTgl As Date
> Dim *TGLRepA As Date, TGLRepZ As Date*
> Dim iRow As Integer, iCol As Integer, RekRow As Integer
> Dim CriYYMM As String, Tipe As String, IGems As String
>
> Set dTabel = Sheet4.Cells(1).CurrentRegion
> Set dRekap = Sheet5.Cells(1).CurrentRegion.Offset(1, 11) 'Karena
> ternyata tgl 1 ada di kolom ke 12
> Set Libur = Application.Range("LiburNas")
> TGLRepA = Sheet5.Cells(2).Value
> TGLRepZ = DateSerial(Year(TGLRepA), Month(TGLRepA) + 1, 0)
> CriYYMM = Format(TGLRepA, "yyMM")
> dRekap.Parent.Activate
>
> For iRow = 2 To dTabel.Rows.Count
> IGems = dTabel(iRow, 1)
> Set RngFind = Sheet4.Range("B3:B250").Find(IGems,
> LookIn:=xlValues)
> If Nothing Then Resume Next
> RekRow = Right(RngFind.Address, Len(RngFind.Address) - 3)
>
> If LCase(dTabel(iRow, 6)) Like "approved*" Then
> TglAwal = dTabel(iRow, 3): TglAkir = dTabel(iRow, 4)
> '-------------------------------------------------
> * If TglAwal <= TGLRepZ And TglAkir >= TGLRepA Then*
> * If TglAwal < TGLRepA Then TglAwal = TGLRepA*
> * If TglAkir > TGLRepZ Then TglAkir = TGLRepZ*
> '--------------------------------------------------
> Tipe = LeaveCode(dTabel(iRow, 5).Value)
>
> ' TipeCuti ditulis JIKA :BulanThIni, nonMinggu & NonLibur
> For iCol = Day(TglAwal) To Day(TglAkir)
> vTgl = dRekap(1, iCol).Value
> If Format(vTgl, "yyMM") = CriYYMM Then
> If Weekday(vTgl) > 1 Then
> dRekap(RekRow, iCol) = Tipe
> End If
>
> If WorksheetFunction.CountIf(Libur, vTgl) > 0 Then
> dRekap(RekRow, iCol) = vbNullString
> End If
> End If
> Next iCol
> End If
> End If
> Next iRow
> End Sub
>
> ===============================================================
>
> Nah masalah timbul kembali karena hasil akhir tidak tepat sesuai dengan
> address (rekRow) namun malah di row dibawahnya, jadi row-nya kelebihan.
> Mohon bantuannya sekali lagi bagaimana mengatasinya....karena saya search
> dengan debugging rekRow menghasilkan row number (rngFind.address) benar
> namun begitu selesai debugging hasil tidak sesuai atau dibawahnya cell yang
> dituju.
>
> Terima kasih banyak atas bantuannya.
>
> Regards,
> Isti
>
> 2012/1/16 Isti Astro <milisastro@gmail.com>
>
>> Dear Pak Seno,
>>
>> Kode modifikasi dari Bapak lebih simple dan ringkas, namun mohon maaf
>> belum sesuai yang diinginkan. Karena yang diinginkan adalah data di tabel
>> rekap sudah fix dan terdiri dari list nomor ID, nama dan tanggal, nah yang
>> diinginkan adalah me-lookup data yang terdapat di tabel data kemudian
>> dimasukkan ke tabel rekap sesuai dengan nomor ID (posisinya random) menurut
>> tanggal awal sampai akhirnya.
>>
>> Mohon bantuannya sekali lagi. Terima kasih.
>>
>> Regards,
>> Isti
>>
>>
>> 2012/1/14 o' Seno <ontoseno84@gmail.com>
>>
>>> **
>>>
>>>
>>> -- di-modipikasi sedikitt..
>>>
>>> Sub Generate_CutiReport()
>>> ' coded by: Indri Hapsari
>>> ' 12 dec 2012 // jkt. / BeExcelCase #15152
>>> ' modified by: oSeno (ontoseno84@gmail.com)
>>> '------------------------------------------
>>> Dim dTabel As Range, dRekap As Range, Libur As Range
>>> Dim TglAwal As Date, TglAkir As Date, vTgl As Date
>>> Dim *TGLRepA As Date, TGLRepZ As Date*
>>> Dim iRow As Integer, iCol As Integer
>>> Dim CriYYMM As String, Tipe As String
>>>
>>> Set dTabel = Sheet4.Cells(1).CurrentRegion
>>> Set dRekap = Sheet5.Cells(1).CurrentRegion.Offset(1, 3)
>>> Set Libur = Application.Range("LiburNas")
>>> TGLRepA = Sheet5.Cells(2).Value
>>> TGLRepZ = DateSerial(Year(TGLRepA), Month(TGLRepA) + 1, 0)
>>> CriYYMM = Format(TGLRepA, "yyMM")
>>> dRekap.Parent.Activate
>>>
>>> For iRow = 2 To dTabel.Rows.Count
>>> dRekap(iRow, -2) = iRow - 1
>>> dRekap(iRow, -1) = dTabel(iRow, 1)
>>> dRekap(iRow, 0) = dTabel(iRow, 2)
>>> If LCase(dTabel(iRow, 6)) Like "approved*" Then
>>> TglAwal = dTabel(iRow, 3): TglAkir = dTabel(iRow, 4)
>>> '-------------------------------------------------
>>> * If TglAwal <= TGLRepZ And TglAkir >= TGLRepA Then*
>>> * If TglAwal < TGLRepA Then TglAwal = TGLRepA*
>>> * If TglAkir > TGLRepZ Then TglAkir = TGLRepZ*
>>> '--------------------------------------------------
>>> Tipe = LeaveCode(dTabel(iRow, 5).Value)
>>>
>>> ' TipeCuti ditulis JIKA :BulanThIni, nonMinggu & NonLibur
>>> For iCol = Day(TglAwal) To Day(TglAkir)
>>> vTgl = dRekap(1, iCol).Value
>>> If Format(vTgl, "yyMM") = CriYYMM Then
>>> If Weekday(vTgl) > 1 Then dRekap(iRow, iCol) = Tipe
>>> If WorksheetFunction.CountIf(Libur, vTgl) > 0 Then
>>> dRekap(iRow, iCol) = vbNullString
>>> End If
>>> End If
>>> Next iCol
>>> End If
>>> End If
>>> Next iRow
>>> End Sub
>>>
>>> *o'Seno*
>>>
>>>
>>>
>>> 2012/1/13 Isti <milisastro@gmail.com>
>>>
>>>> **
>>>>
>>>> saya sudah coba utak-atik dengan mengganti coding :
>>>> -------------------------------------
>>>> IGems = dTabel(i, 2) ' ID
>>>> -------------------------------------
>>>> dan
>>>> ------------------------------------------------------
>>>> For c = Day(TglAwal) To Day(TglAkir)
>>>> vTgl = dRekap(1, c).Value
>>>> If Weekday(vTgl) > 1 Then dRekap(IGems, c) = Tipe
>>>>
>>>> If WorksheetFunction.CountIf(Libur, vTgl) > 0 _
>>>> Then dRekap(i, c) = vbNullString
>>>> Next c
>>>> ------------------------------------------------------
>>>> Namun yang terisi kok cuma tiga employee ID saja, sedangkan yang lain
>>>> kosong sedang datanya ada sekitar 500. Mohon bantuannya Bu Haps dan para
>>>> master sekalian.
>>>>
>>>> Regards,
>>>> Isti
>>>>
>>>>
>>>> --- In belajar-excel@yahoogroups.com, Isti Astro <milisastro@...>
>>>> wrote:
>>>> >
>>>> > Bu Siti ternyata setelah di aplikasikan banyak error terjadi, karena
>>>> di
>>>> > contoh makro dan file solusi Bu siti, untuk tabel drekap diisi lewat
>>>> > makro...sedang di data contoh yang saya kirim maksudnya adalah tabel
>>>> rekap
>>>> > sudah ada dan data yang ada di sember data hanya dipindahkan ke rekap
>>>> > sesuai dengan nomor ID dan tanggal pengajuan. (kalo pakai rumus
>>>> seperti
>>>> > vlookup)
>>>> > Mohon informasinya
>>>>
>>>
>>>
>>
>>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

5a.

Re: search dengan criteria tertentu

Posted by: "Adi Irawan" airawanp@gmail.com

Tue Jan 17, 2012 7:17 pm (PST)

Terima kasih banyak Bu Inri dan Pak Hendrik,

Itu semua sangat membantu
2012/1/17 hendrik karnadi <hendrikkarnadi@yahoo.com>

> **
>
>
> Tinggal tambah tanda <> di depan *567* (Define Name Criterianya dibuat
> flexible saja dengan Fungsi Offset, seperti sering dibahas)
> File terlampir.
>
> Salam,
> Hendrik Karnadi
>
> ------------------------------
> *From:* Adi Irawan <airawanp@gmail.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Tuesday, 17 January 2012, 9:45
> *Subject:* Re: [belajar-excel] search dengan criteria tertentu
>
>
> Terima kasih bnyak pak untuk infonya,
>
> O ia, seandainya saya ingin filter tapi criterianya itu " selain"
> bagaimana ya ?
>
> Jadi contohnya saya ingin filter semuanya kecuali *567*.
> Jadi saya tinggal masukan *567* maka yang akan muncul semuanya kecuali
> *567*
>
> Mohon bantuan Pak Hendrik dan Members,
>
>
> Terima kasih
>
> 2012/1/16 hendrik karnadi <hendrikkarnadi@yahoo.com>
>
> **
>
> Macronya Ok pak, yang slah kriterianya ganti tanda " " dengan * *
> Contoh terlampir.
>
> ------------------------------
> *From:* Adi Irawan <airawanp@gmail.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Monday, 16 January 2012, 16:41
> *Subject:* [belajar-excel] search dengan criteria tertentu
>
>
> dear members,
>
> Mohon bantuannya, seandainya saya ingin filter hasil cirteria tertentu
> contoh seperi:
> 1234.567.000 jadi semua yang ada "567" di tengahnya bisa ke select
> semuanya.
>
> kode macro yang sudah saya buat hasilnya kosong setelah di search. Berikut
> kode yang saya buat :
>
> 'wsDatabase adalah worksheet Database
> Set wsDatabase = Sheets("Combined")
> 'wsHasil adalah worksheet HasilFilter
> Set wsHasil = Sheets("hasil")
> 'Menghapus seluruh data dalam worksheet HasilFilter
> wsHasil.Cells.Delete
> 'Menyalin lebar kolom range A2:F7
> wsDatabase.Range("A2:e2").Copy
> wsHasil.Range("A4").PasteSpecial Paste:=xlPasteColumnWidths
> 'Menyaring data menggunakan Advanced Filter
> wsDatabase.Range("search_gross").AdvancedFilter _
> Action:=xlFilterCopy, CriteriaRange:=Range("Criteria"), _
> CopyToRange:=wsHasil.Range("A4")
> 'Menyeleksi worksheet HasilFilter
> wsHasil.Select
> 'Menyeleksi sel A1
> Range("A1").Select
>
> Mohon bantuannya ya...
>
> Terima kasih banyak
>
>
>
>
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (11)

5b.

Re: search dengan criteria tertentu

Posted by: "dimas ricky" dimasr1985@gmail.com

Tue Jan 17, 2012 8:26 pm (PST)

Sebenarnya pertanyaan saya ini pengembangan dari pertanyaan Bpk Adi
sebelumnya, mungkin judul yang tepat adalah �menulis rumus di defined name
untuk data hasil seleksi makro �

Jadi intinya, apakah saya bisa menggunakan Define name untuk database hasil
filter ? dalam hal ini saya mencoba menjalankan Fungsi pivot di database
hasil filter ?

Saya sudah mencobanya tapi tidak bisa, seandainya bisa, bagaimana kode
penulisan di define name nya ?

Sebelumnya saya tulis seperti ini :

=OFFSET(hasil!$A$4,0,0,COUNTA(hasil!$A:$A)+0,5)

Dan sesudah di jalankan Fungsinya jadi :

=OFFSET(hasil!#REF!,0,0,COUNTA(hasil!#REF!)+0,5)

Mohon bantuannya

Terima kasih

2012/1/18 Adi Irawan <airawanp@gmail.com>

> **
>
>
>
> Terima kasih banyak Bu Inri dan Pak Hendrik,
>
> Itu semua sangat membantu
> 2012/1/17 hendrik karnadi <hendrikkarnadi@yahoo.com>
>
>> **
>>
>>
>> Tinggal tambah tanda <> di depan *567* (Define Name Criterianya dibuat
>> flexible saja dengan Fungsi Offset, seperti sering dibahas)
>> File terlampir.
>>
>> Salam,
>> Hendrik Karnadi
>>
>> ------------------------------
>> *From:* Adi Irawan <airawanp@gmail.com>
>> *To:* belajar-excel@yahoogroups.com
>> *Sent:* Tuesday, 17 January 2012, 9:45
>> *Subject:* Re: [belajar-excel] search dengan criteria tertentu
>>
>>
>> Terima kasih bnyak pak untuk infonya,
>>
>> O ia, seandainya saya ingin filter tapi criterianya itu " selain"
>> bagaimana ya ?
>>
>> Jadi contohnya saya ingin filter semuanya kecuali *567*.
>> Jadi saya tinggal masukan *567* maka yang akan muncul semuanya kecuali
>> *567*
>>
>> Mohon bantuan Pak Hendrik dan Members,
>>
>>
>> Terima kasih
>>
>> 2012/1/16 hendrik karnadi <hendrikkarnadi@yahoo.com>
>>
>> **
>>
>> Macronya Ok pak, yang slah kriterianya ganti tanda " " dengan * *
>> Contoh terlampir.
>>
>> ------------------------------
>> *From:* Adi Irawan <airawanp@gmail.com>
>> *To:* belajar-excel@yahoogroups.com
>> *Sent:* Monday, 16 January 2012, 16:41
>> *Subject:* [belajar-excel] search dengan criteria tertentu
>>
>>
>> dear members,
>>
>> Mohon bantuannya, seandainya saya ingin filter hasil cirteria tertentu
>> contoh seperi:
>> 1234.567.000 jadi semua yang ada "567" di tengahnya bisa ke select
>> semuanya.
>>
>> kode macro yang sudah saya buat hasilnya kosong setelah di search. Berikut
>> kode yang saya buat :
>>
>> 'wsDatabase adalah worksheet Database
>> Set wsDatabase = Sheets("Combined")
>> 'wsHasil adalah worksheet HasilFilter
>> Set wsHasil = Sheets("hasil")
>> 'Menghapus seluruh data dalam worksheet HasilFilter
>> wsHasil.Cells.Delete
>> 'Menyalin lebar kolom range A2:F7
>> wsDatabase.Range("A2:e2").Copy
>> wsHasil.Range("A4").PasteSpecial Paste:=xlPasteColumnWidths
>> 'Menyaring data menggunakan Advanced Filter
>> wsDatabase.Range("search_gross").AdvancedFilter _
>> Action:=xlFilterCopy, CriteriaRange:=Range("Criteria"), _
>> CopyToRange:=wsHasil.Range("A4")
>> 'Menyeleksi worksheet HasilFilter
>> wsHasil.Select
>> 'Menyeleksi sel A1
>> Range("A1").Select
>>
>> Mohon bantuannya ya...
>>
>> Terima kasih banyak
>>
>>
>>
>>
>>
>>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (11)

5c.

Re: search dengan criteria tertentu

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

Tue Jan 17, 2012 8:42 pm (PST)

Sepertinya hal ini disebabkan oleh proses delete pada sheet hasil.
Jika memang sheet hasil adalah hasil proses vba,
coba cari baris yang bertugas men-delete di sheet hasil.

Ubah sedikit.
Misal tabel hasil selalu mulai A4 (headernya) (seperti tampak dari refers
to define name nya)
maka ubah bagian men-delete sheet hasil dengan :
*sheets("hasil").range("a4").currentregion.offset(1).entirerow.delete*

kalau sheets hasil disimpan dalam sebuah variabel, misal mySheet, bisa
menjadi :
*mysheet.range("a4").currentregion.offset(1).entirerow.delete*

Jika define name yang refers to nya :
=OFFSET(hasil!$A$4,0,0,COUNTA(hasil!$A:$A)+0,5)
bernama myName
*mysheet.calculate 'optional aja, siapa tahu setting calculation di
set manual*
*mysheet.range("myname").offset(1).entirerow.delete*

Kid.

2012/1/18 dimas ricky <dimasr1985@gmail.com>

> **
>
>
> Sebenarnya pertanyaan saya ini pengembangan dari pertanyaan Bpk Adi
> sebelumnya, mungkin judul yang tepat adalah �menulis rumus di defined name
> untuk data hasil seleksi makro �
>
>
>
> Jadi intinya, apakah saya bisa menggunakan Define name untuk database
> hasil filter ? dalam hal ini saya mencoba menjalankan Fungsi pivot di
> database hasil filter ?
>
>
>
> Saya sudah mencobanya tapi tidak bisa, seandainya bisa, bagaimana kode
> penulisan di define name nya ?
>
>
>
> Sebelumnya saya tulis seperti ini :
>
>
>
> =OFFSET(hasil!$A$4,0,0,COUNTA(hasil!$A:$A)+0,5)
>
>
>
> Dan sesudah di jalankan Fungsinya jadi :
>
>
>
> =OFFSET(hasil!#REF!,0,0,COUNTA(hasil!#REF!)+0,5)
>
>
>
>
>
> Mohon bantuannya
>
>
>
> Terima kasih
>
>
>
>
>
>
>
>
>
>
>
>
>
> 2012/1/18 Adi Irawan <airawanp@gmail.com>
>
>> **
>>
>>
>>
>> Terima kasih banyak Bu Inri dan Pak Hendrik,
>>
>> Itu semua sangat membantu
>> 2012/1/17 hendrik karnadi <hendrikkarnadi@yahoo.com>
>>
>>> **
>>>
>>>
>>> Tinggal tambah tanda <> di depan *567* (Define Name Criterianya dibuat
>>> flexible saja dengan Fungsi Offset, seperti sering dibahas)
>>> File terlampir.
>>>
>>> Salam,
>>> Hendrik Karnadi
>>>
>>> ------------------------------
>>> *From:* Adi Irawan <airawanp@gmail.com>
>>> *To:* belajar-excel@yahoogroups.com
>>> *Sent:* Tuesday, 17 January 2012, 9:45
>>> *Subject:* Re: [belajar-excel] search dengan criteria tertentu
>>>
>>>
>>> Terima kasih bnyak pak untuk infonya,
>>>
>>> O ia, seandainya saya ingin filter tapi criterianya itu " selain"
>>> bagaimana ya ?
>>>
>>> Jadi contohnya saya ingin filter semuanya kecuali *567*.
>>> Jadi saya tinggal masukan *567* maka yang akan muncul semuanya kecuali
>>> *567*
>>>
>>> Mohon bantuan Pak Hendrik dan Members,
>>>
>>>
>>> Terima kasih
>>>
>>> 2012/1/16 hendrik karnadi <hendrikkarnadi@yahoo.com>
>>>
>>> **
>>>
>>> Macronya Ok pak, yang slah kriterianya ganti tanda " " dengan * *
>>> Contoh terlampir.
>>>
>>> ------------------------------
>>> *From:* Adi Irawan <airawanp@gmail.com>
>>> *To:* belajar-excel@yahoogroups.com
>>> *Sent:* Monday, 16 January 2012, 16:41
>>> *Subject:* [belajar-excel] search dengan criteria tertentu
>>>
>>>
>>> dear members,
>>>
>>> Mohon bantuannya, seandainya saya ingin filter hasil cirteria tertentu
>>> contoh seperi:
>>> 1234.567.000 jadi semua yang ada "567" di tengahnya bisa ke select
>>> semuanya.
>>>
>>> kode macro yang sudah saya buat hasilnya kosong setelah di search.
>>> Berikut
>>> kode yang saya buat :
>>>
>>> 'wsDatabase adalah worksheet Database
>>> Set wsDatabase = Sheets("Combined")
>>> 'wsHasil adalah worksheet HasilFilter
>>> Set wsHasil = Sheets("hasil")
>>> 'Menghapus seluruh data dalam worksheet HasilFilter
>>> wsHasil.Cells.Delete
>>> 'Menyalin lebar kolom range A2:F7
>>> wsDatabase.Range("A2:e2").Copy
>>> wsHasil.Range("A4").PasteSpecial Paste:=xlPasteColumnWidths
>>> 'Menyaring data menggunakan Advanced Filter
>>> wsDatabase.Range("search_gross").AdvancedFilter _
>>> Action:=xlFilterCopy, CriteriaRange:=Range("Criteria"), _
>>> CopyToRange:=wsHasil.Range("A4")
>>> 'Menyeleksi worksheet HasilFilter
>>> wsHasil.Select
>>> 'Menyeleksi sel A1
>>> Range("A1").Select
>>>
>>> Mohon bantuannya ya...
>>>
>>> Terima kasih banyak
>>>
>>>
>>>
>>>
>>>
>>>
>>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (11)

5d.

Re: search dengan criteria tertentu

Posted by: "dimas ricky" dimasr1985@gmail.com

Tue Jan 17, 2012 11:11 pm (PST)

2012/1/18 Kid Mr. <mr.nmkid@gmail.com>

> **
> Pak Kid, terima kasih banyak untuk bantuannnya, tapi saya masih bingung
> pak,
> Mohon bantuannya Pak Kid,
>
>
sebelumnya kode makro untuk sFilter saya pake seperti ini :

'wsDatabase adalah worksheet Database
Set wsDatabase = Sheets("Combined")
'wsHasil adalah worksheet HasilFilter
Set wsHasil = Sheets("hasil")
'Menghapus seluruh data dalam worksheet HasilFilter
'Menghapus seluruh data dalam worksheet HasilFilter
wsHasil.Cells.Delete

'Menyalin lebar kolom range A2:F7
wsDatabase.Range("A2:e2").Copy
wsHasil.Range("A4").PasteSpecial Paste:=xlPasteColumnWidths
'Menyaring data menggunakan Advanced Filter
wsDatabase.Range("search_gross").AdvancedFilter _
Action:=xlFilterCopy, CriteriaRange:=Range("Criteria"), _
CopyToRange:=wsHasil.Range("A4")

'Menyeleksi worksheet HasilFilter
wsHasil.Select
'Menyeleksi sel A1
Range("A1").Select

----------

Kemudian yang warna merah itu saya ganti

'Menghapus seluruh data dalam worksheet HasilFilter
wsHasil.Range("A4").CurrentRegion.Offset(1).EntireRow.Delete

Tapi data hasil filternya malah tidak keluar, yang keluar cuman header dan
number saja.
(maaf Pak banyak nanya soalnya saya betul2 masih belajar dalam hal ini hehe
)

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (11)

5e.

Re: search dengan criteria tertentu

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

Wed Jan 18, 2012 12:12 am (PST)

Oh menggunakan advanced filter ya.
Maaf gak baca posting sebelum-sebelumnya.

Kalau gitu mungkin diubahnya :
1. define name yang menggunakan seluruh data dari sheet hasil, seperti :
=OFFSET(hasil!$A$4,0,0,COUNTA(hasil!$A:$A)+0,5)
diubah menjadi :
=OFFSET(*hasil!$A$3,1*,0,COUNTA(hasil!$A:$A)+0,5)

2. baris :
wsHasil.Range("A4").CurrentRegion.Offset(1).EntireRow.Delete
diubah menjadi : [ hilangkan .offset(1) ]
*wsHasil.Range("A4").CurrentRegion.EntireRow.Delete*

Kid.

2012/1/18 dimas ricky <dimasr1985@gmail.com>

> **
>
>
>
>
> 2012/1/18 Kid Mr. <mr.nmkid@gmail.com>
>
>> **
>> Pak Kid, terima kasih banyak untuk bantuannnya, tapi saya masih
>> bingung pak,
>> Mohon bantuannya Pak Kid,
>>
>>
> sebelumnya kode makro untuk sFilter saya pake seperti ini :
>
>
> 'wsDatabase adalah worksheet Database
> Set wsDatabase = Sheets("Combined")
> 'wsHasil adalah worksheet HasilFilter
> Set wsHasil = Sheets("hasil")
> 'Menghapus seluruh data dalam worksheet HasilFilter
> 'Menghapus seluruh data dalam worksheet HasilFilter
> wsHasil.Cells.Delete
>
> 'Menyalin lebar kolom range A2:F7
> wsDatabase.Range("A2:e2").Copy
> wsHasil.Range("A4").PasteSpecial Paste:=xlPasteColumnWidths
> 'Menyaring data menggunakan Advanced Filter
> wsDatabase.Range("search_gross").AdvancedFilter _
> Action:=xlFilterCopy, CriteriaRange:=Range("Criteria"), _
> CopyToRange:=wsHasil.Range("A4")
>
> 'Menyeleksi worksheet HasilFilter
> wsHasil.Select
> 'Menyeleksi sel A1
> Range("A1").Select
>
>
> ----------
>
> Kemudian yang warna merah itu saya ganti
>
> 'Menghapus seluruh data dalam worksheet HasilFilter
> wsHasil.Range("A4").CurrentRegion.Offset(1).EntireRow.Delete
>
> Tapi data hasil filternya malah tidak keluar, yang keluar cuman header dan
> number saja.
> (maaf Pak banyak nanya soalnya saya betul2 masih belajar dalam hal ini
> hehe )
>
>
>
>
>
>
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (11)

6a.

Bagaimana menggabung nama dengan gelar depan dan gelar belakang

Posted by: "guru muda" mudaguru@yahoo.com   mudaguru

Tue Jan 17, 2012 7:26 pm (PST)

Kepada para warga belajar-excel.

Mohon dibantu;

Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar belakang dengan aturan penulisan tertentu.

Selengkapnya silakan lihat lampiran.

Atas bantuan para warga dan master excel, saya ucapkan terima kasih.

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

6b.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang

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

Tue Jan 17, 2012 7:32 pm (PST)

Misal formula diletakkan di table master :
=IF(LEN(D2),D2&". ","")&C2&IF(LEN(E2),", "&E2,"")

Jika ada di sheet lain, maka sesuaikan referensi yang digunakan.

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

> **
>
>
> Kepada para warga belajar-excel.
>
> Mohon dibantu;
>
> Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar
> belakang dengan aturan penulisan tertentu.
>
> Selengkapnya silakan lihat lampiran.
>
> Atas bantuan para warga dan master excel, saya ucapkan terima kasih.
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

6c.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang

Posted by: "guru muda" mudaguru@yahoo.com   mudaguru

Tue Jan 17, 2012 7:56 pm (PST)

Terima kasih Pak Kid atas formulanya.

Maaf Pak, saya masih bingung. Formula itu mau diletakkan dimana?

Kalau diletakkan di TABELMASTER di cell berapa?
Dan juga kalau mau diletakkan di sheet NAMA di cell berapa.

Soalnya udah saya coba dibeberapa tempat di kedua sheet tsb, tetapi gak bisa.

Mohon petunjuknya. Kalau bisa file jadinya aja Pak, he he.

Terima kasih

On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
To: belajar-excel@yahoogroups.com
Date: Wednesday, January 18, 2012, 3:32 AM

 

Misal formula diletakkan di table master :
=IF(LEN(D2),D2&". ","")&C2&IF(LEN(E2),", "&E2,"")

Jika ada di sheet lain, maka sesuaikan referensi yang digunakan.

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Kepada para warga belajar-excel.

Mohon dibantu;

Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar belakang dengan aturan penulisan tertentu.

Selengkapnya silakan lihat lampiran.

Atas bantuan para warga dan master excel, saya ucapkan terima kasih.

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

6d.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang

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

Tue Jan 17, 2012 7:59 pm (PST)

di sheet table master di baris 2, *selain *dikolom C,D,E

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

> **
>
>
> Terima kasih Pak Kid atas formulanya.
>
> Maaf Pak, saya masih bingung. Formula itu mau diletakkan dimana?
>
> Kalau diletakkan di TABELMASTER di cell berapa?
> Dan juga kalau mau diletakkan di sheet NAMA di cell berapa.
>
> Soalnya udah saya coba dibeberapa tempat di kedua sheet tsb, tetapi gak
> bisa.
>
> Mohon petunjuknya. Kalau bisa file jadinya aja Pak, he he.
>
> Terima kasih
>
>
>
>
>
>
>
> On *Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com>* wrote:
>
>
> From: Kid Mr. <mr.nmkid@gmail.com>
> Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan
> dan gelar belakang
> To: belajar-excel@yahoogroups.com
> Date: Wednesday, January 18, 2012, 3:32 AM
>
>
>
>
> Misal formula diletakkan di table master :
> =IF(LEN(D2),D2&". ","")&C2&IF(LEN(E2),", "&E2,"")
>
> Jika ada di sheet lain, maka sesuaikan referensi yang digunakan.
>
> Kid.
>
> 2012/1/18 guru muda <mudaguru@yahoo.com<http://mc/compose?to=mudaguru@yahoo.com>
> >
>
> **
>
>
> Kepada para warga belajar-excel.
>
> Mohon dibantu;
>
> Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar
> belakang dengan aturan penulisan tertentu.
>
> Selengkapnya silakan lihat lampiran.
>
> Atas bantuan para warga dan master excel, saya ucapkan terima kasih.
>
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

6e.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang

Posted by: "guru muda" mudaguru@yahoo.com   mudaguru

Tue Jan 17, 2012 8:17 pm (PST)

Udah saya coba untuk meletakkan formula tersebut di kolom H baris kedua, tetapi muncul pesan error

--- On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
To: belajar-excel@yahoogroups.com
Date: Wednesday, January 18, 2012, 3:58 AM

 

di sheet table master di baris 2, selain dikolom C,D,E

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Terima kasih Pak Kid atas formulanya.

Maaf Pak, saya masih bingung. Formula itu mau diletakkan dimana?

Kalau diletakkan di TABELMASTER di cell berapa?
Dan juga kalau mau diletakkan di sheet NAMA di cell berapa.

Soalnya udah saya coba dibeberapa tempat di kedua sheet tsb, tetapi gak bisa.

Mohon petunjuknya. Kalau bisa file jadinya aja Pak, he he.

Terima kasih

On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
To: belajar-excel@yahoogroups.com

Date: Wednesday, January 18, 2012, 3:32 AM

 

Misal formula diletakkan di table master :
=IF(LEN(D2),D2&". ","")&C2&IF(LEN(E2),", "&E2,"")

Jika ada di sheet lain, maka sesuaikan referensi yang digunakan.

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Kepada para warga belajar-excel.

Mohon dibantu;

Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar belakang dengan aturan penulisan tertentu.

Selengkapnya silakan lihat lampiran.

Atas bantuan para warga dan master excel, saya ucapkan terima kasih.

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

6f.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang

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

Tue Jan 17, 2012 8:23 pm (PST)

Pak guru ubah semua koma dalam formula menjadi titik koma.

Hal ini sepertinya disebabkan karena setting regional komputer pak guru
adalah Indonesia yang menggunakan titik koma sebagai list separator

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

> **
>
>
> Udah saya coba untuk meletakkan formula tersebut di kolom H baris kedua,
> tetapi muncul pesan error
>
>
>
>
>
>
>
>
>
>
>
> --- On *Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com>* wrote:
>
>
> From: Kid Mr. <mr.nmkid@gmail.com>
> Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan
> dan gelar belakang
> To: belajar-excel@yahoogroups.com
> Date: Wednesday, January 18, 2012, 3:58 AM
>
>
>
>
> di sheet table master di baris 2, *selain *dikolom C,D,E
>
> Kid.
>
> 2012/1/18 guru muda <mudaguru@yahoo.com<http://mc/compose?to=mudaguru@yahoo.com>
> >
>
> **
>
>
> Terima kasih Pak Kid atas formulanya.
>
> Maaf Pak, saya masih bingung. Formula itu mau diletakkan dimana?
>
> Kalau diletakkan di TABELMASTER di cell berapa?
> Dan juga kalau mau diletakkan di sheet NAMA di cell berapa.
>
> Soalnya udah saya coba dibeberapa tempat di kedua sheet tsb, tetapi gak
> bisa.
>
> Mohon petunjuknya. Kalau bisa file jadinya aja Pak, he he.
>
> Terima kasih
>
>
>
>
>
>
>
> On *Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com<http://mc/compose?to=mr.nmkid@gmail.com>
> >* wrote:
>
>
> From: Kid Mr. <mr.nmkid@gmail.com<http://mc/compose?to=mr.nmkid@gmail.com>
> >
> Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan
> dan gelar belakang
> To: belajar-excel@yahoogroups.com<http://mc/compose?to=belajar-excel@yahoogroups.com>
> Date: Wednesday, January 18, 2012, 3:32 AM
>
>
>
>
> Misal formula diletakkan di table master :
> =IF(LEN(D2),D2&". ","")&C2&IF(LEN(E2),", "&E2,"")
>
> Jika ada di sheet lain, maka sesuaikan referensi yang digunakan.
>
> Kid.
>
> 2012/1/18 guru muda <mudaguru@yahoo.com<http://mc/compose?to=mudaguru@yahoo.com>
> >
>
> **
>
>
> Kepada para warga belajar-excel.
>
> Mohon dibantu;
>
> Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar
> belakang dengan aturan penulisan tertentu.
>
> Selengkapnya silakan lihat lampiran.
>
> Atas bantuan para warga dan master excel, saya ucapkan terima kasih.
>
>
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

6g.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang

Posted by: "guru muda" mudaguru@yahoo.com   mudaguru

Tue Jan 17, 2012 8:37 pm (PST)

Terima kasih Pak Kid. Udah bisa saya taruh di sheet TABEL MASTER. Sekarang saya akan coba taruh di sheet NAMA. Semoga bisa.
 

--- On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
To: belajar-excel@yahoogroups.com
Date: Wednesday, January 18, 2012, 4:22 AM

 

Pak guru ubah semua koma dalam formula menjadi titik koma.

Hal ini sepertinya disebabkan karena setting regional komputer pak guru adalah Indonesia yang menggunakan titik koma sebagai list separator

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Udah saya coba untuk meletakkan formula tersebut di kolom H baris kedua, tetapi muncul pesan error

--- On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
To: belajar-excel@yahoogroups.com

Date: Wednesday, January 18, 2012, 3:58 AM

 

di sheet table master di baris 2, selain dikolom C,D,E

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Terima kasih Pak Kid atas formulanya.

Maaf Pak, saya masih bingung. Formula itu mau diletakkan dimana?

Kalau diletakkan di TABELMASTER di cell berapa?
Dan juga kalau mau diletakkan di sheet NAMA di cell berapa.

Soalnya udah saya coba dibeberapa tempat di kedua sheet tsb, tetapi gak bisa.

Mohon petunjuknya. Kalau bisa file jadinya aja Pak, he he.

Terima kasih

On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang

To: belajar-excel@yahoogroups.com

Date: Wednesday, January 18, 2012, 3:32 AM

 

Misal formula diletakkan di table master :
=IF(LEN(D2),D2&". ","")&C2&IF(LEN(E2),", "&E2,"")

Jika ada di sheet lain, maka sesuaikan referensi yang digunakan.

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Kepada para warga belajar-excel.

Mohon dibantu;

Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar belakang dengan aturan penulisan tertentu.

Selengkapnya silakan lihat lampiran.

Atas bantuan para warga dan master excel, saya ucapkan terima kasih.

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

6h.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang

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

Tue Jan 17, 2012 8:43 pm (PST)

Pak Guru Muda,

Jangan lupa untuk memperhatikan regional setting yang digunakan oleh
komputer masing-masing ya...
Settingnya ada di Control Panel nya Windows, Region and Language.

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

> **
>
>
> Terima kasih Pak Kid. Udah bisa saya taruh di sheet TABEL MASTER. Sekarang
> saya akan coba taruh di sheet NAMA. Semoga bisa.
>
>
>
>
>
>
>
>
>
>
>
>
> --- On *Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com>* wrote:
>
>
> From: Kid Mr. <mr.nmkid@gmail.com>
> Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan
> dan gelar belakang
> To: belajar-excel@yahoogroups.com
> Date: Wednesday, January 18, 2012, 4:22 AM
>
>
>
>
> Pak guru ubah semua koma dalam formula menjadi titik koma.
>
> Hal ini sepertinya disebabkan karena setting regional komputer pak guru
> adalah Indonesia yang menggunakan titik koma sebagai list separator
>
> Kid.
>
> 2012/1/18 guru muda <mudaguru@yahoo.com<http://mc/compose?to=mudaguru@yahoo.com>
> >
>
> **
>
>
> Udah saya coba untuk meletakkan formula tersebut di kolom H baris kedua,
> tetapi muncul pesan error
>
>
>
>
>
>
>
>
>
>
>
> --- On *Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com<http://mc/compose?to=mr.nmkid@gmail.com>
> >* wrote:
>
>
> From: Kid Mr. <mr.nmkid@gmail.com<http://mc/compose?to=mr.nmkid@gmail.com>
> >
> Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan
> dan gelar belakang
> To: belajar-excel@yahoogroups.com<http://mc/compose?to=belajar-excel@yahoogroups.com>
> Date: Wednesday, January 18, 2012, 3:58 AM
>
>
>
>
> di sheet table master di baris 2, *selain *dikolom C,D,E
>
> Kid.
>
> 2012/1/18 guru muda <mudaguru@yahoo.com<http://mc/compose?to=mudaguru@yahoo.com>
> >
>
> **
>
>
> Terima kasih Pak Kid atas formulanya.
>
> Maaf Pak, saya masih bingung. Formula itu mau diletakkan dimana?
>
> Kalau diletakkan di TABELMASTER di cell berapa?
> Dan juga kalau mau diletakkan di sheet NAMA di cell berapa.
>
> Soalnya udah saya coba dibeberapa tempat di kedua sheet tsb, tetapi gak
> bisa.
>
> Mohon petunjuknya. Kalau bisa file jadinya aja Pak, he he.
>
> Terima kasih
>
>
>
>
>
>
>
> On *Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com<http://mc/compose?to=mr.nmkid@gmail.com>
> >* wrote:
>
>
> From: Kid Mr. <mr.nmkid@gmail.com<http://mc/compose?to=mr.nmkid@gmail.com>
> >
> Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan
> dan gelar belakang
> To: belajar-excel@yahoogroups.com<http://mc/compose?to=belajar-excel@yahoogroups.com>
> Date: Wednesday, January 18, 2012, 3:32 AM
>
>
>
>
> Misal formula diletakkan di table master :
> =IF(LEN(D2),D2&". ","")&C2&IF(LEN(E2),", "&E2,"")
>
> Jika ada di sheet lain, maka sesuaikan referensi yang digunakan.
>
> Kid.
>
> 2012/1/18 guru muda <mudaguru@yahoo.com<http://mc/compose?to=mudaguru@yahoo.com>
> >
>
> **
>
>
> Kepada para warga belajar-excel.
>
> Mohon dibantu;
>
> Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar
> belakang dengan aturan penulisan tertentu.
>
> Selengkapnya silakan lihat lampiran.
>
> Atas bantuan para warga dan master excel, saya ucapkan terima kasih.
>
>
>
>
>
>

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

6i.

Re: Bagaimana menggabung nama dengan gelar depan dan gelar belakang

Posted by: "guru muda" mudaguru@yahoo.com   mudaguru

Tue Jan 17, 2012 8:49 pm (PST)

Ya Pak. Terima kasih banyak.

--- On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
To: belajar-excel@yahoogroups.com
Date: Wednesday, January 18, 2012, 4:43 AM

 

Pak Guru Muda,

Jangan lupa untuk memperhatikan regional setting yang digunakan oleh komputer masing-masing ya...
Settingnya ada di Control Panel nya Windows, Region and Language.

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Terima kasih Pak Kid. Udah bisa saya taruh di sheet TABEL MASTER. Sekarang saya akan coba taruh di sheet NAMA. Semoga bisa.

 

--- On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
To: belajar-excel@yahoogroups.com

Date: Wednesday, January 18, 2012, 4:22 AM

 

Pak guru ubah semua koma dalam formula menjadi titik koma.

Hal ini sepertinya disebabkan karena setting regional komputer pak guru adalah Indonesia yang menggunakan titik koma sebagai list separator

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Udah saya coba untuk meletakkan formula tersebut di kolom H baris kedua, tetapi muncul pesan error

--- On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang

To: belajar-excel@yahoogroups.com

Date: Wednesday, January 18, 2012, 3:58 AM

 

di sheet table master di baris 2, selain dikolom C,D,E

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Terima kasih Pak Kid atas formulanya.

Maaf Pak, saya masih bingung. Formula itu mau diletakkan dimana?

Kalau diletakkan di TABELMASTER di cell berapa?
Dan juga kalau mau diletakkan di sheet NAMA di cell berapa.

Soalnya udah saya coba dibeberapa tempat di kedua sheet tsb, tetapi gak bisa.

Mohon petunjuknya. Kalau bisa file jadinya aja Pak, he he.

Terima kasih

On Wed, 1/18/12, Kid Mr. <mr.nmkid@gmail.com> wrote:

From: Kid Mr. <mr.nmkid@gmail.com>
Subject: Re: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang

To: belajar-excel@yahoogroups.com

Date: Wednesday, January 18, 2012, 3:32 AM

 

Misal formula diletakkan di table master :
=IF(LEN(D2),D2&". ","")&C2&IF(LEN(E2),", "&E2,"")

Jika ada di sheet lain, maka sesuaikan referensi yang digunakan.

Kid.

2012/1/18 guru muda <mudaguru@yahoo.com>

 

Kepada para warga belajar-excel.

Mohon dibantu;

Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar belakang dengan aturan penulisan tertentu.

Selengkapnya silakan lihat lampiran.

Atas bantuan para warga dan master excel, saya ucapkan terima kasih.

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)

7a.

Bls: [belajar-excel] Bagaimana menggabung nama dengan gelar depan da

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

Tue Jan 17, 2012 8:52 pm (PST)

setiap kolom di tabel master diberi nama (define name ) sesuai judul kolom untuk memudahkan pembuatan formula.

formula untuk nama:

=INDEX(GELAR_DEPAN;MATCH(B2;NIP;0))&IF(LEN(INDEX(GELAR_DEPAN;MATCH(B2;NIP;0)));".

";"")&INDEX(NAMA;MATCH(solusi!B2;NIP;0))&IF(LEN(INDEX(GELAR_BELAKANG;MATCH(B2;NIP;0)));",
";"")&INDEX(GELAR_BELAKANG;MATCH(B2;NIP;0))

formula untuk lama bertugas:
=IF(LEN(B2);INDEX(LAMA_BERTUGAS;MATCH(B2;NIP;0));"")

wassalam

Ghozi Alkatiri

--- Pada Rab, 18/1/12, guru muda <mudaguru@yahoo.com> menulis:

Dari: guru muda <mudaguru@yahoo.com>
Judul: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
Kepada: belajar-excel@yahoogroups.com
Tanggal: Rabu, 18 Januari, 2012, 10:26 AM

 

Kepada para warga belajar-excel.

Mohon dibantu;

Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar belakang dengan aturan penulisan tertentu.

Selengkapnya silakan lihat lampiran.

Atas bantuan para warga dan master excel, saya ucapkan terima kasih.

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)

7b.

Re: Bls: [belajar-excel] Bagaimana menggabung nama dengan gelar depa

Posted by: "guru muda" mudaguru@yahoo.com   mudaguru

Tue Jan 17, 2012 9:13 pm (PST)

Terima kasih Pak Ghozi

Formulanya mantap banget.

--- On Wed, 1/18/12, ghozi alkatiri <ghozialkatiri@yahoo.co.id> wrote:

From: ghozi alkatiri <ghozialkatiri@yahoo.co.id>
Subject: Bls: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
To: belajar-excel@yahoogroups.com
Date: Wednesday, January 18, 2012, 4:52 AM

 

setiap kolom di tabel master diberi nama (define name ) sesuai judul kolom untuk memudahkan pembuatan formula.

formula untuk nama:

=INDEX(GELAR_DEPAN;MATCH(B2;NIP;0))&IF(LEN(INDEX(GELAR_DEPAN;MATCH(B2;NIP;0)));".

";"")&INDEX(NAMA;MATCH(solusi!B2;NIP;0))&IF(LEN(INDEX(GELAR_BELAKANG;MATCH(B2;NIP;0)));",
";"")&INDEX(GELAR_BELAKANG;MATCH(B2;NIP;0))

formula untuk lama bertugas:
=IF(LEN(B2);INDEX(LAMA_BERTUGAS;MATCH(B2;NIP;0));"")

wassalam

Ghozi Alkatiri

--- Pada Rab, 18/1/12, guru muda <mudaguru@yahoo.com> menulis:

Dari: guru muda <mudaguru@yahoo.com>
Judul: [belajar-excel] Bagaimana menggabung nama dengan gelar depan dan gelar belakang
Kepada: belajar-excel@yahoogroups.com
Tanggal: Rabu, 18 Januari, 2012, 10:26 AM

 

Kepada para warga belajar-excel.

Mohon dibantu;

Bagaimana rumusnya untuk menggabungkan nama dengan gelar depan dan gelar belakang dengan aturan penulisan tertentu.

Selengkapnya silakan lihat lampiran.

Atas bantuan para warga dan master excel, saya ucapkan terima kasih.

Back to top

Reply to sender | Reply to group | Reply via web post
Messages in this topic (2)

Recent Activity

•  16
  New Members

Visit Your Group

Yahoo! Groups

Small Business Group

A community for

small business owners

Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Y! Groups blog

the best source

for the latest

scoop on Groups.

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

Messages

---------------------------------------------------------------------
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
---------------------------------------------------------------------

MARKETPLACE

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

---

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

Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Individual | Switch format to Traditional
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe