15 New Messages
Digest #2662
1b
Re: (urgent) penggunaan tanda "-" pada konversi angka ke pembacaan k by "zainul_ulum[at]yahoo[dot]com" zainul_ulum
Messages
Mon Nov 25, 2013 6:36 am (PST) . Posted by:
"rama wibi" ibianconero
teman-teman be-exceller mohon bantuannya....
pada tabel raport dengan menggunakan rumus vlookup terdapat pembacaan dari angka ke huruf, ada yg menggunakan bahasa Indonesia dan bahasa inggris. Di tabel yang bilingual ada masalah yang saya hadapi berupa, jika nilai 80
atau nilai yang belakangnya 0 maka di cell huruf juga akan kebaca nol,
jadi delapan puluh nol, itu bagaimana mengatasinya??kalau yang saya buat angka 0 nya tidak saya cantumkan hurufnya, apakah seperti itu??
selanjutnya
yg berkaitan dengan nol, untuk yg bilingual memerlukan " - " sebagai
pemisahnya, 84 maka eighty-four, jika ada nilai yang 80 maka akan kebaca
eighty-zero, adakah cara untuk penempatan tanda - jika yg dibaca 0
tidak akan terikut kedalam hasil ??
*saya sertakan gambarnya*
terima kasih
pada tabel raport dengan menggunakan rumus vlookup terdapat pembacaan dari angka ke huruf, ada yg menggunakan bahasa Indonesia dan bahasa inggris. Di tabel yang bilingual ada masalah yang saya hadapi berupa, jika nilai 80
atau nilai yang belakangnya 0 maka di cell huruf juga akan kebaca nol,
jadi delapan puluh nol, itu bagaimana mengatasinya?
selanjutnya
yg berkaitan dengan nol, untuk yg bilingual memerlukan " - " sebagai
pemisahnya, 84 maka eighty-four, jika ada nilai yang 80 maka akan kebaca
eighty-zero, adakah cara untuk penempatan tanda - jika yg dibaca 0
tidak akan terikut kedalam hasil ??
*saya sertakan gambarnya*
terima kasih
Mon Nov 25, 2013 5:05 pm (PST) . Posted by:
"zainul_ulum[at]yahoo[dot]com" zainul_ulum
Mas Rama,
silahkan dicoba file terlampir. semoga sesuai harapan.
Formula bisa sampai 12 digit angka bulat sehingga bisa juga dipakai untuk
kwitansi atau invoicing.
thanks
-zainul-
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of rama wibi
Sent: Monday, November 25, 2013 12:29 PM
To: belajar-excel@yahoogroups.com
Subject: [belajar-excel] (urgent) penggunaan tanda "-" pada konversi angka
ke pembacaan kalimat pada raport sekolah ???? [1 Attachment]
teman-teman be-exceller mohon bantuannya....
pada tabel raport dengan menggunakan rumus vlookup terdapat pembacaan dari
angka ke huruf, ada yg menggunakan bahasa Indonesia dan bahasa inggris. Di
tabel yang bilingual ada masalah yang saya hadapi berupa, jika nilai 80 atau
nilai yang belakangnya 0 maka di cell huruf juga akan kebaca nol, jadi
delapan puluh nol, itu bagaimana mengatasinya??kalau yang saya buat angka 0
nya tidak saya cantumkan hurufnya, apakah seperti itu??
selanjutnya yg berkaitan dengan nol, untuk yg bilingual memerlukan " - "
sebagai pemisahnya, 84 maka eighty-four, jika ada nilai yang 80 maka akan
kebaca eighty-zero, adakah cara untuk penempatan tanda - jika yg dibaca 0
tidak akan terikut kedalam hasil ??
*saya sertakan gambarnya*
terima kasih
silahkan dicoba file terlampir. semoga sesuai harapan.
Formula bisa sampai 12 digit angka bulat sehingga bisa juga dipakai untuk
kwitansi atau invoicing.
thanks
-zainul-
From: belajar-excel@
On Behalf Of rama wibi
Sent: Monday, November 25, 2013 12:29 PM
To: belajar-excel@
Subject: [belajar-excel] (urgent) penggunaan tanda "-" pada konversi angka
ke pembacaan kalimat pada raport sekolah ???? [1 Attachment]
teman-teman be-exceller mohon bantuannya..
pada tabel raport dengan menggunakan rumus vlookup terdapat pembacaan dari
angka ke huruf, ada yg menggunakan bahasa Indonesia dan bahasa inggris. Di
tabel yang bilingual ada masalah yang saya hadapi berupa, jika nilai 80 atau
nilai yang belakangnya 0 maka di cell huruf juga akan kebaca nol, jadi
delapan puluh nol, itu bagaimana mengatasinya?
nya tidak saya cantumkan hurufnya, apakah seperti itu??
selanjutnya yg berkaitan dengan nol, untuk yg bilingual memerlukan " - "
sebagai pemisahnya, 84 maka eighty-four, jika ada nilai yang 80 maka akan
kebaca eighty-zero, adakah cara untuk penempatan tanda - jika yg dibaca 0
tidak akan terikut kedalam hasil ??
*saya sertakan gambarnya*
terima kasih
Mon Nov 25, 2013 6:37 am (PST) . Posted by:
"Tio Adi Bayu Adjie"
Dear Pakar Excel,
Adakah caranya merubah format value yang memakai koma menjadi titik ?
Seperti contoh di bawah ini. Ini salah satu contoh dari ribuan data.
[cid:image003.jpg@01CEE9F6.53D41E40]
Total Price 2 karena Total Price dikiri formatnya koma, tapi kalau formatnya titik, ada nilainya.
Total Price 2 adalah perkalian Total Price di kiri dengan 9500.
Thanks,
Tio
Adakah caranya merubah format value yang memakai koma menjadi titik ?
Seperti contoh di bawah ini. Ini salah satu contoh dari ribuan data.
[cid:image003.jpg@
Total Price 2 karena Total Price dikiri formatnya koma, tapi kalau formatnya titik, ada nilainya.
Total Price 2 adalah perkalian Total Price di kiri dengan 9500.
Thanks,
Tio
Mon Nov 25, 2013 6:58 am (PST) . Posted by:
"Hendrik Karnadi" hendrikkarnadi
Coba cek regional settingya pak. Jika regional settingnya English(US) maka seharusnya ditulis 1358.31(pemisah ribuan berupa "," tidak ditulis), tetapi jika regional settingnya Indonesian maka seharusnya ditulis 1358,31(pemisah ribuan berupa "." tidak ditulis).
Salam,
HK
Sent from Samsung MobileTio Adi Bayu Adjie <tio.adjie@ptssb.co.id> wrote:Dear Pakar Excel,
Adakah caranya merubah format value yang memakai koma menjadi titik ?
Seperti contoh di bawah ini. Ini salah satu contoh dari ribuan data.
Total Price 2 karena Total Price dikiri formatnya koma, tapi kalau formatnya titik, ada nilainya.
Total Price 2 adalah perkalian Total Price di kiri dengan 9500.
Thanks,
Tio
Salam,
HK
Sent from Samsung MobileTio Adi Bayu Adjie <tio.adjie@ptssb.
Adakah caranya merubah format value yang memakai koma menjadi titik ?
Seperti contoh di bawah ini. Ini salah satu contoh dari ribuan data.
Total Price 2 karena Total Price dikiri formatnya koma, tapi kalau formatnya titik, ada nilainya.
Total Price 2 adalah perkalian Total Price di kiri dengan 9500.
Thanks,
Tio
Mon Nov 25, 2013 6:44 pm (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Asumsinya :
1. total price 1 bertipe text
2. nilai total price1 selalu ada 2 digit dibelakang koma (semuanya termasuk
ada ,00)
formula di total price2 :
=substitute( total_price1 , "," , "" ) / 100 * 9500
Jika tidak semua total price1 ada 2 digit dibelakang koma, coba formula :
=substitute( total_price1 , "," , "" ) * 9500 / if( left(right(
total_price1 , 3))="," , 100 , 1 )
*** Jika regional setting setempat adalah Indonesia, maka ganti karakter
koma yang tidak diapit petik dua dalam formula dengan karakter titik koma
dan pastikan karakter yang diapit oleh petik dua seperti "," tetap apa
adanya.
Wassalam,
Kid.
2013/11/25 Tio Adi Bayu Adjie <tio.adjie@ptssb.co.id>
>
>
> Dear Pakar Excel,
>
> Adakah caranya merubah format value yang memakai koma menjadi titik ?
>
> Seperti contoh di bawah ini. Ini salah satu contoh dari ribuan data.
>
> Total Price 2 karena Total Price dikiri formatnya koma, tapi kalau
> formatnya titik, ada nilainya.
>
> Total Price 2 adalah perkalian Total Price di kiri dengan 9500.
>
>
>
> Thanks,
>
> Tio
>
>
>
1. total price 1 bertipe text
2. nilai total price1 selalu ada 2 digit dibelakang koma (semuanya termasuk
ada ,00)
formula di total price2 :
=substitute( total_price1 , "," , "" ) / 100 * 9500
Jika tidak semua total price1 ada 2 digit dibelakang koma, coba formula :
=substitute( total_price1 , "," , "" ) * 9500 / if( left(right(
total_price1 , 3))="," , 100 , 1 )
*** Jika regional setting setempat adalah Indonesia, maka ganti karakter
koma yang tidak diapit petik dua dalam formula dengan karakter titik koma
dan pastikan karakter yang diapit oleh petik dua seperti "," tetap apa
adanya.
Wassalam,
Kid.
2013/11/25 Tio Adi Bayu Adjie <tio.adjie@ptssb.
>
>
> Dear Pakar Excel,
>
> Adakah caranya merubah format value yang memakai koma menjadi titik ?
>
> Seperti contoh di bawah ini. Ini salah satu contoh dari ribuan data.
>
> Total Price 2 karena Total Price dikiri formatnya koma, tapi kalau
> formatnya titik, ada nilainya.
>
> Total Price 2 adalah perkalian Total Price di kiri dengan 9500.
>
>
>
> Thanks,
>
> Tio
>
>
>
Mon Nov 25, 2013 5:02 pm (PST) . Posted by:
"Lazuardi Biru" lazuardi_biru84
DH
salam be-exceler
bisa nggak ya print untuk semua halaman menggunakan macro..
untuk lebih jelasnya file terlampir.
karenaa bingung mau jelasinya.
salam be-exceler
bisa nggak ya print untuk semua halaman menggunakan macro..
untuk lebih jelasnya file terlampir.
karenaa bingung mau jelasinya.
Mon Nov 25, 2013 5:45 pm (PST) . Posted by:
"hendrik karnadi" hendrikkarnadi
Coba codes ini:
Private Sub CmdPrint_Click()
Dim i As Integer
Range("Slip!C1") = 3
Range("Slip!I1") = 1
For i = 1 To Sheets("RekapGaji").Range("M1")
Me.PrintPreview
Range("Slip!I1") = Range("Slip!I1") + 1
Range("Slip!C1") = Range("Slip!C1") + 3
Next i
End Sub
Private Sub CommandButton1_Click()
Dim i As Integer
Range("Slip!C1") = 3
Range("Slip!I1") = 1
For i = 1 To Sheets("RekapGaji").Range("M1")
Me.PrintOut
Range("Slip!I1") = Range("Slip!I1") + 1
Range("Slip!C1") = Range("Slip!C1") + 3
Next i
End Sub
Range("Slip!I1") bukan lagi sebagai formula.
Salam,
HK
On Tuesday, 26 November 2013, 8:03, Lazuardi Biru <lazuardi_biru84@yahoo.com> wrote:
DH
salam be-exceler
bisa nggak ya print untuk semua halaman menggunakan macro..
untuk lebih jelasnya file terlampir.
karenaa bingung mau jelasinya.
Private Sub CmdPrint_Click(
Dim i As Integer
Range("
Range("
For i = 1 To Sheets("
Me.PrintPreview
Range("
Range("
Next i
End Sub
Private Sub CommandButton1_
Dim i As Integer
Range("
Range("
For i = 1 To Sheets("
Me.PrintOut
Range("
Range("
Next i
End Sub
Range("
Salam,
HK
On Tuesday, 26 November 2013, 8:03, Lazuardi Biru <lazuardi_biru84@
DH
salam be-exceler
bisa nggak ya print untuk semua halaman menggunakan macro..
untuk lebih jelasnya file terlampir.
karenaa bingung mau jelasinya.
Mon Nov 25, 2013 6:57 pm (PST) . Posted by:
"Lazuardi Biru" lazuardi_biru84
seandainya slip mau saya print per 6 orang
macro mana yang harus saya ganti pak..
apa yang ini
("Slip!
saya ganti ("Slip!
Pada Selasa, 26 November 2013 8:46, hendrik karnadi <hendrikkarnadi@
Coba codes ini:
Private Sub CmdPrint_Click(
Dim i As Integer
Range("
Range("
For i = 1 To Sheets("
Me.PrintPreview
Range("
Range("
Next i
End Sub
Private Sub CommandButton1_
Dim i As Integer
Range("
Range("
For i = 1 To Sheets("
Me.PrintOut
Range("
Range("
Next i
End Sub
Range("
Salam,
HK
On Tuesday, 26 November 2013, 8:03, Lazuardi Biru <lazuardi_biru84@
DH
salam be-exceler
bisa nggak ya print untuk semua halaman menggunakan macro..
untuk lebih jelasnya file terlampir.
karenaa bingung mau jelasinya.
Mon Nov 25, 2013 11:25 pm (PST) . Posted by:
"Lazuardi Biru" lazuardi_biru84
makasih pak..sesuai harapan
suwun..
Pada Selasa, 26 November 2013 9:57, Lazuardi Biru <lazuardi_biru84@
seandainya slip mau saya print per 6 orang
macro mana yang harus saya ganti pak..
apa yang ini
("Slip!
saya ganti ("Slip!
Pada Selasa, 26 November 2013 8:46, hendrik karnadi <hendrikkarnadi@
Coba codes ini:
Private Sub CmdPrint_Click(
Dim i As Integer
Range("
Range("
For i = 1 To Sheets("
Me.PrintPreview
Range("
Range("
Next i
End Sub
Private Sub CommandButton1_
Dim i As Integer
Range("
Range("
For i = 1 To Sheets("
Me.PrintOut
Range("
Range("
Next i
End Sub
Range("
Salam,
HK
On Tuesday, 26 November 2013, 8:03, Lazuardi Biru <lazuardi_biru84@
DH
salam be-exceler
bisa nggak ya print untuk semua halaman menggunakan macro..
untuk lebih jelasnya file terlampir.
karenaa bingung mau jelasinya.
Mon Nov 25, 2013 5:55 pm (PST) . Posted by:
"A. Zainal H." a_zainal_hilmi
Dear Para Master Be-Exceller
Mohon pencerahannya untuk problem saya ini
Saya mengcopy data di Excel 2013 dengan formula didalamnya menggunakan =TEXT(L23;"mmmm")
hasilnya adalah November
Akan tetapi apabila menggunakan excel 2007 maka hasilnya Nopember
Regional setting yang digunakan juga sama menggunakan Indonesia
Problem ini sebelumnya tidak terjadi antara excel 2007 & 2010
Mohon pencerahannya
Wassalam
Zainal
Mohon pencerahannya untuk problem saya ini
Saya mengcopy data di Excel 2013 dengan formula didalamnya menggunakan =
hasilnya adalah November
Akan tetapi apabila menggunakan excel 2007 maka hasilnya Nopember
Regional setting yang digunakan juga sama menggunakan Indonesia
Problem ini sebelumnya tidak terjadi antara excel 2007 & 2010
Mohon pencerahannya
Wassalam
Zainal
Mon Nov 25, 2013 6:15 pm (PST) . Posted by:
"Jan Raisin"
æóÚóáóíúßõãõ áÓóøáÇóãõ æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
Pak Zainal,
Jika ingin tampilannya ingin selalu no*V*ember, maka formulanya =Text(L23;"
[$-409] mmmm")
tetapi jika ingin tampilannya ingin selalu menjadi no*P*ember, maka
formulanya =Text(L23,"[$-421] mmmm")
[$-409] = setting untuk English
[$-421] = setting untuk Indonesian
berlaku untuk semua versi Excel
æóÓóøáÇóãõ Úóáóíúßõãú æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
-Miss Jan Raisin-
Pada 26 November 2013 08.43, A. Zainal H. <a_zainal_hilmi@yahoo.com>menulis:
>
>
> Dear Para Master Be-Exceller
>
> Mohon pencerahannya untuk problem saya ini
> Saya mengcopy data di Excel 2013 dengan formula didalamnya
> menggunakan =TEXT(L23;"mmmm")
> hasilnya adalah November
> Akan tetapi apabila menggunakan excel 2007 maka hasilnya Nopember
> Regional setting yang digunakan juga sama menggunakan Indonesia
> Problem ini sebelumnya tidak terjadi antara excel 2007 & 2010
> Mohon pencerahannya
>
>
>
> Wassalam
>
> *Zainal*
>
> _
>
Pak Zainal,
Jika ingin tampilannya ingin selalu no*V*ember, maka formulanya =Text(L23;"
[$-409] mmmm")
tetapi jika ingin tampilannya ingin selalu menjadi no*P*ember, maka
formulanya =Text(L23,"
[$-409] = setting untuk English
[$-421] = setting untuk Indonesian
berlaku untuk semua versi Excel
æóÓóøáÇóãõ Úóáóíúßõãú æóÑóÍúãóÉõ Çááåö æóÈóÑóßóÇÊõåõ
-Miss Jan Raisin-
Pada 26 November 2013 08.43, A. Zainal H. <a_zainal_hilmi@
>
>
> Dear Para Master Be-Exceller
>
> Mohon pencerahannya untuk problem saya ini
> Saya mengcopy data di Excel 2013 dengan formula didalamnya
> menggunakan =TEXT(L23;"
> hasilnya adalah November
> Akan tetapi apabila menggunakan excel 2007 maka hasilnya Nopember
> Regional setting yang digunakan juga sama menggunakan Indonesia
> Problem ini sebelumnya tidak terjadi antara excel 2007 & 2010
> Mohon pencerahannya
>
>
>
> Wassalam
>
> *Zainal*
>
> _
>
Mon Nov 25, 2013 6:18 pm (PST) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Bismillah...
moga-moga ndak kliru banget...
gini, pada Excel 2013 bisa jadi juga untuk Excel 365, locale Indonesia
sudah diperbaiki oleh tim Microsoft Office, dengan nama bulan ke-11 adalah
November dan abrv untuk bulan ke-8 adalah Agu
:)
Wassalamu'alaikum Wr. Wb.
Kid.
2013/11/26 Jan Raisin <miss.jan.raisin@gmail.com>
>
>
> وَعَلَيÙ'ÙƒÙم٠لسَÙ'لاَم٠وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
> Pak Zainal,
>
> Jika ingin tampilannya ingin selalu no*V*ember, maka formulanya
> =Text(L23;"[$-409] mmmm")
> tetapi jika ingin tampilannya ingin selalu menjadi no*P*ember, maka
> formulanya =Text(L23,"[$-421] mmmm")
>
> [$-409] = setting untuk English
> [$-421] = setting untuk Indonesian
>
> berlaku untuk semua versi Excel
>
> وَسَÙ'لاَم٠عَلَيÙ'ÙƒÙÙ…Ù' وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
>
> -Miss Jan Raisin-
>
>
> Pada 26 November 2013 08.43, A. Zainal H. <a_zainal_hilmi@yahoo.com>menulis:
>
>
>>
>> Dear Para Master Be-Exceller
>>
>> Mohon pencerahannya untuk problem saya ini
>> Saya mengcopy data di Excel 2013 dengan formula didalamnya
>> menggunakan =TEXT(L23;"mmmm")
>> hasilnya adalah November
>> Akan tetapi apabila menggunakan excel 2007 maka hasilnya Nopember
>> Regional setting yang digunakan juga sama menggunakan Indonesia
>> Problem ini sebelumnya tidak terjadi antara excel 2007 & 2010
>> Mohon pencerahannya
>>
>>
>>
>> Wassalam
>>
>> *Zainal*
>>
>> _
>>
>
>
moga-moga ndak kliru banget...
gini, pada Excel 2013 bisa jadi juga untuk Excel 365, locale Indonesia
sudah diperbaiki oleh tim Microsoft Office, dengan nama bulan ke-11 adalah
November dan abrv untuk bulan ke-8 adalah Agu
:)
Wassalamu'
Kid.
2013/11/26 Jan Raisin <miss.jan.raisin@
>
>
> وَعَلَيÙ'ÙƒÙم٠لسَÙ'لاَم٠وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
> Pak Zainal,
>
> Jika ingin tampilannya ingin selalu no*V*ember, maka formulanya
> =Text(L23;"
> tetapi jika ingin tampilannya ingin selalu menjadi no*P*ember, maka
> formulanya =Text(L23,"
>
> [$-409] = setting untuk English
> [$-421] = setting untuk Indonesian
>
> berlaku untuk semua versi Excel
>
> وَسَÙ'لاَم٠عَلَيÙ'ÙƒÙÙ…Ù' وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
>
> -Miss Jan Raisin-
>
>
> Pada 26 November 2013 08.43, A. Zainal H. <a_zainal_hilmi@
>
>
>>
>> Dear Para Master Be-Exceller
>>
>> Mohon pencerahannya untuk problem saya ini
>> Saya mengcopy data di Excel 2013 dengan formula didalamnya
>> menggunakan =TEXT(L23;"
>> hasilnya adalah November
>> Akan tetapi apabila menggunakan excel 2007 maka hasilnya Nopember
>> Regional setting yang digunakan juga sama menggunakan Indonesia
>> Problem ini sebelumnya tidak terjadi antara excel 2007 & 2010
>> Mohon pencerahannya
>>
>>
>>
>> Wassalam
>>
>> *Zainal*
>>
>> _
>>
>
>
Mon Nov 25, 2013 6:33 pm (PST) . Posted by:
"A. Zainal H." a_zainal_hilmi
وَعَلَيÙ'ÙƒÙم٠لسَÙ'لاَم٠وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
Miss Jan & Mr. Kid
Makasih banyak pencerahannya
Tambahan ilmu baru nih buat saya hehe
Wassalam
Zainal
Pada Selasa, 26 November 2013 10:15, Jan Raisin <miss.jan.raisin@gmail.com> menulis:
 وَعَلَيÙ'ÙƒÙم٠لسَÙ'لاَم٠وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
Pak Zainal,
Jika ingin tampilannya ingin selalu noVember, maka formulanya =Text(L23;"[$-409]mmmm";)
tetapi jika ingin tampilannya ingin selalu menjadi noPember, maka formulanya =Text(L23,"[$-421]mmmm";)
[$-409] = setting untuk English
[$-421] = setting untuk Indonesian
berlaku untuk semua versi Excel
وَسَÙ'لاَم٠عَلَيÙ'ÙƒÙÙ…Ù' وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
-Miss Jan Raisin-
Pada 26 November 2013 08.43, A. Zainal H. <a_zainal_hilmi@yahoo.com> menulis:
>
>Dear Para Master Be-Exceller
>
>
>Mohon pencerahannya untuk problem saya ini
>Saya mengcopy data di Excel 2013 dengan formula didalamnya menggunakan =TEXT(L23;"mmmm")
>hasilnya adalah November
>Akan tetapi apabila menggunakan excel 2007 maka hasilnya Nopember
>Regional setting yang digunakan juga sama menggunakan Indonesia
>Problem ini sebelumnya tidak terjadi antara excel 2007 & 2010
>Mohon pencerahannya
>
>
>
>
>Wassalam
>
>Zainal
>_
Miss Jan & Mr. Kid
Makasih banyak pencerahannya
Tambahan ilmu baru nih buat saya hehe
Wassalam
Zainal
Pada Selasa, 26 November 2013 10:15, Jan Raisin <miss.jan.raisin@
 وَعَلَيÙ'ÙƒÙم٠لسَÙ'لاَم٠وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
Pak Zainal,
Jika ingin tampilannya ingin selalu noVember, maka formulanya =Text(L23;"
tetapi jika ingin tampilannya ingin selalu menjadi noPember, maka formulanya =Text(L23,"
[$-409] = setting untuk English
[$-421] = setting untuk Indonesian
berlaku untuk semua versi Excel
وَسَÙ'لاَم٠عَلَيÙ'ÙƒÙÙ…Ù' وَرَØÙ'مَة٠الله٠وَبَرَكَاتÙÙ‡Ù
-Miss Jan Raisin-
Pada 26 November 2013 08.43, A. Zainal H. <a_zainal_hilmi@
>
>Dear Para Master Be-Exceller
>
>
>Mohon pencerahannya untuk problem saya ini
>Saya mengcopy data di Excel 2013 dengan formula didalamnya menggunakan =
>hasilnya adalah November
>Akan tetapi apabila menggunakan excel 2007 maka hasilnya Nopember
>Regional setting yang digunakan juga sama menggunakan Indonesia
>Problem ini sebelumnya tidak terjadi antara excel 2007 & 2010
>Mohon pencerahannya
>
>
>
>
>Wassalam
>
>Zainal
>_
Mon Nov 25, 2013 7:21 pm (PST) . Posted by:
"Jan Raisin"
Hai pak Iman,
coba bantu menggunakan UDF (User Defined Function atau fungsi buatan
sendiri)
syntaxnya: =CMC( rk_Code , Code , rk_Shift, Shift, rk_Date , Date ,
range_Action)
CMC = ConcatenateMultiColumns
rk_ = range kriteria
contoh penggunaan:
=CMC(tblInput[Unit No] , 'per day'!E9;tblInput[Shift] , 'per
day'!F9,tblInput[Date] , 'per day'!$D$3 , tblInput[Remark])
scriptnya sbb:
Option Explicit
Public Function CMC(rgCode As Range, xCode As Range, _
rgShift As Range, xShift As Range, _
rgDate As Range, xDate As Range, _
rgCrit As Range) As String
Dim xCd As Range
Dim sCrit As String, sSht As String
Dim lRow As Long
Dim IdxShift As Long, IdxDate As Long, IdxCrit As Long
sSht = rgCode.Worksheet.Name
IdxShift = rgShift.Column
IdxDate = rgDate.Column
IdxCrit = rgCrit.Column
For Each xCd In rgCode
If xCd.Value = xCode.Value Then
lRow = xCd.Row
If Sheets(sSht).Cells(lRow, IdxShift).Value = xShift.Value Then
If Sheets(sSht).Cells(lRow, IdxDate).Value = xDate.Value Then
If sCrit = "" Then
sCrit = Sheets(sSht).Cells(lRow, IdxCrit).Value
Else
sCrit = sCrit & ", " & Sheets(sSht).Cells(lRow,
IdxCrit).Value
End If
End If
End If
End If
Next xCd
CMC = sCrit
End Function
file terlampir...
oia... Shiftnya harus ditulis sama persis, tidak boleh yang satu ditulis
Day sedangkan yang lainnya D saja
Salam,
-Miss Jan Raisin-
Pada 25 November 2013 11.47, <idz.iman@yahoo.com> menulis:
>
>
> salam Mr. Kid
>
> Kali ini saya ingin bertanya, bagaimana cara untuk menggabungkan cell yang
> berisi aktifitas (text) dari beberapa kegiatan di colum Remark & keterangan
> pada sheet "OH Rent" dalam periode 1 shift.
> contoh file terlampir Mr. Kid.
>
> Mohon pencerahannya Mr. Kid
>
> Salam,
> Iman DZ
>
>
coba bantu menggunakan UDF (User Defined Function atau fungsi buatan
sendiri)
syntaxnya: =CMC( rk_Code , Code , rk_Shift, Shift, rk_Date , Date ,
range_Action)
CMC = ConcatenateMultiCol
rk_ = range kriteria
contoh penggunaan:
=CMC(tblInput[
day'!F9,
scriptnya sbb:
Option Explicit
Public Function CMC(rgCode As Range, xCode As Range, _
rgShift As Range, xShift As Range, _
rgDate As Range, xDate As Range, _
rgCrit As Range) As String
Dim xCd As Range
Dim sCrit As String, sSht As String
Dim lRow As Long
Dim IdxShift As Long, IdxDate As Long, IdxCrit As Long
sSht = rgCode.Worksheet.
IdxShift = rgShift.Column
IdxDate = rgDate.Column
IdxCrit = rgCrit.Column
For Each xCd In rgCode
If xCd.Value = xCode.Value Then
lRow = xCd.Row
If Sheets(sSht)
If Sheets(sSht)
If sCrit = "" Then
sCrit = Sheets(sSht)
Else
sCrit = sCrit & ", " & Sheets(sSht)
IdxCrit).Value
End If
End If
End If
End If
Next xCd
CMC = sCrit
End Function
file terlampir...
oia... Shiftnya harus ditulis sama persis, tidak boleh yang satu ditulis
Day sedangkan yang lainnya D saja
Salam,
-Miss Jan Raisin-
Pada 25 November 2013 11.47, <idz.iman@yahoo.
>
>
> salam Mr. Kid
>
> Kali ini saya ingin bertanya, bagaimana cara untuk menggabungkan cell yang
> berisi aktifitas (text) dari beberapa kegiatan di colum Remark & keterangan
> pada sheet "OH Rent" dalam periode 1 shift.
> contoh file terlampir Mr. Kid.
>
> Mohon pencerahannya Mr. Kid
>
> Salam,
> Iman DZ
>
>
Mon Nov 25, 2013 8:00 pm (PST) . Posted by:
idz.iman
Hei Miss Jan Raisin
Sebelumnya terima kasih banyak atas masukan & solusinya, saya akan pelajari dulu ya miss JR karena sama baru mempelajari VBA dan belum mengerti arti-arti dari script ... semoga saya bisa pahami dulu ...
sekali lagi terima kasih, jadi semangat untuk belajar lagi. :)
salam
Iman DZ
***** Mods *****
mumpung pak Iman ada keinginan untuk belajar VBA,
coba baca-baca tulisannya om Kid mulai dari link :
http://b-excel.blogspot.com/2013/06/belajarvba-000-kenalan.html http://b-excel.blogspot.com/2013/06/belajarvba-000-kenalan.html
dibuat untuk yang belum kenal VBA sama sekali.
***** Mods *****
---In belajar-excel@yahoogroups.com, wrote:
Hai pak Iman,
coba bantu menggunakan UDF (User Defined Function atau fungsi buatan sendiri)
syntaxnya: =CMC( rk_Code , Code , rk_Shift, Shift, rk_Date , Date , range_Action)
CMC = ConcatenateMultiColumns
rk_ = range kriteria
contoh penggunaan:
=CMC(tblInput[Unit No] , 'per day'!E9;tblInput[Shift] , 'per day'!F9,tblInput[Date] , 'per day'!$D$3 , tblInput[Remark])
scriptnya sbb:
Option Explicit
Public Function CMC(rgCode As Range, xCode As Range, _
rgShift As Range, xShift As Range, _
rgDate As Range, xDate As Range, _
rgCrit As Range) As String
Dim xCd As Range
Dim sCrit As String, sSht As String
Dim lRow As Long
Dim IdxShift As Long, IdxDate As Long, IdxCrit As Long
sSht = rgCode.Worksheet.Name http://rgCode.Worksheet.Name
IdxShift = rgShift.Column
IdxDate = rgDate.Column
IdxCrit = rgCrit.Column
For Each xCd In rgCode
If xCd.Value = xCode.Value Then
lRow = xCd.Row
If Sheets(sSht).Cells(lRow, IdxShift).Value = xShift.Value Then
If Sheets(sSht).Cells(lRow, IdxDate).Value = xDate.Value Then
If sCrit = "" Then
sCrit = Sheets(sSht).Cells(lRow, IdxCrit).Value
Else
sCrit = sCrit & ", " & Sheets(sSht).Cells(lRow, IdxCrit).Value
End If
End If
End If
End If
Next xCd
CMC = sCrit
End Function
file terlampir...
oia... Shiftnya harus ditulis sama persis, tidak boleh yang satu ditulis Day sedangkan yang lainnya D saja
Salam,
-Miss Jan Raisin-
Pada 25 November 2013 11.47, <idz.iman@... mailto:idz.iman@...> menulis:
salam Mr. Kid
Kali ini saya ingin bertanya, bagaimana cara untuk menggabungkan cell yang berisi aktifitas (text) dari beberapa kegiatan di colum Remark & keterangan pada sheet "OH Rent" dalam periode 1 shift.
contoh file terlampir Mr. Kid.
Mohon pencerahannya Mr. Kid
Salam,
Iman DZ
Sebelumnya terima kasih banyak atas masukan & solusinya, saya akan pelajari dulu ya miss JR karena sama baru mempelajari VBA dan belum mengerti arti-arti dari script ... semoga saya bisa pahami dulu ...
sekali lagi terima kasih, jadi semangat untuk belajar lagi. :)
salam
Iman DZ
***** Mods *****
mumpung pak Iman ada keinginan untuk belajar VBA,
coba baca-baca tulisannya om Kid mulai dari link :
http://b-excel.
dibuat untuk yang belum kenal VBA sama sekali.
***** Mods *****
---In belajar-excel@
Hai pak Iman,
coba bantu menggunakan UDF (User Defined Function atau fungsi buatan sendiri)
syntaxnya: =CMC( rk_Code , Code , rk_Shift, Shift, rk_Date , Date , range_Action)
CMC = ConcatenateMultiCol
rk_ = range kriteria
contoh penggunaan:
=CMC(tblInput[
scriptnya sbb:
Option Explicit
Public Function CMC(rgCode As Range, xCode As Range, _
rgShift As Range, xShift As Range, _
rgDate As Range, xDate As Range, _
rgCrit As Range) As String
Dim xCd As Range
Dim sCrit As String, sSht As String
Dim lRow As Long
Dim IdxShift As Long, IdxDate As Long, IdxCrit As Long
sSht = rgCode.Worksheet.
IdxShift = rgShift.Column
IdxDate = rgDate.Column
IdxCrit = rgCrit.Column
For Each xCd In rgCode
If xCd.Value = xCode.Value Then
lRow = xCd.Row
If Sheets(sSht)
If Sheets(sSht)
If sCrit = "" Then
sCrit = Sheets(sSht)
Else
sCrit = sCrit & ", " & Sheets(sSht)
End If
End If
End If
End If
Next xCd
CMC = sCrit
End Function
file terlampir...
oia... Shiftnya harus ditulis sama persis, tidak boleh yang satu ditulis Day sedangkan yang lainnya D saja
Salam,
-Miss Jan Raisin-
Pada 25 November 2013 11.47, <idz.iman@
salam Mr. Kid
Kali ini saya ingin bertanya, bagaimana cara untuk menggabungkan cell yang berisi aktifitas (text) dari beberapa kegiatan di colum Remark & keterangan pada sheet "OH Rent" dalam periode 1 shift.
contoh file terlampir Mr. Kid.
Mohon pencerahannya Mr. Kid
Salam,
Iman DZ
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