15 New Messages
Digest #2730
1c
Bls: [belajar-excel] mengambil data (multi string) dengan vlookup by "T. Machfud G" teuku.machfud
3a
Bls: [belajar-excel] mengambil data (multi string) dengan vlookup by "T. Machfud G" teuku.machfud
3b
Re: mengambil data (multi string) dengan vlookup [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
5b
Re: Fw: [belajar-excel] Membandingkan data pada 2 kolom & melihat ha by "Mr. Kid" nmkid.family@ymail.com
6a
Re: merubah sheet yg punya ketergantungan dengan file excel yg lain by "Mr. Kid" nmkid.family@ymail.com
7a
Re: Extraxt Data Yang Tidak Kosisten Panjangnya. [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
Messages
Mon Jan 13, 2014 5:14 am (PST) . Posted by:
"Jan Raisin"
Coba gunakan UDF ConcateIf
syntaxnya
=ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
contoh penggunaan:
=ConcateIf( $C$8:$C$17 , H8;$B$8:$B$17 , "," )
tanda penghubung harus berada di antara kutip dua " "
scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat
dipanggil dari worksheet seperti formula excel laiinya
Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As
Range, sCon As String) As String
Dim rgCrit As Range
Dim sConcate As String
Dim iCol As Integer
Dim lRow As Long
iCol = rngData.Column
For Each rgCrit In rngCrit
If rgCrit.Value = Crit.Value Then
lRow = rgCrit.Row
If sConcate = vbNullString Then
sConcate = Cells(lRow, iCol).Value
Else
sConcate = sConcate & sCon & Cells(lRow, iCol).Value
End If
End If
Next rgCrit
ConcateIf = sConcate
End Function
File solusi terlampir
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@yahoo.com> menulis:
>
>
> hehehehhehe...penyakit lama lupa
> hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>
> Regards,
> T. MACHFUD GANI
>
>
>
syntaxnya
=ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
contoh penggunaan:
=ConcateIf( $C$8:$C$17 , H8;$B$8:$B$17 , "," )
tanda penghubung harus berada di antara kutip dua " "
scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat
dipanggil dari worksheet seperti formula excel laiinya
Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As
Range, sCon As String) As String
Dim rgCrit As Range
Dim sConcate As String
Dim iCol As Integer
Dim lRow As Long
iCol = rngData.Column
For Each rgCrit In rngCrit
If rgCrit.Value = Crit.Value Then
lRow = rgCrit.Row
If sConcate = vbNullString Then
sConcate = Cells(lRow, iCol).Value
Else
sConcate = sConcate & sCon & Cells(lRow, iCol).Value
End If
End If
Next rgCrit
ConcateIf = sConcate
End Function
File solusi terlampir
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@
>
>
> hehehehhehe.
> hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>
> Regards,
> T. MACHFUD GANI
>
>
>
Mon Jan 13, 2014 5:16 am (PST) . Posted by:
"Jan Raisin"
ups.. koreksi sedikit..
contoh penggunaan formulanya yang benar sbb:
=ConcateIf( $C$8:$C$17 , H8 , $B$8:$B$17 , "," )
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
> Coba gunakan UDF ConcateIf
>
> syntaxnya
> =ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
>
> contoh penggunaan:
> =ConcateIf( $C$8:$C$17 , H8;$B$8:$B$17 , "," )
>
> tanda penghubung harus berada di antara kutip dua " "
>
> scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat
> dipanggil dari worksheet seperti formula excel laiinya
>
> Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As
> Range, sCon As String) As String
> Dim rgCrit As Range
> Dim sConcate As String
> Dim iCol As Integer
> Dim lRow As Long
>
> iCol = rngData.Column
> For Each rgCrit In rngCrit
> If rgCrit.Value = Crit.Value Then
> lRow = rgCrit.Row
> If sConcate = vbNullString Then
> sConcate = Cells(lRow, iCol).Value
> Else
> sConcate = sConcate & sCon & Cells(lRow, iCol).Value
> End If
> End If
> Next rgCrit
> ConcateIf = sConcate
> End Function
>
> File solusi terlampir
>
> Salam,
>
>
> -Miss Jan Raisin-
>
>
> Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@yahoo.com>menulis:
>
>
>>
>> hehehehhehe...penyakit lama lupa
>> hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>>
>> Regards,
>> T. MACHFUD GANI
>>
>>
>>
contoh penggunaan formulanya yang benar sbb:
=ConcateIf( $C$8:$C$17 , H8 , $B$8:$B$17 , "," )
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@
> Coba gunakan UDF ConcateIf
>
> syntaxnya
> =ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
>
> contoh penggunaan:
> =ConcateIf( $C$8:$C$17 , H8;$B$8:$B$17 , "," )
>
> tanda penghubung harus berada di antara kutip dua " "
>
> scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat
> dipanggil dari worksheet seperti formula excel laiinya
>
> Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As
> Range, sCon As String) As String
> Dim rgCrit As Range
> Dim sConcate As String
> Dim iCol As Integer
> Dim lRow As Long
>
> iCol = rngData.Column
> For Each rgCrit In rngCrit
> If rgCrit.Value = Crit.Value Then
> lRow = rgCrit.Row
> If sConcate = vbNullString Then
> sConcate = Cells(lRow, iCol).Value
> Else
> sConcate = sConcate & sCon & Cells(lRow, iCol).Value
> End If
> End If
> Next rgCrit
> ConcateIf = sConcate
> End Function
>
> File solusi terlampir
>
> Salam,
>
>
> -Miss Jan Raisin-
>
>
> Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@
>
>
>>
>> hehehehhehe.
>> hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>>
>> Regards,
>> T. MACHFUD GANI
>>
>>
>>
Tue Jan 14, 2014 12:09 am (PST) . Posted by:
"T. Machfud G" teuku.machfud
Dear all,
makasih ya jawabannya.
tp kl colom nya di urutin dari (kecil-besar atau sebaliknya) jd error ni
tp msh bingung, apa gk ada cara yg lebih simple
msh blom ngerti udf..
ini saya lampirkan dummy yg baru ya
jd ada 1 club disukai oleh orang yg berbeda2
nha misal gini
juventus - mahfud
juventus - ardie
asroma - jack
persija - jack
acmilan - ayah
nha gimana caranya dalam kolom kriteria saya ketik juventus output dr vlookupnya jd
"mahfud,ardie"
dan satu lagi kl diurutin disesuaikan dengan abjad tidak jd error hasil formulanya heheeh
kl yg susah saya buat cuman bisa nampilin satu nama orang saja, apa harus ditambah function lain???
Wassalam
T. MACHFUD GANI
________________________________
Dari: Jan Raisin <miss.jan.raisin@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Senin, 13 Januari 2014 20:16
Judul: Re: [belajar-excel] mengambil data (multi string) dengan vlookup
ups.. koreksi sedikit..
contoh penggunaan formulanya yang benar sbb:
=ConcateIf( $C$8:$C$17 , H8 , $B$8:$B$17 , "," )
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Coba gunakan UDF ConcateIf
>
>
>syntaxnya
>=ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
>
>
>contoh penggunaan:
>=ConcateIf($C$8:$C$17 , H8;$B$8:$B$17 , "," )
>
>
>
>tanda penghubung harus berada di antara kutip dua " "
>
>
>scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat dipanggil dari worksheet seperti formula excel laiinya
>
>
>Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As Range, sCon As String) As String
> Dim rgCrit As Range
> Dim sConcate As String
> Dim iCol As Integer
> Dim lRow As Long
>
> iCol = rngData.Column
> For Each rgCrit In rngCrit
> If rgCrit.Value = Crit.Value Then
> lRow = rgCrit.Row
> If sConcate = vbNullString Then
> sConcate = Cells(lRow, iCol).Value
> Else
> sConcate = sConcate & sCon & Cells(lRow, iCol).Value
> End If
> End If
> Next rgCrit
> ConcateIf = sConcate
>End Function
>
>
>File solusi terlampir
>
>
>Salam,
>
>
>
>
>-Miss Jan Raisin-
>
>
>Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@yahoo.com> menulis:
>
>
>
>>
>>hehehehhehe...penyakit lama lupa
>>hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>>
>>Regards,
>>T. MACHFUD GANI
>>
>>
>>
>>
makasih ya jawabannya.
tp kl colom nya di urutin dari (kecil-besar atau sebaliknya) jd error ni
tp msh bingung, apa gk ada cara yg lebih simple
msh blom ngerti udf..
ini saya lampirkan dummy yg baru ya
jd ada 1 club disukai oleh orang yg berbeda2
nha misal gini
juventus - mahfud
juventus - ardie
asroma - jack
persija - jack
acmilan - ayah
nha gimana caranya dalam kolom kriteria saya ketik juventus output dr vlookupnya jd
"mahfud,
dan satu lagi kl diurutin disesuaikan dengan abjad tidak jd error hasil formulanya heheeh
kl yg susah saya buat cuman bisa nampilin satu nama orang saja, apa harus ditambah function lain???
Wassalam
T. MACHFUD GANI
____________
Dari: Jan Raisin <miss.jan.raisin@
Kepada: belajar-excel@
Dikirim: Senin, 13 Januari 2014 20:16
Judul: Re: [belajar-excel] mengambil data (multi string) dengan vlookup
ups.. koreksi sedikit..
contoh penggunaan formulanya yang benar sbb:
=ConcateIf( $
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@
Coba gunakan UDF ConcateIf
>
>
>syntaxnya
>=ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
>
>
>contoh penggunaan:
>=ConcateIf(
>
>
>
>tanda penghubung harus berada di antara kutip dua " "
>
>
>scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat dipanggil dari worksheet seperti formula excel laiinya
>
>
>Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As Range, sCon As String) As String
> Dim rgCrit As Range
> Dim sConcate As String
> Dim iCol As Integer
> Dim lRow As Long
>
> iCol = rngData.Column
> For Each rgCrit In rngCrit
> If rgCrit.Value = Crit.Value Then
> lRow = rgCrit.Row
> If sConcate = vbNullString Then
> sConcate = Cells(lRow, iCol).Value
> Else
> sConcate = sConcate & sCon & Cells(lRow, iCol).Value
> End If
> End If
> Next rgCrit
> ConcateIf = sConcate
>End Function
>
>
>File solusi terlampir
>
>
>Salam,
>
>
>
>
>-Miss Jan Raisin-
>
>
>Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@
>
>
>
>>
>>hehehehhehe
>>hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>>
>>Regards,
>>T. MACHFUD GANI
>>
>>
>>
>>
Tue Jan 14, 2014 12:08 am (PST) . Posted by:
"A. Zainal H." a_zainal_hilmi
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Dear Master Be-Exceller
Mohon bantuannya untuk kasus saya seperti file terlampir
Atas bantuannya, saya ucapkan banyak terima kasih
وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Zainal
Dear Master Be-Exceller
Mohon bantuannya untuk kasus saya seperti file terlampir
Atas bantuannya, saya ucapkan banyak terima kasih
وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Zainal
Tue Jan 14, 2014 12:10 am (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Wa'alaikumussalam Wr. Wb.
Coba formula untuk data di baris 2 berikut :
=INDEX(db!$B$2:$B$361,MATCH("*"&C2&";*",INDEX(db!$D$2:$D$361&"",0),0))
Wassalamu'alaikum Wr. Wb.
Kid.
2014/1/14 A. Zainal H. <a_zainal_hilmi@yahoo.com>
>
>
> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> Dear Master Be-Exceller
>
> Mohon bantuannya untuk kasus saya seperti file terlampir
> Atas bantuannya, saya ucapkan banyak terima kasih
>
>
>
> وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> *Zainal*
>
>
>
Coba formula untuk data di baris 2 berikut :
=INDEX(db!$B$
Wassalamu'
Kid.
2014/1/14 A. Zainal H. <a_zainal_hilmi@
>
>
> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> Dear Master Be-Exceller
>
> Mohon bantuannya untuk kasus saya seperti file terlampir
> Atas bantuannya, saya ucapkan banyak terima kasih
>
>
>
> وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> *Zainal*
>
>
>
Tue Jan 14, 2014 1:06 am (PST) . Posted by:
a_zainal_hilmi
السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Dear Mr. Kid
الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَِ
Formulanya mantap buanget
Terima kasih Mr. Kid
وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Zainal
Rgrds,
A. Zainal H.
by Telkomsel BlackBerry®
-----Original Message-----
From: "Mr. Kid" <mr.nmkid@gmail.com>
Sender: belajar-excel@yahoogroups.com
Date: Tue, 14 Jan 2014 15:10:21
To: BeExcel<belajar-excel@yahoogroups.com>
Reply-To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Mencari Kode
Wa'alaikumussalam Wr. Wb.
Coba formula untuk data di baris 2 berikut :
=INDEX(db!$B$2:$B$361,MATCH("*"&C2&";*",INDEX(db!$D$2:$D$361&"",0),0))
Wassalamu'alaikum Wr. Wb.
Kid.
2014/1/14 A. Zainal H. <a_zainal_hilmi@yahoo.com>
>
>
> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> Dear Master Be-Exceller
>
> Mohon bantuannya untuk kasus saya seperti file terlampir
> Atas bantuannya, saya ucapkan banyak terima kasih
>
>
>
> وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> *Zainal*
>
>
>
Dear Mr. Kid
الْحَمْدُ لِلَّهِ رَبِّ الْعَالَمِينَِ
Formulanya mantap buanget
Terima kasih Mr. Kid
وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Zainal
Rgrds,
A. Zainal H.
by Telkomsel BlackBerry®
-----Original Message-----
From: "Mr. Kid" <mr.nmkid@gmail.
Sender: belajar-excel@
Date: Tue, 14 Jan 2014 15:10:21
To: BeExcel<belajar-excel@
Reply-To: belajar-excel@
Subject: Re: [belajar-excel] Mencari Kode
Wa'alaikumussal
Coba formula untuk data di baris 2 berikut :
=INDEX(db!$B$
Wassalamu'
Kid.
2014/1/14 A. Zainal H. <a_zainal_hilmi@
>
>
> السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> Dear Master Be-Exceller
>
> Mohon bantuannya untuk kasus saya seperti file terlampir
> Atas bantuannya, saya ucapkan banyak terima kasih
>
>
>
> وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> *Zainal*
>
>
>
Tue Jan 14, 2014 12:09 am (PST) . Posted by:
"T. Machfud G" teuku.machfud
hehe kelupaan
Regards,
T. MACHFUD GANI
________________________________
Dari: T. Machfud G <teuku.machfud@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Selasa, 14 Januari 2014 10:32
Judul: Bls: [belajar-excel] mengambil data (multi string) dengan vlookup
Dear all,
makasih ya jawabannya.
tp kl colom nya di urutin dari (kecil-besar atau sebaliknya) jd error ni
tp msh bingung, apa gk ada cara yg lebih simple
msh blom ngerti udf..
ini saya lampirkan dummy yg baru ya
jd ada 1 club disukai oleh orang yg berbeda2
nha misal gini
juventus - mahfud
juventus - ardie
asroma - jack
persija - jack
acmilan - ayah
nha gimana caranya dalam kolom kriteria saya ketik juventus output dr vlookupnya jd
"mahfud,ardie"
dan satu lagi kl diurutin disesuaikan dengan abjad tidak jd error hasil formulanya heheeh
kl yg susah saya buat cuman bisa nampilin satu nama orang saja, apa harus ditambah function lain???
Wassalam
T. MACHFUD GANI
________________________________
Dari: Jan Raisin <miss.jan.raisin@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Senin, 13 Januari 2014 20:16
Judul: Re: [belajar-excel] mengambil data (multi string) dengan vlookup
ups.. koreksi sedikit..
contoh penggunaan formulanya yang benar sbb:
=ConcateIf( $C$8:$C$17 , H8 , $B$8:$B$17 , "," )
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Coba gunakan UDF ConcateIf
>
>
>syntaxnya
>=ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
>
>
>contoh penggunaan:
>=ConcateIf($C$8:$C$17 , H8;$B$8:$B$17 , "," )
>
>
>
>tanda penghubung harus berada di antara kutip dua " "
>
>
>scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat dipanggil dari worksheet seperti formula excel laiinya
>
>
>Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As Range, sCon As String) As String
> Dim rgCrit As Range
> Dim sConcate As String
> Dim iCol As Integer
> Dim lRow As Long
>
> iCol = rngData.Column
> For Each rgCrit In rngCrit
> If rgCrit.Value = Crit.Value Then
> lRow = rgCrit.Row
> If sConcate = vbNullString Then
> sConcate = Cells(lRow, iCol).Value
> Else
> sConcate = sConcate & sCon & Cells(lRow, iCol).Value
> End If
> End If
> Next rgCrit
> ConcateIf = sConcate
>End Function
>
>
>File solusi terlampir
>
>
>Salam,
>
>
>
>
>-Miss Jan Raisin-
>
>
>Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@yahoo.com> menulis:
>
>
>
>>
>>hehehehhehe...penyakit lama lupa
>>hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>>
>>Regards,
>>T. MACHFUD GANI
>>
>>
>>
>>
Regards,
T. MACHFUD GANI
____________
Dari: T. Machfud G <teuku.machfud@
Kepada: "belajar-excel@
Dikirim: Selasa, 14 Januari 2014 10:32
Judul: Bls: [belajar-excel] mengambil data (multi string) dengan vlookup
Dear all,
makasih ya jawabannya.
tp kl colom nya di urutin dari (kecil-besar atau sebaliknya) jd error ni
tp msh bingung, apa gk ada cara yg lebih simple
msh blom ngerti udf..
ini saya lampirkan dummy yg baru ya
jd ada 1 club disukai oleh orang yg berbeda2
nha misal gini
juventus - mahfud
juventus - ardie
asroma - jack
persija - jack
acmilan - ayah
nha gimana caranya dalam kolom kriteria saya ketik juventus output dr vlookupnya jd
"mahfud,
dan satu lagi kl diurutin disesuaikan dengan abjad tidak jd error hasil formulanya heheeh
kl yg susah saya buat cuman bisa nampilin satu nama orang saja, apa harus ditambah function lain???
Wassalam
T. MACHFUD GANI
____________
Dari: Jan Raisin <miss.jan.raisin@
Kepada: belajar-excel@
Dikirim: Senin, 13 Januari 2014 20:16
Judul: Re: [belajar-excel] mengambil data (multi string) dengan vlookup
ups.. koreksi sedikit..
contoh penggunaan formulanya yang benar sbb:
=ConcateIf( $
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@
Coba gunakan UDF ConcateIf
>
>
>syntaxnya
>=ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
>
>
>contoh penggunaan:
>=ConcateIf(
>
>
>
>tanda penghubung harus berada di antara kutip dua " "
>
>
>scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat dipanggil dari worksheet seperti formula excel laiinya
>
>
>Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As Range, sCon As String) As String
> Dim rgCrit As Range
> Dim sConcate As String
> Dim iCol As Integer
> Dim lRow As Long
>
> iCol = rngData.Column
> For Each rgCrit In rngCrit
> If rgCrit.Value = Crit.Value Then
> lRow = rgCrit.Row
> If sConcate = vbNullString Then
> sConcate = Cells(lRow, iCol).Value
> Else
> sConcate = sConcate & sCon & Cells(lRow, iCol).Value
> End If
> End If
> Next rgCrit
> ConcateIf = sConcate
>End Function
>
>
>File solusi terlampir
>
>
>Salam,
>
>
>
>
>-Miss Jan Raisin-
>
>
>Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@
>
>
>
>>
>>hehehehhehe
>>hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>>
>>Regards,
>>T. MACHFUD GANI
>>
>>
>>
>>
Tue Jan 14, 2014 2:07 am (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Machfud,
Untuk kasus ini, saya ndak tahu gimana cara buatnya di Access tanpa VBA
Access. Moga-moga pakde-pakde dan mbah-mbah Access yang ada di sini bisa
membantu tanpa menggunakan VBA Access.
Pada database engine seperti MS SQL Server, bisa menggunakan builtin
function seperti stuff disertai pemanfaatan xml path.
Di Excel (yang bahasa dasarnya adalah formula [bahasa dasar Access adalah
SQL bukan VBA Access]), kasus ini bisa dibentuk seperti file terlampir
dengan kolom bantu bernama helper disisi data. Data dibentuk sebagai Excel
Table agar dinamis dalam penyalinan formula bantunya dan penentuan area
tabelnya.
Pemanfaatan VBA Excel untuk membentuk UDF (User Defined Function) juga
dimungkinkan. File terlampir juga menyertakan contoh penggunaan UDF yang
diberi nama JoinText. UDF yang dibuat di-Excel tanpa menggunakan object
milik Excel bisa digunakan juga di VBA Access sebagai sebuah UDF yang dapat
digunakan dalam query. Sayangnya, UDF JoinText dalam file terlampir masih
memanfaatkan object milik Excel, yaitu object application agar bisa
memanfaatkan object WorksheetFunction yang berisi methods dari sebagian
besar built-in function milik Excel.
UDF JoinText dalam file terlampir berbunyi :
Public Function JoinText(vData As Variant, Optional sDelimiter As String =
",") As String
Dim sRes As String
If IsArray(vData) Then
JoinText =
Replace(Replace(Application.WorksheetFunction.Trim(Join(Application.WorksheetFunction.Transpose(vData),
" ")), _
" ", sDelimiter), Chr(160), " ")
Else
JoinText = vData
End If
End Function
Jika input parameter vData bisa selalu berisi array 1 dimensi dengan
item-item yang sudah terfilter (yang akan digabungkan saja), maka bagian
yang berbunyi :
JoinText =
Replace(Replace(Application.WorksheetFunction.Trim(Join(Application.WorksheetFunction.Transpose(vData),
" ")), _
" ", sDelimiter), Chr(160), " ")
bisa diganti menjadi :
JoinText = Join(vData, sDelimiter)
Jika di Access, sepertinya bisa menggunakan subquery yang berupa query
terfilter untuk bisa mendapatkan array 1 dimensi yang berisi item yang
dibutuhkan saja.
dimana ada doa, usaha, dan amal kebaikan penuh syukur, disanalah keberadaan
potensi terbesar untuk tercapainya maksud.
Wassalam,
Kid.
2014/1/14 T. Machfud G <teuku.machfud@yahoo.com>
>
>
> hehe kelupaan
>
> Regards,
> T. MACHFUD GANI
>
>
> ------------------------------
> *Dari:* T. Machfud G <teuku.machfud@yahoo.com>
> *Kepada:* "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
> *Dikirim:* Selasa, 14 Januari 2014 10:32
> *Judul:* Bls: [belajar-excel] mengambil data (multi string) dengan vlookup
>
> Dear all,
>
> makasih ya jawabannya.
> tp kl colom nya di urutin dari (kecil-besar atau sebaliknya) jd error ni
> tp msh bingung, apa gk ada cara yg lebih simple
> msh blom ngerti udf..
>
> ini saya lampirkan dummy yg baru ya
> jd ada 1 club disukai oleh orang yg berbeda2
> nha misal gini
> juventus - mahfud
> juventus - ardie
> asroma - jack
> persija - jack
> acmilan - ayah
>
> nha gimana caranya dalam kolom kriteria saya ketik juventus output dr
> vlookupnya jd
> "mahfud,ardie"
>
> dan satu lagi kl diurutin disesuaikan dengan abjad tidak jd error hasil
> formulanya heheeh
>
> kl yg susah saya buat cuman bisa nampilin satu nama orang saja, apa harus
> ditambah function lain???
>
>
>
> Wassalam
> T. MACHFUD GANI
>
>
> ------------------------------
> *Dari:* Jan Raisin <miss.jan.raisin@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Senin, 13 Januari 2014 20:16
> *Judul:* Re: [belajar-excel] mengambil data (multi string) dengan vlookup
>
>
> ups.. koreksi sedikit..
>
> contoh penggunaan formulanya yang benar sbb:
>
> =ConcateIf( $C$8:$C$17 , H8 , $B$8:$B$17 , "," )
>
> Salam,
>
> -Miss Jan Raisin-
>
>
> Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@gmail.com>menulis:
>
> Coba gunakan UDF ConcateIf
>
> syntaxnya
> =ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
>
> contoh penggunaan:
> =ConcateIf( $C$8:$C$17 , H8;$B$8:$B$17 , "," )
>
> tanda penghubung harus berada di antara kutip dua " "
>
> scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat
> dipanggil dari worksheet seperti formula excel laiinya
>
> Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As
> Range, sCon As String) As String
> Dim rgCrit As Range
> Dim sConcate As String
> Dim iCol As Integer
> Dim lRow As Long
>
> iCol = rngData.Column
> For Each rgCrit In rngCrit
> If rgCrit.Value = Crit.Value Then
> lRow = rgCrit.Row
> If sConcate = vbNullString Then
> sConcate = Cells(lRow, iCol).Value
> Else
> sConcate = sConcate & sCon & Cells(lRow, iCol).Value
> End If
> End If
> Next rgCrit
> ConcateIf = sConcate
> End Function
>
> File solusi terlampir
>
> Salam,
>
>
> -Miss Jan Raisin-
>
>
> Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@yahoo.com>menulis:
>
>
> hehehehhehe...penyakit lama lupa
> hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>
> Regards,
> T. MACHFUD GANI
>
>
>
>
>
>
>
>
>
Untuk kasus ini, saya ndak tahu gimana cara buatnya di Access tanpa VBA
Access. Moga-moga pakde-pakde dan mbah-mbah Access yang ada di sini bisa
membantu tanpa menggunakan VBA Access.
Pada database engine seperti MS SQL Server, bisa menggunakan builtin
function seperti stuff disertai pemanfaatan xml path.
Di Excel (yang bahasa dasarnya adalah formula [bahasa dasar Access adalah
SQL bukan VBA Access]), kasus ini bisa dibentuk seperti file terlampir
dengan kolom bantu bernama helper disisi data. Data dibentuk sebagai Excel
Table agar dinamis dalam penyalinan formula bantunya dan penentuan area
tabelnya.
Pemanfaatan VBA Excel untuk membentuk UDF (User Defined Function) juga
dimungkinkan. File terlampir juga menyertakan contoh penggunaan UDF yang
diberi nama JoinText. UDF yang dibuat di-Excel tanpa menggunakan object
milik Excel bisa digunakan juga di VBA Access sebagai sebuah UDF yang dapat
digunakan dalam query. Sayangnya, UDF JoinText dalam file terlampir masih
memanfaatkan object milik Excel, yaitu object application agar bisa
memanfaatkan object WorksheetFunction yang berisi methods dari sebagian
besar built-in function milik Excel.
UDF JoinText dalam file terlampir berbunyi :
Public Function JoinText(vData As Variant, Optional sDelimiter As String =
","
Dim sRes As String
If IsArray(vData) Then
JoinText =
Replace(Replace(
" ")), _
" ", sDelimiter), Chr(160), " ")
Else
JoinText = vData
End If
End Function
Jika input parameter vData bisa selalu berisi array 1 dimensi dengan
item-item yang sudah terfilter (yang akan digabungkan saja), maka bagian
yang berbunyi :
JoinText =
Replace(Replace(
" ")), _
" ", sDelimiter), Chr(160), " ")
bisa diganti menjadi :
JoinText = Join(vData, sDelimiter)
Jika di Access, sepertinya bisa menggunakan subquery yang berupa query
terfilter untuk bisa mendapatkan array 1 dimensi yang berisi item yang
dibutuhkan saja.
dimana ada doa, usaha, dan amal kebaikan penuh syukur, disanalah keberadaan
potensi terbesar untuk tercapainya maksud.
Wassalam,
Kid.
2014/1/14 T. Machfud G <teuku.machfud@
>
>
> hehe kelupaan
>
> Regards,
> T. MACHFUD GANI
>
>
> ------------
> *Dari:* T. Machfud G <teuku.machfud@
> *Kepada:* "belajar-excel@
> *Dikirim:* Selasa, 14 Januari 2014 10:32
> *Judul:* Bls: [belajar-excel] mengambil data (multi string) dengan vlookup
>
> Dear all,
>
> makasih ya jawabannya.
> tp kl colom nya di urutin dari (kecil-besar atau sebaliknya) jd error ni
> tp msh bingung, apa gk ada cara yg lebih simple
> msh blom ngerti udf..
>
> ini saya lampirkan dummy yg baru ya
> jd ada 1 club disukai oleh orang yg berbeda2
> nha misal gini
> juventus - mahfud
> juventus - ardie
> asroma - jack
> persija - jack
> acmilan - ayah
>
> nha gimana caranya dalam kolom kriteria saya ketik juventus output dr
> vlookupnya jd
> "mahfud,
>
> dan satu lagi kl diurutin disesuaikan dengan abjad tidak jd error hasil
> formulanya heheeh
>
> kl yg susah saya buat cuman bisa nampilin satu nama orang saja, apa harus
> ditambah function lain???
>
>
>
> Wassalam
> T. MACHFUD GANI
>
>
> ------------
> *Dari:* Jan Raisin <miss.jan.raisin@
> *Kepada:* belajar-excel@
> *Dikirim:* Senin, 13 Januari 2014 20:16
> *Judul:* Re: [belajar-excel] mengambil data (multi string) dengan vlookup
>
>
> ups.. koreksi sedikit..
>
> contoh penggunaan formulanya yang benar sbb:
>
> =ConcateIf( $C$8:$C$17 , H8 , $B$8:$B$17 , "," )
>
> Salam,
>
> -Miss Jan Raisin-
>
>
> Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@
>
> Coba gunakan UDF ConcateIf
>
> syntaxnya
> =ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
>
> contoh penggunaan:
> =ConcateIf( $C$8:$C$17 , H8;$B$8:$B$17 , "," )
>
> tanda penghubung harus berada di antara kutip dua " "
>
> scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat
> dipanggil dari worksheet seperti formula excel laiinya
>
> Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As
> Range, sCon As String) As String
> Dim rgCrit As Range
> Dim sConcate As String
> Dim iCol As Integer
> Dim lRow As Long
>
> iCol = rngData.Column
> For Each rgCrit In rngCrit
> If rgCrit.Value = Crit.Value Then
> lRow = rgCrit.Row
> If sConcate = vbNullString Then
> sConcate = Cells(lRow, iCol).Value
> Else
> sConcate = sConcate & sCon & Cells(lRow, iCol).Value
> End If
> End If
> Next rgCrit
> ConcateIf = sConcate
> End Function
>
> File solusi terlampir
>
> Salam,
>
>
> -Miss Jan Raisin-
>
>
> Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@
>
>
> hehehehhehe.
> hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
>
> Regards,
> T. MACHFUD GANI
>
>
>
>
>
>
>
>
>
Tue Jan 14, 2014 12:13 am (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Sepertinya banyak BeExceller yang sedang offline.
Bisa jadi juga, karena datanya tidak berkaidah database, maka banyak
BeExceller yang kesulitan membuat formulanya.
Mungkin bisa diberikan penjelasan oleh penanya tentang kemungkinan mengubah
cara penulisan sumber datanya.
Akan lebih membantu lagi jika dijelaskan secara rinci tentang *proses
manual yang dikerjakan* untuk mendapatkan nilai-nilai hasil yang diinginkan.
Wassalam,
Kid.
2014/1/12 super mans <superm42n@gmail.com>
>
>
> Selamat Pagi
>
> Mohon bantuannya untuk merekap data hutang secara keseluruhan dan
> berdasarkan cara pembayarannya.
> File Terlampir.
>
> Terima kasih sebelumnya
>
> Wassalam.
>
>
>
Bisa jadi juga, karena datanya tidak berkaidah database, maka banyak
BeExceller yang kesulitan membuat formulanya.
Mungkin bisa diberikan penjelasan oleh penanya tentang kemungkinan mengubah
cara penulisan sumber datanya.
Akan lebih membantu lagi jika dijelaskan secara rinci tentang *proses
manual yang dikerjakan* untuk mendapatkan nilai-nilai hasil yang diinginkan.
Wassalam,
Kid.
2014/1/12 super mans <superm42n@gmail.
>
>
> Selamat Pagi
>
> Mohon bantuannya untuk merekap data hutang secara keseluruhan dan
> berdasarkan cara pembayarannya.
> File Terlampir.
>
> Terima kasih sebelumnya
>
> Wassalam.
>
>
>
Tue Jan 14, 2014 12:18 am (PST) . Posted by:
"Melyana Silaban"
Mr.HK & Mr.Kid,
Maaf dah lama nggak update ke milis.
Saat ini saya sdh menggunakan metode yg bapak-bapak berikan (kombinasi).
Saya masih memakai macro dari Mr.Kid (yg awal yg hanya single cell) &
dikombinasi formula dari Mr.HK (untuk menggabung semua data dlm 1 cell).
Terlampir ini adalah update permasalahan yg saya ingin mendapat pencerahan
dari para master.
Inti pertanyaannya:
ingin dapat improvisasi dari macro terakhir Mr.Kid spy compatible mengolah
data dgn jumlah yg relatif banyak.
ingin membuat hasil akhir dgn warna font sama dgn data sumber di kolom A
Terima kasih banyak.
Salam,
Mely
2014/1/6 hendrik karnadi <hendrikkarnadi@yahoo.com>
>
>
> Menurut pendapat saya fungsi dari Mr. Kid
> ini..(Join(Application.Transpose(.... bisa dipakai untuk menggabungkan data
> vertikal menjadi horisontal (sheet REFF ALL), sedangkan untuk
> membandingkannya dengan kolom A pada Sheets TABEL SINGLE CELL atau TABEL
> MULTI CELL maka data gabungan tsb perlu "diseragamkan" dulu dengan fungsi
> Replace sebelum dibandingkan dengan fungsi Instr.
>
> Salam,
> HK
>
>
>
>
> On Monday, 6 January 2014, 11:18, Melyana Silaban <
> melyana.2012@gmail.com> wrote:
>
> Mr.HK,
> Maaf sebelumnya, ternyata file yg saya kirim size-nya over limit sesuai
> syarat dalam milis, sehingga tidak bisa terkirim. OK, ini saya re-send file
> tsb dgn meng-compress-nya terlebih dulu. Silahkan dicoba.
>
> Terima kasih.
> Wassalam,
> Mely
>
>
>
> 2014/1/5 hendrik karnadi <hendrikkarnadi@yahoo.com>
>
>
> Hai Mely,
> Sambil menunggu anda posting ulang file yang masih error saya coba
> aplikasikan "petuah" Mr. Kid dalam file sebelumnya.
> File berikut update macronya terlampir (aplikasi dijalankan pada sheet
> VBA).
> Terima kasih kepada Mr. Kid yang telah memberikan pencerahan.[image: *:)
> happy]
>
> Salam,
> HK
>
>
> On Sunday, 5 January 2014, 18:09, Melyana Silaban <
> melyana.2012@gmail.com> wrote:
>
> Mr.HK,
> Sebetulnya saya sdh mencoba beberapa tips dari Mr.Kid, tapi untuk macronya
> masih belum dicoba. Saya masih explorer di excel formulanya Mr.Kid. Macro
> saya masih follow dari Mr.HK, ketika syntax saya update untuk menambahkan
> cell di C(syntax " Range("CX")"). Saya menemui kendala ternyata penambahan
> in terbatas hingga cell ke 68 (untuk cell C69 dst error). Akurasi
> pengolahan sudah OK jika data hanya maximal 68 cell. Karena keterbatasan
> kemampuan saya, akhirnya sementara saya gunakan tips gabungan dari Mr.Kid
> Mr.HK. Proses untuk membuat data referensi dalam satu cell saya follow
> formula Mr.Kid(bukan yg pivottable) sedangkan untuk compare data kedua
> kolom, saya gunakan macro dasar dari Mr.HK.
> Terlampir adalah contoh percobaan dari saya. Dan syukur-syukur jika ada
> tambahan ilmu yg bisa saya peroleh dari bapak-bapak sekalian.
>
> Terima kasih.
> Wassalam
> Mely
>
> --- Mods ---
> File lampiran dibatasi 250KB. File lampiran yang lebih dari 250KB akan
> dilepas dari email.
> Silakan posting (reply) file lampiran yang sesuai peraturan milis (max
> 250KB).
> ----------------
>
>
>
>
> 2014/1/3 hendrik karnadi <hendrikkarnadi@yahoo.com>
>
>
> Hai Mely,
> Sdh coba update pake macronya Mr. Kid ?
> Kl sdh, boleh dong dishare.
>
> Salam,
> HK
>
>
>
>
>
>
>
>
>
>
>
Maaf dah lama nggak update ke milis.
Saat ini saya sdh menggunakan metode yg bapak-bapak berikan (kombinasi).
Saya masih memakai macro dari Mr.Kid (yg awal yg hanya single cell) &
dikombinasi formula dari Mr.HK (untuk menggabung semua data dlm 1 cell).
Terlampir ini adalah update permasalahan yg saya ingin mendapat pencerahan
dari para master.
Inti pertanyaannya:
ingin dapat improvisasi dari macro terakhir Mr.Kid spy compatible mengolah
data dgn jumlah yg relatif banyak.
ingin membuat hasil akhir dgn warna font sama dgn data sumber di kolom A
Terima kasih banyak.
Salam,
Mely
2014/1/6 hendrik karnadi <hendrikkarnadi@
>
>
> Menurut pendapat saya fungsi dari Mr. Kid
> ini..(Join(Applicat
> vertikal menjadi horisontal (sheet REFF ALL), sedangkan untuk
> membandingkannya dengan kolom A pada Sheets TABEL SINGLE CELL atau TABEL
> MULTI CELL maka data gabungan tsb perlu "diseragamkan&
> Replace sebelum dibandingkan dengan fungsi Instr.
>
> Salam,
> HK
>
>
>
>
> On Monday, 6 January 2014, 11:18, Melyana Silaban <
> melyana.2012@
>
> Mr.HK,
> Maaf sebelumnya, ternyata file yg saya kirim size-nya over limit sesuai
> syarat dalam milis, sehingga tidak bisa terkirim. OK, ini saya re-send file
> tsb dgn meng-compress-
>
> Terima kasih.
> Wassalam,
> Mely
>
>
>
> 2014/1/5 hendrik karnadi <hendrikkarnadi@
>
>
> Hai Mely,
> Sambil menunggu anda posting ulang file yang masih error saya coba
> aplikasikan "petuah" Mr. Kid dalam file sebelumnya.
> File berikut update macronya terlampir (aplikasi dijalankan pada sheet
> VBA).
> Terima kasih kepada Mr. Kid yang telah memberikan pencerahan.[
> happy]
>
> Salam,
> HK
>
>
> On Sunday, 5 January 2014, 18:09, Melyana Silaban <
> melyana.2012@
>
> Mr.HK,
> Sebetulnya saya sdh mencoba beberapa tips dari Mr.Kid, tapi untuk macronya
> masih belum dicoba. Saya masih explorer di excel formulanya Mr.Kid. Macro
> saya masih follow dari Mr.HK, ketika syntax saya update untuk menambahkan
> cell di C(syntax " Range("
> in terbatas hingga cell ke 68 (untuk cell C69 dst error). Akurasi
> pengolahan sudah OK jika data hanya maximal 68 cell. Karena keterbatasan
> kemampuan saya, akhirnya sementara saya gunakan tips gabungan dari Mr.Kid
> Mr.HK. Proses untuk membuat data referensi dalam satu cell saya follow
> formula Mr.Kid(bukan yg pivottable) sedangkan untuk compare data kedua
> kolom, saya gunakan macro dasar dari Mr.HK.
> Terlampir adalah contoh percobaan dari saya. Dan syukur-syukur jika ada
> tambahan ilmu yg bisa saya peroleh dari bapak-bapak sekalian.
>
> Terima kasih.
> Wassalam
> Mely
>
> --- Mods ---
> File lampiran dibatasi 250KB. File lampiran yang lebih dari 250KB akan
> dilepas dari email.
> Silakan posting (reply) file lampiran yang sesuai peraturan milis (max
> 250KB).
> ------------
>
>
>
>
> 2014/1/3 hendrik karnadi <hendrikkarnadi@
>
>
> Hai Mely,
> Sdh coba update pake macronya Mr. Kid ?
> Kl sdh, boleh dong dishare.
>
> Salam,
> HK
>
>
>
>
>
>
>
>
>
>
>
Tue Jan 14, 2014 2:24 am (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Error disebabkan karena typo dalam mengisi input parameter setiap function
yang digunakan dalam baris sNames = blabla
Coba diubah menjadi :
sNames = "," & _
LCase( _
Replace( _
Join( _
Application.WorksheetFunction.Transpose( _
Sheets("VBA").Range( _
"E5" _
,
Sheets("VBA").Range("E5").End(xlDown) _
) _
) _
, "," _
) _
, ", " _
, "," _
) _
) _
& ","
Wassalam,
Kid.
2014/1/14 Melyana Silaban <melyana.2012@gmail.com>
>
>
> Mr.HK & Mr.Kid,
> Maaf dah lama nggak update ke milis.
> Saat ini saya sdh menggunakan metode yg bapak-bapak berikan (kombinasi).
> Saya masih memakai macro dari Mr.Kid (yg awal yg hanya single cell) &
> dikombinasi formula dari Mr.HK (untuk menggabung semua data dlm 1 cell).
>
> Terlampir ini adalah update permasalahan yg saya ingin mendapat pencerahan
> dari para master.
> Inti pertanyaannya:
> ingin dapat improvisasi dari macro terakhir Mr.Kid spy compatible mengolah
> data dgn jumlah yg relatif banyak.
> ingin membuat hasil akhir dgn warna font sama dgn data sumber di kolom A
> Terima kasih banyak.
>
> Salam,
> Mely
>
>
> 2014/1/6 hendrik karnadi <hendrikkarnadi@yahoo.com>
>
>>
>>
>> Menurut pendapat saya fungsi dari Mr. Kid
>> ini..(Join(Application.Transpose(.... bisa dipakai untuk menggabungkan data
>> vertikal menjadi horisontal (sheet REFF ALL), sedangkan untuk
>> membandingkannya dengan kolom A pada Sheets TABEL SINGLE CELL atau TABEL
>> MULTI CELL maka data gabungan tsb perlu "diseragamkan" dulu dengan fungsi
>> Replace sebelum dibandingkan dengan fungsi Instr.
>>
>> Salam,
>> HK
>>
>>
>>
>>
>>
>> On Monday, 6 January 2014, 11:18, Melyana Silaban <
>> melyana.2012@gmail.com> wrote:
>>
>> Mr.HK,
>> Maaf sebelumnya, ternyata file yg saya kirim size-nya over limit sesuai
>> syarat dalam milis, sehingga tidak bisa terkirim. OK, ini saya re-send file
>> tsb dgn meng-compress-nya terlebih dulu. Silahkan dicoba.
>>
>> Terima kasih.
>> Wassalam,
>> Mely
>>
>>
>>
>> 2014/1/5 hendrik karnadi <hendrikkarnadi@yahoo.com>
>>
>>
>> Hai Mely,
>> Sambil menunggu anda posting ulang file yang masih error saya coba
>> aplikasikan "petuah" Mr. Kid dalam file sebelumnya.
>> File berikut update macronya terlampir (aplikasi dijalankan pada sheet
>> VBA).
>> Terima kasih kepada Mr. Kid yang telah memberikan pencerahan.[image: *:)
>> happy]
>>
>> Salam,
>> HK
>>
>>
>> On Sunday, 5 January 2014, 18:09, Melyana Silaban <
>> melyana.2012@gmail.com> wrote:
>>
>> Mr.HK,
>> Sebetulnya saya sdh mencoba beberapa tips dari Mr.Kid, tapi untuk
>> macronya masih belum dicoba. Saya masih explorer di excel formulanya
>> Mr.Kid. Macro saya masih follow dari Mr.HK, ketika syntax saya update untuk
>> menambahkan cell di C(syntax " Range("CX")"). Saya menemui kendala ternyata
>> penambahan in terbatas hingga cell ke 68 (untuk cell C69 dst error).
>> Akurasi pengolahan sudah OK jika data hanya maximal 68 cell. Karena
>> keterbatasan kemampuan saya, akhirnya sementara saya gunakan tips gabungan
>> dari Mr.Kid Mr.HK. Proses untuk membuat data referensi dalam satu cell saya
>> follow formula Mr.Kid(bukan yg pivottable) sedangkan untuk compare data
>> kedua kolom, saya gunakan macro dasar dari Mr.HK.
>> Terlampir adalah contoh percobaan dari saya. Dan syukur-syukur jika ada
>> tambahan ilmu yg bisa saya peroleh dari bapak-bapak sekalian.
>>
>> Terima kasih.
>> Wassalam
>> Mely
>>
>> --- Mods ---
>> File lampiran dibatasi 250KB. File lampiran yang lebih dari 250KB akan
>> dilepas dari email.
>> Silakan posting (reply) file lampiran yang sesuai peraturan milis (max
>> 250KB).
>> ----------------
>>
>>
>>
>>
>> 2014/1/3 hendrik karnadi <hendrikkarnadi@yahoo.com>
>>
>>
>> Hai Mely,
>> Sdh coba update pake macronya Mr. Kid ?
>> Kl sdh, boleh dong dishare.
>>
>> Salam,
>> HK
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>
>
yang digunakan dalam baris sNames = blabla
Coba diubah menjadi :
sNames = "," & _
LCase( _
Replace( _
Join( _
Application.
Sheets("
"E5" _
,
Sheets("
) _
) _
, "," _
) _
, ", " _
, "," _
) _
) _
& ","
Wassalam,
Kid.
2014/1/14 Melyana Silaban <melyana.2012@
>
>
> Mr.HK & Mr.Kid,
> Maaf dah lama nggak update ke milis.
> Saat ini saya sdh menggunakan metode yg bapak-bapak berikan (kombinasi).
> Saya masih memakai macro dari Mr.Kid (yg awal yg hanya single cell) &
> dikombinasi formula dari Mr.HK (untuk menggabung semua data dlm 1 cell).
>
> Terlampir ini adalah update permasalahan yg saya ingin mendapat pencerahan
> dari para master.
> Inti pertanyaannya:
> ingin dapat improvisasi dari macro terakhir Mr.Kid spy compatible mengolah
> data dgn jumlah yg relatif banyak.
> ingin membuat hasil akhir dgn warna font sama dgn data sumber di kolom A
> Terima kasih banyak.
>
> Salam,
> Mely
>
>
> 2014/1/6 hendrik karnadi <hendrikkarnadi@
>
>>
>>
>> Menurut pendapat saya fungsi dari Mr. Kid
>> ini..(Join(Applicat
>> vertikal menjadi horisontal (sheet REFF ALL), sedangkan untuk
>> membandingkannya dengan kolom A pada Sheets TABEL SINGLE CELL atau TABEL
>> MULTI CELL maka data gabungan tsb perlu "diseragamkan&
>> Replace sebelum dibandingkan dengan fungsi Instr.
>>
>> Salam,
>> HK
>>
>>
>>
>>
>>
>> On Monday, 6 January 2014, 11:18, Melyana Silaban <
>> melyana.2012@
>>
>> Mr.HK,
>> Maaf sebelumnya, ternyata file yg saya kirim size-nya over limit sesuai
>> syarat dalam milis, sehingga tidak bisa terkirim. OK, ini saya re-send file
>> tsb dgn meng-compress-
>>
>> Terima kasih.
>> Wassalam,
>> Mely
>>
>>
>>
>> 2014/1/5 hendrik karnadi <hendrikkarnadi@
>>
>>
>> Hai Mely,
>> Sambil menunggu anda posting ulang file yang masih error saya coba
>> aplikasikan "petuah" Mr. Kid dalam file sebelumnya.
>> File berikut update macronya terlampir (aplikasi dijalankan pada sheet
>> VBA).
>> Terima kasih kepada Mr. Kid yang telah memberikan pencerahan.[
>> happy]
>>
>> Salam,
>> HK
>>
>>
>> On Sunday, 5 January 2014, 18:09, Melyana Silaban <
>> melyana.2012@
>>
>> Mr.HK,
>> Sebetulnya saya sdh mencoba beberapa tips dari Mr.Kid, tapi untuk
>> macronya masih belum dicoba. Saya masih explorer di excel formulanya
>> Mr.Kid. Macro saya masih follow dari Mr.HK, ketika syntax saya update untuk
>> menambahkan cell di C(syntax " Range("
>> penambahan in terbatas hingga cell ke 68 (untuk cell C69 dst error).
>> Akurasi pengolahan sudah OK jika data hanya maximal 68 cell. Karena
>> keterbatasan kemampuan saya, akhirnya sementara saya gunakan tips gabungan
>> dari Mr.Kid Mr.HK. Proses untuk membuat data referensi dalam satu cell saya
>> follow formula Mr.Kid(bukan yg pivottable) sedangkan untuk compare data
>> kedua kolom, saya gunakan macro dasar dari Mr.HK.
>> Terlampir adalah contoh percobaan dari saya. Dan syukur-syukur jika ada
>> tambahan ilmu yg bisa saya peroleh dari bapak-bapak sekalian.
>>
>> Terima kasih.
>> Wassalam
>> Mely
>>
>> --- Mods ---
>> File lampiran dibatasi 250KB. File lampiran yang lebih dari 250KB akan
>> dilepas dari email.
>> Silakan posting (reply) file lampiran yang sesuai peraturan milis (max
>> 250KB).
>> ------------
>>
>>
>>
>>
>> 2014/1/3 hendrik karnadi <hendrikkarnadi@
>>
>>
>> Hai Mely,
>> Sdh coba update pake macronya Mr. Kid ?
>> Kl sdh, boleh dong dishare.
>>
>> Salam,
>> HK
>>
>>
>>
>>
>>
>>
>>
>>
>>
>>
>
>
Tue Jan 14, 2014 12:23 am (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Jika Anda bisa membuatnya di Access tanpa VBA, maka Anda bisa membuatnya di
Excel.
Relationship di Access bisa didekati dengan array formula.
Anda juga bisa menggunakan query di Excel.
Ketika Anda bekerja dengan banyak file (setara dengan multi mdb di Access),
biasanya membutuhkan VBA (seperti VBA Excel atau VBA Access) untuk memutus
link antar file (antar db di access).
Wassalam,
Kid.
2014/1/13 T. Machfud G <teuku.machfud@yahoo.com>
>
>
> mas kid,jaisin dan hendrik makasih atas jawabannya.
> msh bingung sih, setelah saya pikir2 emang harusnya sy buat di acces
> (gabung lg di milist sebelah hahahahhaha)
> di excell lebih sulit sepertinya..
> untuk sekarang sy input manual aj dulu...tp ada yg mau saya tanyakan lagi
> (next email :D )
>
> Wassalam,
> T. MACHFUD GANI
>
>
> ------------------------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.com>
> *Kepada:* BeExcel <belajar-excel@yahoogroups.com>
> *Dikirim:* Jumat, 10 Januari 2014 16:35
> *Judul:* Re: [belajar-excel] merubah sheet yg punya ketergantungan dengan
> file excel yg lain menjadi value/string biasa
>
>
> Hai Machfud,
>
> Asumsi bahwa kalimat "datanya di ambil dari sebuah database excel"
> menunjukkan adanya tabel berkaidah database yang sebut saja bernama file DB.
> Jika file lain (misal file A) saat ini merujuknya dengan link formula ke
> file DB, maka coba save as file A menjadi bernama lain seperti
> File_Salinan_A. Hasil Save As masih akan ada link formulanya. Kemudian pada
> file hasil save as itu (yang masih terbuka),
> ke ribbon Data -> group Connections -> klik Edit Link -> pilih satu-satu
> dari daftar link -> pencet Break Link -> OK sampai semua link hilang dari
> daftar. Save file dan email ke pihak lain.
>
> Jika output di file lain tersebut bisa disusun dengan pivot table, maka
> opsi save data with file dalam pivot options bisa membuat file ber-pivot
> tadi bisa di kirim ke pihak lain dengan pesan agar tidak melakukan refresh
> data atau refresh all arau refresh pada pivot table.
> Coretan tentang pivot table dimulai disini<http://excel-mr-kid.blogspot.com/2013/04/pivot-table-1-kenalan.html>
> .
>
> Jika memungkinkan menggunakan fitur Get External Data, maka data
> connection dari file output lain ke sumber data akan menampilkan values
> dari query data yang disusun. Kemudian bisa dikirim ke pihak lain dengan
> pesan agar tidak melakukan refresh all atau refresh data pada tabel hasil
> query.
> Coretan tentang Get External Data dimulai disini<http://excel-mr-kid.blogspot.com/2011/04/get-external-data-01-introduction.html>
> .
>
> Wassalam,
> Kid.
>
>
>
> 2014/1/10 T. Machfud G <teuku.machfud@yahoo.com>
>
>
> dear all,
>
> saya penghuni baru salam kenal dulu buat teman2 :D
> jadi gini ada yg saya mau tanyakan..... saya punya file yg datanya di
> ambil dari sebuah database excel.
> dan data final ini (hanya coloum/fields/records yg diperlukan) mau saya
> email.... sedangkan file2 database (pendukung) ada di saya.
> gimana caranya biar data final ini tidak kacau ketika saya email atau di
> copy am orang lain
> tanpa database/file pendukung laiinnya.
>
> terus gimana caranya
> misal saya punya database dan terdiri dari beberapa sheet (misal)
> kalau saya mau buat workbook baru...gimana caranya menampilkan data2 yg
> saya mau inginkan
> pada workbook(sheet) yang baru.....
>
> maaf kl terlalu umum pertanyaannya...
>
>
>
> Regards,
> T. MACHFUD GANI
>
>
>
>
>
>
Excel.
Relationship di Access bisa didekati dengan array formula.
Anda juga bisa menggunakan query di Excel.
Ketika Anda bekerja dengan banyak file (setara dengan multi mdb di Access),
biasanya membutuhkan VBA (seperti VBA Excel atau VBA Access) untuk memutus
link antar file (antar db di access).
Wassalam,
Kid.
2014/1/13 T. Machfud G <teuku.machfud@
>
>
> mas kid,jaisin dan hendrik makasih atas jawabannya.
> msh bingung sih, setelah saya pikir2 emang harusnya sy buat di acces
> (gabung lg di milist sebelah hahahahhaha)
> di excell lebih sulit sepertinya..
> untuk sekarang sy input manual aj dulu...tp ada yg mau saya tanyakan lagi
> (next email :D )
>
> Wassalam,
> T. MACHFUD GANI
>
>
> ------------
> *Dari:* Mr. Kid <mr.nmkid@gmail.
> *Kepada:* BeExcel <belajar-excel@
> *Dikirim:* Jumat, 10 Januari 2014 16:35
> *Judul:* Re: [belajar-excel] merubah sheet yg punya ketergantungan dengan
> file excel yg lain menjadi value/string biasa
>
>
> Hai Machfud,
>
> Asumsi bahwa kalimat "datanya di ambil dari sebuah database excel"
> menunjukkan adanya tabel berkaidah database yang sebut saja bernama file DB.
> Jika file lain (misal file A) saat ini merujuknya dengan link formula ke
> file DB, maka coba save as file A menjadi bernama lain seperti
> File_Salinan_
> file hasil save as itu (yang masih terbuka),
> ke ribbon Data -> group Connections -> klik Edit Link -> pilih satu-satu
> dari daftar link -> pencet Break Link -> OK sampai semua link hilang dari
> daftar. Save file dan email ke pihak lain.
>
> Jika output di file lain tersebut bisa disusun dengan pivot table, maka
> opsi save data with file dalam pivot options bisa membuat file ber-pivot
> tadi bisa di kirim ke pihak lain dengan pesan agar tidak melakukan refresh
> data atau refresh all arau refresh pada pivot table.
> Coretan tentang pivot table dimulai disini<http://excel-
> .
>
> Jika memungkinkan menggunakan fitur Get External Data, maka data
> connection dari file output lain ke sumber data akan menampilkan values
> dari query data yang disusun. Kemudian bisa dikirim ke pihak lain dengan
> pesan agar tidak melakukan refresh all atau refresh data pada tabel hasil
> query.
> Coretan tentang Get External Data dimulai disini<http://excel-
> .
>
> Wassalam,
> Kid.
>
>
>
> 2014/1/10 T. Machfud G <teuku.machfud@
>
>
> dear all,
>
> saya penghuni baru salam kenal dulu buat teman2 :D
> jadi gini ada yg saya mau tanyakan....
> ambil dari sebuah database excel.
> dan data final ini (hanya coloum/fields/
> email.... sedangkan file2 database (pendukung) ada di saya.
> gimana caranya biar data final ini tidak kacau ketika saya email atau di
> copy am orang lain
> tanpa database/file pendukung laiinnya.
>
> terus gimana caranya
> misal saya punya database dan terdiri dari beberapa sheet (misal)
> kalau saya mau buat workbook baru...gimana caranya menampilkan data2 yg
> saya mau inginkan
> pada workbook(sheet) yang baru.....
>
> maaf kl terlalu umum pertanyaannya.
>
>
>
> Regards,
> T. MACHFUD GANI
>
>
>
>
>
>
Tue Jan 14, 2014 12:26 am (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Boleh tahu seperti apa text file yang dibuka dengan Excel tersebut?
Atau bagaimana cara Anda membuka text file tersebut di Excel ?
Wassalam,
Kid.
2014/1/13 Emi <emilestariklcc@yahoo.com>
>
>
>
> Teman dan Guru BeExcel,
> Saya punya data yang diimport dari text file lalu di paste ke excel.
> Masalahnya data nya tidak berada di kolum yang betul disebabkan ada text
> yang panjang telah melebihi kolumnya sendiri.
> Hasil yang diinginkan ialah
> 1. Menghapus semua heading yang tidak perlu.
> 2. Amaun yang pertama di data asli adalah amaun cash, seterusnya amaun
> cheque, Return cheque, Advance.
> 3. Keempat empat kolumn itu di jumlahkan di kolumn Total.
> 4. Membuat autonumbering bagi setiap row di table hasil
> Terima kasih.
> -Emi Lestari
>
>
>
>
>
>
Atau bagaimana cara Anda membuka text file tersebut di Excel ?
Wassalam,
Kid.
2014/1/13 Emi <emilestariklcc@
>
>
>
> Teman dan Guru BeExcel,
> Saya punya data yang diimport dari text file lalu di paste ke excel.
> Masalahnya data nya tidak berada di kolum yang betul disebabkan ada text
> yang panjang telah melebihi kolumnya sendiri.
> Hasil yang diinginkan ialah
> 1. Menghapus semua heading yang tidak perlu.
> 2. Amaun yang pertama di data asli adalah amaun cash, seterusnya amaun
> cheque, Return cheque, Advance.
> 3. Keempat empat kolumn itu di jumlahkan di kolumn Total.
> 4. Membuat autonumbering bagi setiap row di table hasil
> Terima kasih.
> -Emi Lestari
>
>
>
>
>
>
Tue Jan 14, 2014 12:36 am (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Hai Nang,
Coba setting account di thunderbird seperti di link ini :
http://help.yahoo.com/kb/index?page=content&y=PROD_MAIL_ML&locale=en_GB&id=SLN4724
atau disini :
http://www.ghacks.net/2013/10/10/access-yahoo-mail-using-pop3-imap/
Kalau pakai POP3, pastikan untuk mencentang yang kira-kira berbunyi keep
email in inbox atau server gitu, supaya ndak dihapus dari server email.
Wassalam,
Kid.
2014/1/13 Nang Agus <nangagoez@yahoo.co.id>
>
>
> Asalamualaikumwarahmatullah
>
> Rekan-rekan belajar excel, mohon pencerahannya. terakhir kali saya
> menerima email dari belajar-excel group melalui POP email Yahoo.co.idadalah tanggal 10 Desember 2013. semenjak itu saya sudah tidak menerima
> email lagi. bagaimana caranya agar saya dapat menerima email dari
> belajar-excel melalui POP. saat ini saya menggunakan mozila ThunderBird.
> Jika harus membuka email melalui web browser rasanya memerlukan banyak
> waktu, karena tidak hanya satu alamat email yang harus saya buka.
> Terima kasih
>
> Wasalamualaikum warah matullah.
>
>
>
Coba setting account di thunderbird seperti di link ini :
http://help.
atau disini :
http://www.ghacks.
Kalau pakai POP3, pastikan untuk mencentang yang kira-kira berbunyi keep
email in inbox atau server gitu, supaya ndak dihapus dari server email.
Wassalam,
Kid.
2014/1/13 Nang Agus <nangagoez@yahoo.
>
>
> Asalamualaikumwarah
>
> Rekan-rekan belajar excel, mohon pencerahannya. terakhir kali saya
> menerima email dari belajar-excel group melalui POP email Yahoo.co.idadalah tanggal 10 Desember 2013. semenjak itu saya sudah tidak menerima
> email lagi. bagaimana caranya agar saya dapat menerima email dari
> belajar-excel melalui POP. saat ini saya menggunakan mozila ThunderBird.
> Jika harus membuka email melalui web browser rasanya memerlukan banyak
> waktu, karena tidak hanya satu alamat email yang harus saya buka.
> Terima kasih
>
> Wasalamualaikum warah matullah.
>
>
>
Tue Jan 14, 2014 12:43 am (PST) . Posted by:
"Bagus" bagus4bls
Hai Machfud;
Pakai kolom bantu boleh ya..
File terlampir
Wassalam
~ Bagus ~
----- Original Message -----
From: T. Machfud G
To: belajar-excel@yahoogroups.com
Sent: Tuesday, January 14, 2014 10:32 AM
Subject: Bls: [belajar-excel] mengambil data (multi string) dengan vlookup
Dear all,
makasih ya jawabannya.
tp kl colom nya di urutin dari (kecil-besar atau sebaliknya) jd error ni
tp msh bingung, apa gk ada cara yg lebih simple
msh blom ngerti udf..
ini saya lampirkan dummy yg baru ya
jd ada 1 club disukai oleh orang yg berbeda2
nha misal gini
juventus - mahfud
juventus - ardie
asroma - jack
persija - jack
acmilan - ayah
nha gimana caranya dalam kolom kriteria saya ketik juventus output dr vlookupnya jd
"mahfud,ardie"
dan satu lagi kl diurutin disesuaikan dengan abjad tidak jd error hasil formulanya heheeh
kl yg susah saya buat cuman bisa nampilin satu nama orang saja, apa harus ditambah function lain???
Wassalam
T. MACHFUD GANI
----------------------------------------------------------
Dari: Jan Raisin <miss.jan.raisin@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Senin, 13 Januari 2014 20:16
Judul: Re: [belajar-excel] mengambil data (multi string) dengan vlookup
ups.. koreksi sedikit..
contoh penggunaan formulanya yang benar sbb:
=ConcateIf( $C$8:$C$17 , H8 , $B$8:$B$17 , "," )
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
Coba gunakan UDF ConcateIf
syntaxnya
=ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
contoh penggunaan:
=ConcateIf( $C$8:$C$17 , H8;$B$8:$B$17 , "," )
tanda penghubung harus berada di antara kutip dua " "
scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat dipanggil dari worksheet seperti formula excel laiinya
Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As Range, sCon As String) As String
Dim rgCrit As Range
Dim sConcate As String
Dim iCol As Integer
Dim lRow As Long
iCol = rngData.Column
For Each rgCrit In rngCrit
If rgCrit.Value = Crit.Value Then
lRow = rgCrit.Row
If sConcate = vbNullString Then
sConcate = Cells(lRow, iCol).Value
Else
sConcate = sConcate & sCon & Cells(lRow, iCol).Value
End If
End If
Next rgCrit
ConcateIf = sConcate
End Function
File solusi terlampir
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@yahoo.com> menulis:
hehehehhehe...penyakit lama lupa
hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
Regards,
T. MACHFUD GANI
Pakai kolom bantu boleh ya..
File terlampir
Wassalam
~ Bagus ~
----- Original Message -----
From: T. Machfud G
To: belajar-excel@
Sent: Tuesday, January 14, 2014 10:32 AM
Subject: Bls: [belajar-excel] mengambil data (multi string) dengan vlookup
Dear all,
makasih ya jawabannya.
tp kl colom nya di urutin dari (kecil-besar atau sebaliknya) jd error ni
tp msh bingung, apa gk ada cara yg lebih simple
msh blom ngerti udf..
ini saya lampirkan dummy yg baru ya
jd ada 1 club disukai oleh orang yg berbeda2
nha misal gini
juventus - mahfud
juventus - ardie
asroma - jack
persija - jack
acmilan - ayah
nha gimana caranya dalam kolom kriteria saya ketik juventus output dr vlookupnya jd
"mahfud,
dan satu lagi kl diurutin disesuaikan dengan abjad tidak jd error hasil formulanya heheeh
kl yg susah saya buat cuman bisa nampilin satu nama orang saja, apa harus ditambah function lain???
Wassalam
T. MACHFUD GANI
------------
Dari: Jan Raisin <miss.jan.raisin@
Kepada: belajar-excel@
Dikirim: Senin, 13 Januari 2014 20:16
Judul: Re: [belajar-excel] mengambil data (multi string) dengan vlookup
ups.. koreksi sedikit..
contoh penggunaan formulanya yang benar sbb:
=ConcateIf( $C$8:$C$17 , H8 , $B$8:$B$17 , "," )
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 20.13, Jan Raisin <miss.jan.raisin@
Coba gunakan UDF ConcateIf
syntaxnya
=ConcateIf( range_criteria , criteria , range_data , tanda_penghubung )
contoh penggunaan:
=ConcateIf( $C$8:$C$17 , H8;$B$8:$B$17 , "," )
tanda penghubung harus berada di antara kutip dua " "
scriptnya ditulis di dalam sebuah modul dengan scope Public agar dapat dipanggil dari worksheet seperti formula excel laiinya
Public Function ConcateIf(rngCrit As Range, Crit As Range, rngData As Range, sCon As String) As String
Dim rgCrit As Range
Dim sConcate As String
Dim iCol As Integer
Dim lRow As Long
iCol = rngData.Column
For Each rgCrit In rngCrit
If rgCrit.Value = Crit.Value Then
lRow = rgCrit.Row
If sConcate = vbNullString Then
sConcate = Cells(lRow, iCol).Value
Else
sConcate = sConcate & sCon & Cells(lRow, iCol).Value
End If
End If
Next rgCrit
ConcateIf = sConcate
End Function
File solusi terlampir
Salam,
-Miss Jan Raisin-
Pada 13 Januari 2014 16.33, T. Machfud G <teuku.machfud@
hehehehhehe.
hari ini email ada 3 semuanya lupa attach file nya kwkwkwk
Regards,
T. MACHFUD GANI
GROUP FOOTER MESSAGE
=====================================================================
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com
berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Untuk memudahkan tim penyusun materi Belajar Excel yang lebih sesuai kebutuhan member, silakan ungkapkan permasalahan yang kerap ditemui dalam menggunakan Excel sehari-hari atau hal-hal yang ingin dipelajari dalam jangka dekat ini. Mohon diprioritaskan dari yang sering ditemui sampai yang ingin dipelajari.
Isi sesuai kelompoknya (fitur-fitur, formula-formula tertentu yang masih membingungkan, otomasi atau pemrograman dalam Excel [Macro - VBA], hal lainnya yang membuat Anda kesulitan dalam mempelajari Excel).
Boleh mengisi berulang kali untuk menambah uneg-uneg yang ingin diungkapkan.
Link untuk menuangkan seluruh uneg-uneg tersebut ada di :
http://tech.groups.yahoo.com/group/belajar-excel/database?method=addRecord&tbl=3
=====================================================================
Langkah kecil Anda dalam mengisi database bisa menjadi langkah pertama yang bermanfaat besar untuk kita semua.
=====================================================================
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com
berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------
Tidak ada komentar:
Posting Komentar