Messages In This Digest (5 Messages)

1a.: Re: Caution: Message contains Suspicious URL content Re: [belajar-ex From: Rara Wilis
1b.: Caution: Message contains Suspicious URL content Re: [belajar-excel] From: summonery

2a.: Re: Monitoring lama Simpan From: Rara Wilis

3.: Mengisi data diantara duah buah data pada baris melalui userform sec From: Ika Spesman

4.: Menghitung Komisi & kekurangan komisi setelah mencapai target From: depi Hariyanto

View All Topics | Create New Topic

Messages

1a.: Re: Caution: Message contains Suspicious URL content Re: [belajar-ex

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

Wed May 30, 2012 2:34 am (PDT)

So, syaratnya sekarang menjadi lebih jelas:
*SubsTring* hasil yg diinginkan =

diawali dengan "CASR" dan diakhiri dengan "ID"
kecuali setelah ada kedua awal dan akhir tersebut dibelakangnya ada kata
"SYARIA"
( > "SYARIA" diikutsertakan dlm SubString hasil )

Terima kasih mbak/mas Nicky

Formula perbaikan terakhir yg saya kirim
=SUBSTITUTE(MID(A4,FIND("_CASR",A4)+1,99),RIGHT(A4,IF(COUNTIF(A4,"*ID_899*"),10,4)),"")

Berikut ini Formula variasinya (memaksakan syarat "SYARIA" sehingga menjadi
lebih panjang)
=SUBSTITUTE(MID(A4,FIND("CASR",A4),99),RIGHT(A4,IF(ISNUMBER(FIND("ID_",A4))*
**NOT(COUNTIF(A4,"*SYARIA*")),10,4)),"")

*Kedua rumus tsb berasumsi bahwa*
- ID selalu 5 digit dlm POLA "899???"
- tidak ada kata lain yg diistimewakan kecuali "SYARIA"
- semua data awal selalu diakhiri ".PDF"
- Kode surat (lengkapnya) tidak lebih panjang dari 99 charakters

Kita tunggu idea lain yg lebih OK dari teman-teman BeExcellers lainnya

*Sekedar tambahan 'gak penting'*
Biasanya peng-Code-an suatu item dibuat dengan sistemasi yg ketat dan
menghasilkan
letak tiap SubCode yg sama dan panjang kode yg sama
Dengan cara itu *pen-DeCode-an* (penguraian kembali) menjadi mudah, bagi
orang maupun bagi komputer.

Semoga 2 rumus tidak terlalu panjang, dapat difahami & ada gunanya

~Rara

2012/5/30 <Niky_Nugraha@manulife.com>

> **
>
> Begini Mbak Rara,
> Mengenai mengapa yg ada kata "SYARIA" diambil sedangkan yg ada kode
> "89XXX" tidak diambil
> karena kode surat itu sebenarnya hanya yang diawali dengan "CASR" dan
> diakhiri dengan "ID" kecuali setelah ada kedua awal dan akhir tersebut
> dibelakangnya
> ada kata "SYARIA".
>
> Mohon maaf apabila penjelasan sebelumnya agak kurang, mudah-mudahan dengan
> tambahan penjelasan di bawah ini semakin jelas permasalahannya.
>
> Contohnya :
>
>
>
> Jadi kode surat yang diinginkan itu adalah kode surat yang di belakangnya
> ada kata "SYARIA" maupun tidak ada.
> Tambahan : posisi kode surat bisa diakhir nama file maupun di tengah nama
> file.
>
> Terima kasih,
>
> Niky N
>
>

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (9)
1b.: Caution: Message contains Suspicious URL content Re: [belajar-excel]

Posted by: "summonery" summonery@yahoo.com summonery

Wed May 30, 2012 5:32 am (PDT)

Coba juga,
Menggunakan fitur "Find and Replace'"
Step 1Find what : *_CASRReplace with : CASR
Step 2Find what : .PDFReplace with : kosongkan
Step 3Find what : _8*Replace with : kosongkan
Step 4Selesai?

>semoga bermanfaat

--- In belajar-excel@yahoogroups.com, Niky_Nugraha@... wrote:
>
> Begini Mbak Rara,
>
> Mengenai mengapa yg ada kata "SYARIA" diambil sedangkan yg ada kode
> "89XXX" tidak diambil
> karena kode surat itu sebenarnya hanya yang diawali dengan "CASR" dan
> diakhiri dengan "ID" kecuali setelah ada kedua awal dan akhir tersebut
> dibelakangnya
> ada kata "SYARIA".
>
> Mohon maaf apabila penjelasan sebelumnya agak kurang, mudah-mudahan
dengan
> tambahan penjelasan di bawah ini semakin jelas permasalahannya.
>
>
> Contohnya :
>
>
>
> Jadi kode surat yang diinginkan itu adalah kode surat yang di
belakangnya
> ada kata "SYARIA" maupun tidak ada.
> Tambahan : posisi kode surat bisa diakhir nama file maupun di tengah
nama
> file.
>
> Terima kasih,
>
> Niky N
>
>
>
> From:
> Rara Wilis ra2wilis@...
> To:
> belajar-excel@yahoogroups.com
> Date:
> 30-05-2012 02:40 AM
> Subject:
> Caution: Message contains Suspicious URL content Re: [belajar-excel]
> Mengambil kode surat
> Sent by:
> belajar-excel@yahoogroups.com
>
>
>
>
> Ternyata kurang awas memperhatikan CONTOH HASIL YG DIINGINKAN
> Jadi 3 rumus tsb sementara di tarik kembali - masih kurang lengkap;
masih
> salah!
>
> contoh hasil diinginkan
> Rara
>
>
> Kode surat sederhana
> Kode surat sederhana
> CASRBL0414ID
> CASRBL0414ID.PDF
> CASRBL0416A5ID
> CASRBL0416A5ID.PDF
> CASRBL0416A5UID
> CASRBL0416A5UID.PDF
> CASRBL0414ID
> CASRBL0414ID.PDF
> CASRBL0416A5ID
> CASRBL0416A5ID.PDF
> CASRBL0416A5UID
> CASRBL0416A5UID.PDF
> CASRCP0203ID
> CASRCP0203ID.PDF
> CASRCP0203ID_SYARIA
> CASRCP0203ID_SYARIA.PDF
> CASRBL043AID
> CASRBL043AID_89911.PDF
> CASRBL043AID
> CASRBL043AID_89912.PDF
> CASRBL043AID
> CASRBL043AID_89913.PDF
> CASRBL0405ID_SYARIA
> CASRBL0405ID_SYARIA.PDF
>
> moon maaf nanti akan diperbaiki
>
> akan lebih senang jika ada penjelasan dari mr./ms. Niky
> : mengapa _SYARIA diperlihatkan sedangkan _8991? dibuang
> : apakah ada kata / POLA lain selain "_SYARIA" dan "_8991?" yg harus
> diperlakukan spt itu?
>
> btw, rumus pak Bagus walaupun panjangnya 174 char hasilnya paling oke
> kita berusaha mencari rumus yg lebih pendek... (kalau bisa sih...)
>
> tks,
> ~rara
>
>
>
> 2012/5/30 Rara Wilis ra2wilis@...
> Usul Tiga rumus, sekedar variasi lain
>
> -- membuang bagian yg tak diperlukan --
> =SUBSTITUTE(A4,LEFT(A4,FIND("_CASR",A4)),"")
> yg ini memanfaatkan kebaikan hati fungsi MID
> -- mengambil bagian yg diperlukan saja --
> =MID(A4,FIND("_CASR",A4)+1,LEN(A4))
> =MID(A4,FIND("_CASR",A4)+1,99)
> sambil menunggu Oom Kid & pak Anton yg suka membawa "rumusÂ²
kejutan" &
> 'awesome'
> ~Rara
>
>
> 2012/5/29 Niky_Nugraha@...
> > Mohon bantuannya, bagaimana caranya mengambil kode surat dari kolom
> "Kode surat lengkap"
> > menjadi seperti di kolom "Kode surat sederhana"?
> > Dengan persyaratan seperti data terlampir.
> > Terima kasih,
> > Niky N
>

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

2a.: Re: Monitoring lama Simpan

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

Wed May 30, 2012 3:15 am (PDT)

Saya sampaikan titipan pesan dari Connie yg hari ini tidak bisa online sama
sekali.

*--QUOTE*
Baiklah teman, expired date = "4 BULAN" SETELAH* Tgl Terima*, maka
rumus di kolom [Keterangan] adalah sbb
="Material akan expired pada tanggal " &
TEXT(DATE(YEAR(B5),MONTH(B5)+4,DAY(B5)),"ddmmyy")
Tetapi dlm workbook yg dibuat; rumus itu ditulis oleh makro (otomatis)
pada saat kolom [Tgl Terima] di isi/diedit

Prosedur 2 (event worksheet_Change) menjadi sperti ini

Private Sub Worksheet_Change(ByVal Target As Range)
'--cde vba: Markonah May 29, 2012 / modified 30 May 2012
'--kasus BeExcel #17302
If Target.Count = 1 Then
If Target.Column = 2 Then
If Target.Row > 4 Then
If Not Target.Value = vbNullString Then
Target(1, 3).Formula = "=TODAY()"
Target(1, 5).Formula = "=DATEDIF(RC[-4],RC[-2],""m"") & ""
bulan, "" & DATEDIF(RC[-4],RC[-2],""md"") & "" hari."""
Target(1, 6).Formula = "=""Material akan expired pada
tanggal: "" & TEXT(DATE(YEAR(RC[-5]),MONTH(RC[-5])*+4*,DAY(RC[-5])
),""ddmmyy"")"
Else
Target(1, 3) = "": Target(1, 5) = "": Target(1, 6) = ""
End If
End If
End If
End If
End Sub

Sengaja menghindari fungsi *eDate* agar tidak repot menjawab pertanyaan
lanjutan
jika anda belum pasang Addin Analisy-Tool

wassalamualaikum wr wb,
-pok markonah-
penjual grabah di kampung sebelah
*
*
*--UNQUOTE *

2012/5/30 rodhy hakim <odhyz83_assasaky@yahoo.com>

> **
> Terima kasih atas penjelasannya,
> Untuk di kolom keterangan Maksimal 4 bulan, maka akan muncuk notifikasi,
> material akan expired (ddmmyy)
> Terima kasih,
>
> *From:* Markonah <markonatul@gmail.com>
> *Sent:* Tuesday, May 29, 2012 2:48 AM
>
> (I)
> Untuk memberi keterangan Expired-Date kok kita gak diberi tahu 'Aturannya'
> ya ?
> (umur suatu item dihitung sejak tgl X)
>
> (II)
> Makro ditulis di Module Sheet1; berupa dua buah Prosedur Event
>
> Makro / prosedur pertama mengatur agar jika salah satu CELL di COLUMN B *
> di-Klik-Kanan*
> *agar memunculkan Kalendar*
> *
> *
> Makro kedua mengatur agar jika kolom B diubah/diisi, - agar otomatis
> dituliskan rumus TODAY di kolom D,
>
rumus LAMA SIMPAN di kolom F dan RUMUS "embuh" di kolom G
> Makro lain (di modue userForm) mengatur perilaku Form dan Calendar,
> secara minimal
>
> Wassalam,
> *''pok markonah, penjual gudeg di gang sebelah'*
>
>

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

3.: Mengisi data diantara duah buah data pada baris melalui userform sec

Posted by: "Ika Spesman" ikaspesman@yahoo.com ikaspesman

Wed May 30, 2012 5:17 am (PDT)

Asslamualaikum WR WB,

Salam,

Mohon bantuan kepada master excel dan vba terkait beberapa pertanyaan saya berikut ini,m sebagai pelengkap saya melampirkan file sebagai pelengkap pertanyaan saya :

1. bagaimana kodevba jika saya mengisi data pada userform maka akan terisi
pada cell A9 s/d I9, misal jika pada combobox jumlah saya memilih angka 2 maka
data pertama akan terisi pada cell A9 s/d cell I9 dan data kedua akan terisi
pada cell A10 s/d cell I10 dan
seterusnya jika saya memilih jumlah 3, 4 dan seterusnya sementara cell H3 s/d H6 tetap jika No.Doc sama, dan jika No.Doc baru maka data
cell A9 s/d I9 dan seterusnya kebawah akan terhapus dan digantikan dengan data
dengan No.Doc baru tadi dan data yang sama tersimpan pada data Induk

2
. bagaimana kode VBA Jika saya menekan tombol EDIT pada userform maka akan keluar jendela baru dimana terdapat
combobox yang berisi No.Doc yang tersimpan hasil imputan data dan jika saya memilih salah satunya maka pada
userform akan tampil data sesuai No.Doc yang dipilih tadi untuk dilakukan
perubahan, hasil perubahan akan muncul pada sheet Histori dan data lama akan
tetap pada daa induk

3. bagaiman kode VBA jika kita ingin
menampilkan tanggal secara otomatis pada
texbox dan dapat diedit khusus untk admin

4.
terkait pertanyaan pertama bagaimana jika setelah saya mengimputkan data dengan
No.Doc 001 dan jika saya ingin lagi mengimputkan kelompok data baru maka secara
otomatis pada sheet1 akan terhapus datanya dan secara otomatis pula pada
userform berubah No.Doc menjadi 002 artinya No.Doc merupakan kelompok data.

Wassalam

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (1)

4.: Menghitung Komisi & kekurangan komisi setelah mencapai target

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

Wed May 30, 2012 3:57 pm (PDT)

Dear All Master Excel yang Budiman,

Terima kasih untuk jawaban dan solusi sebelumnya.

Bagai mana formula cara menghitung komisi dengan target penjualan tertentu.
Terlampir pertannyaan detailnya.

salam
Deo_Har

Back to top
Reply to sender | Reply to group | Reply via web post
Messages in this topic (1)

Create New Topic | Visit Your Group on the Web

Messages

---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

posting ke milis, kirimkan ke:
belajar-excel@yahoogroups.com

berkunjung ke web milis
http://tech.groups.yahoo.com/group/belajar-excel/messages

melihat file archive / mendownload lampiran
http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di :
http://milis-belajar-excel.1048464.n5.nabble.com/

menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com

keluar dari membership milis (UnSubscribe):
kirim mail kosong ke belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

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

EXCEL FEED

Kamis, 31 Mei 2012

[belajar-excel] Digest Number 1632

Messages In This Digest (5 Messages)

Messages

Re: Caution: Message contains Suspicious URL content Re: [belajar-ex

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

Wed May 30, 2012 2:34 am (PDT)

Caution: Message contains Suspicious URL content Re: [belajar-excel]

Posted by: "summonery" summonery@yahoo.com summonery

Wed May 30, 2012 5:32 am (PDT)

Re: Monitoring lama Simpan

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

Wed May 30, 2012 3:15 am (PDT)

Mengisi data diantara duah buah data pada baris melalui userform sec

Posted by: "Ika Spesman" ikaspesman@yahoo.com ikaspesman

Wed May 30, 2012 5:17 am (PDT)

Menghitung Komisi & kekurangan komisi setelah mencapai target

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

Wed May 30, 2012 3:57 pm (PDT)

Tidak ada komentar:

Posting Komentar

Followers

Blog Archive

About Me