Jumat, 25 Mei 2012

[belajar-excel] Digest Number 1626

Messages In This Digest (22 Messages)

1a.
Re: Formula terbilang From: Rara Wilis
1b.
Re: Formula terbilang From: zainul_ulum[at]yahoo[dot]com
1c.
Bls: [belajar-excel] Formula terbilang From: Joe Dien
1d.
Re: Formula terbilang From: Rara Wilis
1e.
Re: Formula terbilang From: Rara Wilis
1f.
Bls: [belajar-excel] Formula terbilang From: Joe Dien
2a.
Bls: [belajar-excel] Menampilkan Secara Otomatis From: depi Hariyanto
3a.
Re: Menampilkan Secara Otomatis From: bagus
4a.
Menjumlah dari cell yang berisi tanda From: guru muda
4b.
Re: Menjumlah dari cell yang berisi tanda From: Markonah
4c.
Re: Menjumlah dari cell yang berisi tanda From: dwint ruswanto
5a.
Simpan file sesuai dgn nama sheet From: Iskandar Caca
5b.
Re: Simpan file sesuai dgn nama sheet From: Markonah
5c.
Fw: [belajar-excel] Simpan file sesuai dgn nama sheet From: hendrik karnadi
6.
Protect durasi file From: Yusril Ramadani
7a.
pengelompokan status From: yosse yasman
7b.
Re: pengelompokan status From: jokendil@rocketmail.com
7c.
Bls: [belajar-excel] pengelompokan status From: ghozi alkatiri
7d.
Re: pengelompokan status From: dwint ruswanto
7e.
Re: pengelompokan status From: yosse yasman
7f.
Re: pengelompokan status From: jokendil@rocketmail.com
8.
mengabung ListBox dg OptButton From: Kusnadi Bin zain

Messages

1a.

Re: Formula terbilang

Posted by: "Rara Wilis" ra2wilis@gmail.com   rr_wilis

Thu May 24, 2012 12:43 am (PDT)



kalau membicarakan *workbook yg akan diurus makronya *
mbok ya jangan dikirim sebagai *XLSX* Oom...
XLSM atau XLSB lah...

di OnLine_Shared_Folder mbak siti "About Terbilang"; saat ini ada 13 files
'Terbilang'
file yg mana yg anda pakai ??

atau:
ubahlah makronya, secra garis besar sbb
-- cari bagian yg mengurusi pecahan
-- cari cara pembulatannya
-- mungkin dengan Fungsi Int (di VBA tidak ada RoundDown)
-- gantilah dengan Fungsi Round

*

*
*2012/5/24 Joe Dien <shimano02@ymail.com>
*
>
> * *
>
> *Dear Master Exceler....
>
> setelah saya coba praktikan untuk case terbilang ini. sya coba ambil link
> dari mba I'haps/.. masalahnya adalah : untuk Angka dibelakang koma, apakah
> bisa di baca oleh rumus terbilang menjadi angka bulat,
> (terlampir)
>
> Mohon Pencerahannya.
>
> Warm Regards,
> Joedien
> *
>
1b.

Re: Formula terbilang

Posted by: "zainul_ulum[at]yahoo[dot]com" zainul_ulum@yahoo.com   zainul_ulum

Thu May 24, 2012 1:05 am (PDT)



Kalo tidak pakai makro, silahkan dicoba file terlampir
-zainul-

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com]
On Behalf Of Rara Wilis
Sent: Thursday, May 24, 2012 2:43 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Formula terbilang

 
kalau membicarakan workbook yg akan diurus makronya 
mbok ya jangan dikirim sebagai XLSX Oom...  
XLSM atau XLSB lah...

di OnLine_Shared_Folder mbak siti "About Terbilang"; saat ini ada 13 files
'Terbilang'
file yg mana yg anda pakai ??

atau:
ubahlah makronya, secra garis besar sbb
-- cari bagian yg mengurusi pecahan
-- cari cara pembulatannya 
-- mungkin  dengan Fungsi Int (di VBA tidak ada RoundDown)
-- gantilah dengan Fungsi Round

2012/5/24 Joe Dien <shimano02@ymail.com>
Dear Master Exceler....

setelah saya coba praktikan untuk case terbilang ini. sya coba ambil link
dari mba I'haps/.. masalahnya adalah : untuk Angka dibelakang koma, apakah
bisa di baca oleh rumus terbilang menjadi angka bulat,
(terlampir)

Mohon Pencerahannya.

Warm Regards,
Joedien

1c.

Bls: [belajar-excel] Formula terbilang

Posted by: "Joe Dien" shimano02@ymail.com   shimano02@ymail.com

Thu May 24, 2012 3:03 am (PDT)



Dear Mba Rara,

Mohon Maaf saya belum maphum dengan dunia makro... makanya ketika saya buka file tsb. dan cocok dg case saya. maka saya copy paste makronya. akan tetapi masalahnya rumus terbilang tersebut tidak mau membaca angka pecahan seperti contoh terlampir.....

mohon bantuannya dari para suhu....

warm Regards,

________________________________
Dari: Rara Wilis <ra2wilis@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 24 Mei 2012 14:43
Judul: Re: [belajar-excel] Formula terbilang


 
kalau membicarakan workbook yg akan diurus makronya 
mbok ya jangan dikirim sebagai XLSX Oom...  
XLSM atau XLSB lah...

di OnLine_Shared_Folder mbak siti "About Terbilang"; saat ini ada 13 files 'Terbilang'
file yg mana yg anda pakai ??

atau:
ubahlah makronya, secra garis besar sbb
-- cari bagian yg mengurusi pecahan
-- cari cara pembulatannya 
-- mungkin  dengan Fungsi Int (di VBA tidak ada RoundDown)
-- gantilah dengan Fungsi Round

2012/5/24 Joe Dien <shimano02@ymail.com>

>Dear Master Exceler....
>
>setelah saya coba praktikan untuk case terbilang ini. sya coba ambil link dari mba I'haps/.. masalahnya adalah : untuk Angka dibelakang koma, apakah bisa di baca oleh rumus terbilang menjadi angka bulat,
>(terlampir)
>
>Mohon Pencerahannya.
>
>Warm Regards,
>Joedien
>
>
1d.

Re: Formula terbilang

Posted by: "Rara Wilis" ra2wilis@gmail.com   rr_wilis

Thu May 24, 2012 3:16 am (PDT)



perbaikan:

Function Terbilang(Bilangan As Double) As String
'==== siti Vi <Villager.girl@Gmail.com>,===
Dim Bil As String, T As String, i As Integer
Dim A(19) As String, P(9) As String, L(3) As String
Dim Dwi As Byte, T1 As Byte, T2 As Byte, T3 As Byte
A(1) = "Satu": A(2) = "Dua": A(3) = "Tiga"
A(4) = "Empat": A(5) = "Lima": A(6) = "Enam"
A(7) = "Tujuh": A(8) = "Delapan": A(9) = "Sembilan":
A(10) = "Sepuluh": A(11) = "Sebelas": A(12) = "Dua Belas"
A(13) = "Tiga Belas": A(14) = "Empat Belas": A(15) = "Lima Belas"
A(16) = "Enam Belas": A(17) = "Tujuh Belas": A(18) = "Delapan Belas"
A(19) = "sembilan Belas"
P(0) = "": P(2) = "Dua Puluh": P(3) = "Tiga Puluh"
P(4) = "Empat Puluh": P(5) = "Lima Puluh": P(6) = "Enam Puluh"
P(7) = "Tujuh Puluh": P(8) = "Delapan Puluh": P(9) = "Sembilan Puluh"
L(0) = "Ribu": L(1) = "Juta"
L(2) = "Milyar": L(3) = "Triliun"
If Bilangan > 10 ^ 15 - 1 Then Terbilang = "#error, max 15 digit": Exit
Function
'------------------------------
*Bilangan = Round(Bilangan, 0)*
*Bil = Trim(Str(Abs(Bilangan)))*
'------------------------------
If CDbl(Bil) = 0 Then
T = "nol "
Else
i = 0
Do
Bil = "000" + Bil
Dwi = CByte(Right(Bil, 2))
If (Dwi > 0) And (Dwi < 20) Then
T = IIf((Bilangan < 2000 And i = 1), "se", A(Dwi) + " ") + T
Else
T3 = CByte(Right(Bil, 1))
If (T3 > 0) Then T = A(T3) + " " + T
T2 = CByte(Left(Right(Bil, 2), 1))
If (T2 > 0) Then T = P(T2) + " " + T
End If
T1 = CByte(Left(Right(Bil, 3), 1))
If (T1 = 1) Then T = "seratus " + T
If (T1 > 1) Then T = A(T1) + " ratus " + T
Bil = Left(Bil, Len(Bil) - 3)
If (CDbl(Bil) > 0) Then
T = IIf(CInt(Right(Bil, 3)) = 0, "", L(i) + " ") + T
i = i + 1
End If
Loop While ((CDbl(Bil) > 0) And (i < 5))
End If
Terbilang = Trim(T)
End Function

2012/5/24 Joe Dien <shimano02@ymail.com>

> **
>
>
> Dear Mba Rara,
>
> Mohon Maaf saya belum maphum dengan dunia makro... makanya ketika saya
> buka file tsb. dan cocok dg case saya. maka saya copy paste makronya. akan
> tetapi masalahnya rumus terbilang tersebut tidak mau membaca angka pecahan
> seperti contoh terlampir.....
>
> mohon bantuannya dari para suhu....
>
> warm Regards,
>
> ------------------------------
> *Dari:* Rara Wilis <ra2wilis@gmail.com>
> *Kepada:* belajar-excel@yahoogroups.com
> *Dikirim:* Kamis, 24 Mei 2012 14:43
>
> *Judul:* Re: [belajar-excel] Formula terbilang
>
>
> kalau membicarakan *workbook yg akan diurus makronya *
> mbok ya jangan dikirim sebagai *XLSX* Oom...
> XLSM atau XLSB lah...
>
>
1e.

Re: Formula terbilang

Posted by: "Rara Wilis" ra2wilis@gmail.com   rr_wilis

Thu May 24, 2012 3:43 am (PDT)



sekedar info saja
sebetulnya pemilihan file *tidak terlalu cucok dengan keperluan bapak*
karena di bari 1 shet "TESTING" jelas tertulis: *"PECAHAN DIHILANGKAN"*
(BUKAN : "Pecahan Dibulatan" )

Perbaikan makro (agar cocok dgn keperluan bapak, sudah dikirim beberapa
menit y.l.
atau jika tidak diterima bapak padat mengunduh file:
ctv_Terbilang Baru (V2).xlsm <https://www.box.com/s/aed0b2886c946a221cff>

a/n mbak siti kami ucapkan Terima kasih atas pemakaian shared file kami.

2012/5/24 Joe Dien <shimano02@ymail.com>

> **
> Dear Mba Rara,
> Mohon Maaf saya belum maphum dengan dunia makro... makanya ketika saya
> buka file tsb. dan cocok dg case saya. maka saya copy paste makronya. akan
> tetapi masalahnya rumus terbilang tersebut tidak mau membaca angka pecahan
> seperti contoh terlampir.....
> mohon bantuannya dari para suhu....
> warm Regards,
>
>
1f.

Bls: [belajar-excel] Formula terbilang

Posted by: "Joe Dien" shimano02@ymail.com   shimano02@ymail.com

Thu May 24, 2012 9:43 pm (PDT)



Dear Mba Rara & Mba Siti

Terima kasih rumusnya sudah dapat saya gunakan. 
semga sgala apa yg sudah di ajarkan dan share berguna bagi kami dan teman2 lainnya.

Warm Regards,
Joedien

________________________________
Dari: Rara Wilis <ra2wilis@gmail.com>
Dikirim: Kamis, 24 Mei 2012 17:43
 
sekedar info saja
sebetulnya pemilihan file tidak terlalu cucok dengan keperluan bapak
karena di bari 1 shet "TESTING" jelas tertulis: "PECAHAN DIHILANGKAN"
(BUKAN :  "Pecahan Dibulatan" )

Perbaikan makro (agar cocok dgn keperluan bapak, sudah dikirim beberapa menit y.l.
atau jika tidak diterima bapak padat mengunduh file:
ctv_Terbilang Baru (V2).xlsm

a/n mbak siti kami ucapkan Terima kasih atas pemakaian shared file kami.

2a.

Bls: [belajar-excel] Menampilkan Secara Otomatis

Posted by: "depi Hariyanto" depi.hari_yanto@yahoo.co.id   depi.hari_yanto

Thu May 24, 2012 1:06 am (PDT)



Dear All,

Terima kasih atas sosuli yang begitu berharga.
sedikit kendala untuk membuat page dikarenakan pada kolom B sudah terisi Formula, page yang tampil tidak sesuai dengan yang diingikan yang seharusnya Page : 1  of  2

bagai mana supaya page tersebut sesuai dengan yang diinginkan ..?

file terlampir.

________________________________
Dari: Markonah <markonatul@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 24 Mei 2012 7:11
Judul: Re: [belajar-excel] Menampilkan Secara Otomatis


 
Jika menggunakan formula, yg dapat anda kerjakan hanya NOMOR-URUT-nya saja
formula ditulis di B7 ke bawah
=IF(LEN(E7)>0;TEXT(ROW()-6;"000");"")

memformat range (misal : border) tidak dapat diaplikasikan dengan formula;
hanya bisa dilakukan dengan metoda yg ada di menu-menu / tools di Ribbon Excel
Hal ini sebaiknya dimaklumi oleh para pemakai Excel.

Dalam kasus ini, pemberian border dapat dilakukan melalui Conditional Formatting
formula kondisinya (didalam fitur conditional formatting):  =LEN($B7)>0

2012/5/23 depi Hariyanto <depi.hari_yanto@yahoo.co.id>

>dear pakar excel,
>mohon bantuannya, bagai mana formula atau macro supaya nomor urut dan baris tampil secara otomatis pada saat menginput pada kolom yang/baris yang telah ditentukan ..?
>ma'af, sebelumnya sy pernah menanyakan ini tapi penginputan berdasarkan Date, tapi bagai mana jika menggunakan text atau angka ..?
>terlampir excel pertanyaannya.
>terima kasih sebelumnya untuk tanggapan serta bantuaannya.
>salam
>Depi Hariyanto
3a.

Re: Menampilkan Secara Otomatis

Posted by: "bagus" bagus@kingjim.co.id   bagus4bls

Thu May 24, 2012 1:36 am (PDT)



Block halaman yg diperlukan

File => print area => set print area


Sent from my Taxiphone®

----- Original Message -----
From: depi Hariyanto
To: belajar-excel@yahoogroups.com
Sent: Thursday, May 24, 2012 1:49 PM
Subject: Bls: [belajar-excel] Menampilkan Secara Otomatis

Dear All,

Terima kasih atas sosuli yang begitu berharga.
sedikit kendala untuk membuat page dikarenakan pada kolom B sudah terisi Formula, page yang tampil tidak sesuai dengan yang diingikan yang seharusnya Page : 1 of 2

bagai mana supaya page tersebut sesuai dengan yang diinginkan ..?

file terlampir.

----------------------------------------------------------
Dari: Markonah <markonatul@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 24 Mei 2012 7:11
Judul: Re: [belajar-excel] Menampilkan Secara Otomatis

Jika menggunakan formula, yg dapat anda kerjakan hanya NOMOR-URUT-nya saja
formula ditulis di B7 ke bawah
=IF(LEN(E7)>0;TEXT(ROW()-6;"000");"")

memformat range (misal : border) tidak dapat diaplikasikan dengan formula;
hanya bisa dilakukan dengan metoda yg ada di menu-menu / tools di Ribbon Excel
Hal ini sebaiknya dimaklumi oleh para pemakai Excel.

Dalam kasus ini, pemberian border dapat dilakukan melalui Conditional Formatting
formula kondisinya (didalam fitur conditional formatting): =LEN($B7)>0

2012/5/23 depi Hariyanto <depi.hari_yanto@yahoo.co.id>

dear pakar excel,
mohon bantuannya, bagai mana formula atau macro supaya nomor urut dan baris tampil secara otomatis pada saat menginput pada kolom yang/baris yang telah ditentukan ..?
ma'af, sebelumnya sy pernah menanyakan ini tapi penginputan berdasarkan Date, tapi bagai mana jika menggunakan text atau angka ..?
terlampir excel pertanyaannya.
terima kasih sebelumnya untuk tanggapan serta bantuaannya.
salam
Depi Hariyanto

4a.

Menjumlah dari cell yang berisi tanda

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

Thu May 24, 2012 3:49 am (PDT)



Mohon dibantu bagaimana rumusnya menjumlah cell yang berisi karakater (dalam hal ini hueuf v/V) yang ada pada sheet lain. Karakter tersebut terhubung dengan nilai/angka. Selengkapnya lihat lampiran. Problem ada pada sheet NILAI.
4b.

Re: Menjumlah dari cell yang berisi tanda

Posted by: "Markonah" markonatul@gmail.com   m_tulqiyem

Thu May 24, 2012 10:17 am (PDT)



*Menjumlah Cell berisi karakter ??* Jadi ada cell berisi karakter mau di
jumlah ya?
Misal cell nya ada 7 maka jawabnya 7 (karena orang indonesia mencampur
adukkan arti /
pengertian "Jumlah" v.s. "Cacah"). Setahu kita, *data yg dapat
dijumlah *adalah
data type
*Bilangan (Numbers).*

Mohon dicoba dengan:
=SUMIFS( PENCAPAIAN!$E$10:$E$23; PENCAPAIAN!$I$10:$I$23;'Nilai '!B12;
PENCAPAIAN!$F$10:$F$23;"v")

kolom kriteria di kolom F pada sheet pencapaian, harus ditulis dlm bentuk
*lowercase* ("v" / bukan "V")
jika ingin: boleh "v", boleh "V"; mungkin 'guru muda' dapat menggunakan
SUMPRODUCT di mana salah satu komponennya:
(LOWER(PENCAPAIAN!$F$10:$F$23)="v")

2012/5/24 guru muda <mudaguru@yahoo.com>
>
> Mohon dibantu *bagaimana rumusnya menjumlah cell yang berisi karakater
> (dalam hal ini hueuf v/V)* yang ada pada sheet lain. Karakter tersebut
> terhubung dengan nilai/angka. Selengkapnya lihat lampiran. Problem ada pada
> sheet NILAI.
>
4c.

Re: Menjumlah dari cell yang berisi tanda

Posted by: "dwint ruswanto" dwint.ruswanto@gmail.com

Thu May 24, 2012 6:29 pm (PDT)



coba kasih solusi alternatif ya..

karena saya lihat file excel yang dikirim oleh pak guru menggunakan
versinya 2003 dan menggunakan kombinasi formula Sum dan If, maka saya bantu
sedikit memodifikasi formula tersebut

jika formula awal yang digunakan oleh pak guru adalah

=SUMIF(PENCAPAIAN!F10:F13,"v",E10:E13)

maka saya ubah sedikit menjadi

{=Sum(If(PENCAPAIAN!F10:F13="v";PENCAPAIAN!E10:E13))}

semoga bermanfaat

wassalam,

-dwint-

Pada 24 Mei 2012 23:47, Markonah <markonatul@gmail.com> menulis:

> **
>
>
> *Menjumlah Cell berisi karakter ??* Jadi ada cell berisi karakter mau di
> jumlah ya?
> Misal cell nya ada 7 maka jawabnya 7 (karena orang indonesia mencampur
> adukkan arti /
> pengertian "Jumlah" v.s. "Cacah"). Setahu kita, *data yg dapat dijumlah *adalah
> data type
> *Bilangan (Numbers).*
>
> Mohon dicoba dengan:
> =SUMIFS( PENCAPAIAN!$E$10:$E$23; PENCAPAIAN!$I$10:$I$23;'Nilai '!B12;
> PENCAPAIAN!$F$10:$F$23;"v")
>
> kolom kriteria di kolom F pada sheet pencapaian, harus ditulis dlm bentuk
> *lowercase* ("v" / bukan "V")
> jika ingin: boleh "v", boleh "V"; mungkin 'guru muda' dapat menggunakan
> SUMPRODUCT di mana salah satu komponennya:
> (LOWER(PENCAPAIAN!$F$10:$F$23)="v")
>
>
>
>
> 2012/5/24 guru muda <mudaguru@yahoo.com>
>>
>> Mohon dibantu *bagaimana rumusnya menjumlah cell yang berisi karakater
>> (dalam hal ini hueuf v/V)* yang ada pada sheet lain. Karakter tersebut
>> terhubung dengan nilai/angka. Selengkapnya lihat lampiran. Problem ada pada
>> sheet NILAI.
>>
>
>
5a.

Simpan file sesuai dgn nama sheet

Posted by: "Iskandar Caca" iskandarcaca@yahoo.co.id   iskandarcaca

Thu May 24, 2012 7:38 am (PDT)



Dear master excel, Bagaimanakah cara penulisan  macro excelnya untuk permasalahan saya.Saya punya beberapa sheet dgn penamaan : sheet1 (mtm), sheet2 (wil) kemudian dr tiap sheet tersebut ingin saya simpan ke file baru sesuai dgn nama masing2 sheet tadi.Terima kasih atas bantuan para master excel, 

Tks ca2

5b.

Re: Simpan file sesuai dgn nama sheet

Posted by: "Markonah" markonatul@gmail.com   m_tulqiyem

Thu May 24, 2012 10:19 am (PDT)



Sub SaveAllSheetsAsBook()
Dim Lembar As Worksheet
For Each Lembar In ThisWorkbook.Worksheets
Lembar.Copy
ActiveWorkbook.SaveAs Filename:=Lembar.Name
ActiveWorkbook.Close
ThisWorkbook.Activate
Next
End Sub

Prosedur tsb ditulis dlm *Module Standar*
Semua workbook hasil dari makro tsb akan tersimpan se-Folder (pada folder
yg sama)
dengan folder beradanya workbook ini (workbook yg berisi makro tsb)

-Markonah-

*2012/5/24 Iskandar Caca <iskandarcaca@yahoo.co.id>
>
> , Bagaimanakah cara penulisan macro excelnya untuk permasalahan
> saya.Saya punya beberapa sheet dgn penamaan : sheet1 (mtm), sheet2 (wil)
> kemudian dr tiap sheet tersebut ingin saya simpan ke file baru sesuai dgn
> nama masing2 sheet tadi.Terima kasih atas bantuan para master excel,
>
> Tks ca2*
>
5c.

Fw: [belajar-excel] Simpan file sesuai dgn nama sheet

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

Thu May 24, 2012 7:32 pm (PDT)



Maaf. sedikit OOT.
Belakangan sering muncul nama Markonah.
Dari gaya bermacro dan penjelasannya "mirip" dengan Mbak Siti Vi (dalam penjelasan ada kata "se").
Yang bisa menjawab tentunya beliau sendiri.

Salam,
Hendrik Karnadi

----- Forwarded Message -----
From: Markonah <markonatul@gmail.com>
To: belajar-excel@yahoogroups.com
Sent: Friday, 25 May 2012, 0:14
Subject: Re: [belajar-excel] Simpan file sesuai dgn nama sheet


 
Sub SaveAllSheetsAsBook()
Dim Lembar As Worksheet
For Each Lembar In ThisWorkbook.Worksheets
Lembar.Copy
ActiveWorkbook.SaveAs Filename:=Lembar.Name
ActiveWorkbook.Close
ThisWorkbook.Activate
Next
End Sub

Prosedur tsb ditulis dlm Module Standar
Semua workbook hasil dari makro tsb akan tersimpan se-Folder (pada folder yg sama)
dengan folder beradanya workbook ini (workbook yg berisi makro tsb)

-Markonah-

2012/5/24 Iskandar Caca <iskandarcaca@yahoo.co.id>
,Bagaimanakah cara penulisan macro excelnya untuk permasalahan saya.Saya punya beberapa sheet dgn penamaan : sheet1 (mtm), sheet2 (wil) kemudian dr tiap sheet tersebut ingin saya simpan ke file baru sesuai dgn nama masing2 sheet tadi.Terima kasih atas bantuan para master excel,
>Tks ca2
6.

Protect durasi file

Posted by: "Yusril Ramadani" yusrilramadani@gmail.com   yusril_rmd

Thu May 24, 2012 8:46 am (PDT)



Dear Para pakar

Saya mau buat file tempalte yang bikin ada durasinya
biasanya saya hanya menggunakan formulasi dibawah

If Now() > #4/30/2012# Then

Sheets(1).Select

Cells.Select

Selection.ClearContents

.....

tapi saya mau bisa buat macro yang bisa bikin file template (bukan hanya
sheet) saya itu ketika di click

- tidak bisa dibuka lagi setelah tanggal tertentu dan
- harus memasukkan password setelah tanggal tertentu

Mohon pencerahannya

Terima kasih sebelumya

Salam
YR

7a.

pengelompokan status

Posted by: "yosse yasman" yosse_yasman@yahoo.com   yosse_yasman

Thu May 24, 2012 8:59 am (PDT)



Dear Master..

Mohon dibantu, kira-kira rumusnya apa ya...? Supaya saya tidak manual...

Mohon maaf kalau terlalu mendasar pertanyaannya...
Mohon dimaklumi, baru belajar excel
Terima kasih sebelumnya..

Rgds
Josse

==========================================================
Mod's Note:
Terima kasih telah ikut meramaikan milis kita ini.

Pertanyaan "Rumusnya apa - supaya tidak manual" tidak menjelaskan
masalah yg anda hadapi; padahal menuliskan masalah di badan email
adalah peraturan posting di milis ini.
Untuk y.a.d. mohon hal ini dipenuhi

Kepada members lain:
Masalah yg ditanyakan sdr Josse sesuai isi workbook:
Ingin memunculkan [STATUS], atas suatu [PEKERJAAN],
berdasarkan Tabel "Pekerjaan - Status"
==========================================================
7b.

Re: pengelompokan status

Posted by: "jokendil@rocketmail.com" jokendil@rocketmail.com   jokendil@rocketmail.com

Thu May 24, 2012 12:00 pm (PDT)



sesama pemula mas, mau belajar ikut menjawabmudah2an tidak terlalu salah
Rumus di L4 (sheet1)=VLOOKUP(TRIM(C4); $S$4:$T$16; 2; FALSE)
dicopy ke cell-cell lain di bawahnya.
hormat kami,JokoKendil

--- In belajar-excel@yahoogroups.com, yosse yasman <yosse_yasman@...>
wrote:
> Mohon dibantu, kira-kira rumusnya apa ya...? Supaya saya tidak
manual...
>
> Mohon maaf kalau terlalu mendasar pertanyaannya...
> Mohon dimaklumi, baru belajar excel
> Terima kasih sebelumnya..
>
> Rgds
> Josse

7c.

Bls: [belajar-excel] pengelompokan status

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

Thu May 24, 2012 2:17 pm (PDT)



tulis formula di  L4
=INDEX($T$4:$T$16;MATCH(C4;$S$4:$S$16;0))
copy ke bawah

Note:
tulisan data di tabel induk dan data yang ingin dirujukkan harus sama persis jangan ada selisih huruf atau spasi.
seperti penulisan data PPS YPK pada data induk dan tabel isian ada selisih spasi sehingga data tidak merujuk.
haspus spasi di akhir data C10 supaya hasilnya akurat.

waasalam

Ghozi Alkatiri

________________________________
Dari: yosse yasman <yosse_yasman@yahoo.com>
Kepada: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Dikirim: Kamis, 24 Mei 2012 19:16
Judul: [belajar-excel] pengelompokan status


 
Dear Master..

Mohon dibantu, kira-kira rumusnya apa ya...? Supaya saya tidak manual...

Mohon maaf kalau terlalu mendasar pertanyaannya...
Mohon dimaklumi, baru belajar excel
Terima kasih sebelumnya..

Rgds
Josse

==========================================================
Mod's Note:
Terima kasih telah ikut meramaikan milis kita ini.

Pertanyaan "Rumusnya apa - supaya tidak manual" tidak menjelaskan
masalah yg anda hadapi; padahal menuliskan masalah di badan email
adalah peraturan posting di milis ini.
Untuk y.a.d. mohon hal ini dipenuhi

Kepada members lain:
Masalah yg ditanyakan sdr Josse sesuai isi workbook:
Ingin memunculkan [STATUS], atas suatu [PEKERJAAN],
berdasarkan Tabel "Pekerjaan - Status"
==========================================================
7d.

Re: pengelompokan status

Posted by: "dwint ruswanto" dwint.ruswanto@gmail.com

Thu May 24, 2012 6:56 pm (PDT)



Ikut sumbang saran ya..

sudah ada masukkan dari mas Ghozi dan mas joko, berarti sudah ada 2
formula.. saya tambahin 2 lagi ya..

1. *=VLOOKUP(TRIM(C4); $S$4:$T$16; 2; FALSE) ==> *dari mas Joko
2.. =INDEX($T$4:$T$16;MATCH(C4;$S$4:$S$16;0)) ==> dari mas Ghozi

tambahan dari saya

3. {=LOOKUP(TRIM(C4);$S$4:$S$16;$T$4:$T$5)} syaratnya data harus
diurutkan dahulu secara ascending
4. {=OFFSET($S$3;MATCH(TRIM(C4);$S$4:$S$16;0);1;;)}

formula nomor 3 dan 4 adalah Array formula

wassalam,

-dwint-

Pada 25 Mei 2012 04:17, ghozi alkatiri <ghozialkatiri@yahoo.co.id> menulis:

> **
>
>
> tulis formula di L4
> =INDEX($T$4:$T$16;MATCH(C4;$S$4:$S$16;0))
> copy ke bawah
>
> Note:
> tulisan data di tabel induk dan data yang ingin dirujukkan harus sama
> persis jangan ada selisih huruf atau spasi.
> seperti penulisan data PPS YPK pada data induk dan tabel isian ada selisih
> spasi sehingga data tidak merujuk.
> haspus spasi di akhir data C10 supaya hasilnya akurat.
>
> waasalam
>
> Ghozi Alkatiri
> ------------------------------
> *Dari:* yosse yasman <yosse_yasman@yahoo.com>
> *Kepada:* "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
> *Dikirim:* Kamis, 24 Mei 2012 19:16
> *Judul:* [belajar-excel] pengelompokan status
>
>
> Dear Master..
>
> Mohon dibantu, kira-kira rumusnya apa ya...? Supaya saya tidak manual...
>
> Mohon maaf kalau terlalu mendasar pertanyaannya...
> Mohon dimaklumi, baru belajar excel
> Terima kasih sebelumnya..
>
> Rgds
> Josse
>
> ==========================================================
> Mod's Note:
> Terima kasih telah ikut meramaikan milis kita ini.
>
> Pertanyaan "Rumusnya apa - supaya tidak manual" tidak menjelaskan
> masalah yg anda hadapi; padahal menuliskan masalah di badan email
> adalah peraturan posting di milis ini.
> Untuk y.a.d. mohon hal ini dipenuhi
>
> Kepada members lain:
> Masalah yg ditanyakan sdr Josse sesuai isi workbook:
> Ingin memunculkan [STATUS], atas suatu [PEKERJAAN],
> berdasarkan Tabel "Pekerjaan - Status"
> ==========================================================
>
>
>
>
7e.

Re: pengelompokan status

Posted by: "yosse yasman" yosse_yasman@yahoo.com   yosse_yasman

Thu May 24, 2012 8:35 pm (PDT)



Terima kasih mas JokoKendil...

Problem Solved..

Tapi mohon sedikit dijelaskan sedikit tentang rumus itu, jadi saya tidak skedar kopi paste aja...

sekali lagi..
terima kasih

Rgds..
Josse

________________________________
From: "jokendil@rocketmail.com" <jokendil@rocketmail.com>
To: belajar-excel@yahoogroups.com
Sent: Thursday, May 24, 2012 11:59 AM
Subject: [belajar-excel] Re: pengelompokan status


 
sesama pemula mas, mau belajar ikut menjawab
mudah2an tidak terlalu salah

Rumus di L4 (sheet1)
=VLOOKUP(TRIM(C4); $S$4:$T$16; 2; FALSE)

dicopy ke cell-cell lain di bawahnya.

hormat kami,
JokoKendil

--- In belajar-excel@yahoogroups.com, yosse yasman <yosse_yasman@...> wrote:
> Mohon dibantu, kira-kira rumusnya apa ya...? Supaya saya tidak manual...
>
> Mohon maaf kalau terlalu mendasar pertanyaannya...
> Mohon dimaklumi, baru belajar excel
> Terima kasih sebelumnya..
>
> Rgds
> Josse

7f.

Re: pengelompokan status

Posted by: "jokendil@rocketmail.com" jokendil@rocketmail.com   jokendil@rocketmail.com

Thu May 24, 2012 9:43 pm (PDT)



Penjelasan resmi dari Micosoft sudah ada di pc anda di Help
ExcelTempatkan kursor pada salah satu huruf "VLOOKUP" pada rumus
VLOOKUPtekan simbol fx yg ada di sebelah kirinya, Muncul dialog box
'argument function'Di sini kita dapat mengetahui struktur fungsi
VLOOKUPSetiap 'kotak teks' yg harus diisi dengan argument jika di
tempati kursor, di bawahnyaakan menjelaskan : harus diisi apa dan apa
gunanyaSalah satu cara untuk menampilkan HELP lengkap klik link "Help on
this function"
Mengenai Fungsi TRIM untuk TRIM(C4) karena data anda di kolom C "tidak
bagues"; ada yg kelebihan spasi,, sehingga tidak sama persi dengan yg
ada di tabel referensi.TRIM menghilangkan kelebihan spasi dan spasi di
kanan kiri data, misalnya:=TRIM(" BUKAN Data ") menghasilkan
"BUKAN Data"
Di beberpa situs & blog; sudah banyak sekali penjelasan Fungsi VLOOKUP,
antara lain link-nya tertulis di bag bawah mail ini, semua berbahasa
indonesia, tentunya masih banyak lagi; apalagi yg ber bhs inggris..
http://sigitpn.wordpress.com/2008/03/24/fungsi-pembacaan-tabel-vlookup/
<http://sigitpn.wordpress.com/2008/03/24/fungsi-pembacaan-tabel-vlookup/\
> http://www.edisusanto.com/mengenal-formula-vlookup/
<http://www.edisusanto.com/mengenal-formula-vlookup/>
http://kursus-excel.blogspot.com/2009/02/memahami-fungsi-vlookup.html
<http://kursus-excel.blogspot.com/2009/02/memahami-fungsi-vlookup.html>
http://www.anwarsidik.com/fungsi-vlookup-pada-ms-excel-2007/
<http://www.anwarsidik.com/fungsi-vlookup-pada-ms-excel-2007/>
http://goexcel.blogspot.com/2009/01/rumus-vlookup.html
<http://goexcel.blogspot.com/2009/01/rumus-vlookup.html>
http://excelwordppt.info/microsoft-excel/fungsi-rumus-excel/
<http://excelwordppt.info/microsoft-excel/fungsi-rumus-excel/>
http://fairuzelsaid.wordpress.com/2009/11/11/modul-excel-fungsi-vlookup/
<http://fairuzelsaid.wordpress.com/2009/11/11/modul-excel-fungsi-vlookup\
/
>

--- In belajar-excel@yahoogroups.com, yosse yasman <yosse_yasman@...>
wrote:
>
> Terima kasih mas JokoKendil...
> Problem Solved..
> Tapi mohon sedikit dijelaskan sedikit tentang rumus itu, jadi saya
tidak skedar kopi paste aja...
> sekali lagi..
> terima kasih
>
> Rgds..
> Josse
>
> ________________________________
> From: "jokendil@..." jokendil@...
> Sent: Thursday, May 24, 2012 11:59 AM
> sesama pemula mas, mau belajar ikut menjawab
> mudah2an tidak terlalu salah
> Rumus di L4 (sheet1)
> =VLOOKUP(TRIM(C4); $S$4:$T$16; 2; FALSE)

8.

mengabung ListBox dg OptButton

Posted by: "Kusnadi Bin zain" kbinzain@yahoo.co.id   kbinzain

Thu May 24, 2012 8:37 pm (PDT)



Dear para pakar Exeller

Tolong file terlampir disempurnakan teman2, karena saya gak sanggup melanjutkan
Bayangan alurnya sih ada, tapi implementasi programnya gimana gt, buntuk nih otaku

Bagi yang sudah familier dg User Form, tentu hal ini mudah saja.....

Wassalam
Recent Activity
Visit Your Group
Yahoo! Groups

Mental Health Zone

Mental Health

Learn More

Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Cat Fanatics

on Yahoo! Groups

Find people who are

crazy about cats.

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