Jumat, 29 November 2013

[belajar-excel] Digest Number 2669

11 New Messages

Digest #2669
1a
Memasukkan foto kedalam userform by "Aliif Akbar" aliif.akbar
1b
Re: Memasukkan foto kedalam userform [1 Attachment] by "Mr. Kid" nmkid.family@ymail.com
2b
2c
4b
Re: Menukar angka menjadi 5 digit. by "Emi" emilestariklcc
5a
Re: Menukar angka menjadi 5 digit. by "Mr. Kid" nmkid.family@ymail.com
6
Kenapa G bisa dijumlah kalau 16 Digit by "neza ibaneza" nezaibaneza

Messages

Thu Nov 28, 2013 11:03 pm (PST) . Posted by:

"Aliif Akbar" aliif.akbar

selamat siang,

dear rekan2 be excel,
mohon bantaunnya untuk bisa membantu, bagaimana cara memasukkan foto kedalamuser form, lampiran dari saya mungkin lebih jelas.

demikian, terimakasih.

salam,

Aliif Akbar

Fri Nov 29, 2013 1:36 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Hai Aliif,

Misal dalam userform ada object control image bernama imgFoto
imgFoto.picture=LoadPicture( "filefullname.jpg")

Letakkan di prosedur pemasang gambar.

Wassalam,
Kid.
On Nov 29, 2013 2:03 PM, "Aliif Akbar" <aliif.akbar@yahoo.co.id> wrote:

>
>
> selamat siang,
>
> dear rekan2 be excel,
> mohon bantaunnya untuk bisa membantu, bagaimana cara memasukkan foto
> kedalamuser form, lampiran dari saya mungkin lebih jelas.
>
> demikian, terimakasih.
>
> salam,
>
> Aliif Akbar
>
>

Fri Nov 29, 2013 12:39 am (PST) . Posted by:

"Bagus" bagus4bls

Dear Biru;

Mungkin begini:
=MAX(C3:J3)-B2

Wassalam

~ Bagus ~

----- Original Message -----
From: Lazuardi Biru
To: belajar-excel@yahoogroups.com
Sent: Friday, November 29, 2013 1:52 PM
Subject: [belajar-excel] Reminder Karyawan Habis Kontrak [1 Attachment]

salam be-excel

dear master
bagaimana membuat reminder karyawan habis kontrak
seperti file terlampir

Salam

LB

Fri Nov 29, 2013 4:02 am (PST) . Posted by:

"Lazuardi Biru" lazuardi_biru84

oke pak tapi seandainya C3:J3 datanya kosong biar menghasilkan angka nol (0) gimana
soalnya kalau C3:J3 Kosong akan menghasilkan angka  -41607

makasih

Pada Jumat, 29 November 2013 15:39, Bagus <bagus@kingjim.co.id> menulis:

 

Dear Biru;
 
Mungkin begini:
=MAX(C3:J3)-B2
 
 
Wassalam
~ Bagus~
 
----- Original Message -----
>From: Lazuardi Biru
>To: belajar-excel@yahoogroups.com
>Sent: Friday, November 29, 2013 1:52 PM
>Subject: [belajar-excel] Reminder Karyawan Habis Kontrak [1 Attachment]
>
> 
>salam be-excel
>
>
>dear master
>bagaimana membuat reminder karyawan habis kontrak
>seperti file terlampir
>
>
>
>
>Salam
>
>
>LB
>

Fri Nov 29, 2013 4:03 am (PST) . Posted by:

"Lazuardi Biru" lazuardi_biru84

sudah coba =IF(C3:J3>0,MAX(C3:J3)-$B$2,"")
tapi gak bisa

 

   lazuardi_biru84@yahoo.com

Pada , Lazuardi Biru <lazuardi_biru84@yahoo.com> menulis:

oke pak tapi seandainya C3:J3 datanya kosong biar menghasilkan angka nol (0) gimana
soalnya kalau C3:J3 Kosong akan menghasilkan angka  -41607

makasih

Pada Jumat, 29 November 2013 15:39, Bagus <bagus@kingjim.co.id> menulis:

 

Dear Biru;
 
Mungkin begini:
=MAX(C3:J3)-B2
 
 
Wassalam
~ Bagus~
 
----- Original Message -----
>From: Lazuardi Biru
>To: belajar-excel@yahoogroups.com
>Sent: Friday, November 29, 2013 1:52 PM
>Subject: [belajar-excel] Reminder Karyawan Habis Kontrak [1 Attachment]
>
> 
>salam be-excel
>
>
>dear master
>bagaimana membuat reminder karyawan habis kontrak
>seperti file terlampir
>
>
>
>
>Salam
>
>
>LB
>

Fri Nov 29, 2013 12:46 am (PST) . Posted by:

"hendrik karnadi" hendrikkarnadi

Ada contoh lampirannya Pak ?
Perintah Set SubTbl = Range(SubTbl,SubTbl.End(xlDown)) hanya bisa diterima oleh komputer apabila sebelumnya sudah ada range bernama SubTbl.

Salam,
HK

On Friday, 29 November 2013, 9:10, Ahmad Syaifullah Lubis <syaifullah@hotmail.com> wrote:

 
Mr HK,
saya jalankan program ini ada pesan/bug error sbb :
Set SubTbl = Range(SubTbl, SubTbl.End(xlDown))
sekedar mencari macro aplikatif yang bisa saya terapkan untuk kegiatan saya.
terima kasih,
ASL

________________________________
From: upiet29@yahoo.com
To: belajar-excel@yahoogroups.com
Date: Thu, 21 Nov 2013 17:48:16 -0800
Subject: Re: Bls: [belajar-excel] Membuat Rekap Invoice secara Otomatis [1 Attachment]

 

Saya coba buka bisa kok Pak.
Coba saya lampirkan lagi ya Pak.

On Friday, November 22, 2013 8:44 AM, hendrik karnadi <hendrikkarnadi@yahoo.com> wrote:

 
Koq lampirannya ga mau dibuka mba Dwi?

Salam,

HK

On Thursday, 21 November 2013, 17:01, dwi mulyaningsih <upiet29@yahoo.com> wrote:

 
Dear Pakar Excel,

Mohon bantuannya. File warisan ini sudah saya modif sesuai keinginan saya.
Tapi berhubung masih awam dengan macro dan pengcodingannya, jadi masih banyak kekurangannya.
Terlampir filenya

Terima kasih

Salam
Dwi

On Monday, November 18, 2013 3:51 PM, abinaya abinaya <abinaya_jp5@yahoo.com> wrote:

 
Salam
sekedar mencoba ya Bu
coba buat variabel baru
Dim dt as date

trus ganti fungsi date nya dengan "dt" tadi bu
misal
.[b3]= dt

On Monday, November 18, 2013 4:18 PM, dwi mulyaningsih <upiet29@yahoo.com> wrote:

 
Sudah saya ganti, tapi masih sama seperti sebelumnya

Salam
DM

On Saturday, November 16, 2013 5:39 AM, Mr. Kid <mr.nmkid@gmail.com> wrote:

 
Coba ganti Date dengan Now
Jika ingin tetap tanpa waktu, ganti Date dengan Int( Now )

Wassalam,
Kid.

2013/11/15 Liem Suliem <liemsuliem@yahoo.co.id>

> 
>saya pakai ms ofice 2007
>ada eror lagi pak
>
>
>
>
>
>
>Pada , Liem Suliem <liemsuliem@yahoo.co.id> menulis:
>
>Masukkanlah ke dalam surga dan lindungilah dia dari azab kubur dan azab neraka.
>
>
>
>
>
>Pada Kamis, 14 November 2013 21:59, hendrik karnadi <hendrikkarnadi@yahoo.com> menulis:
>
> 
>Ini file yang sudah saya coba edit seperlunya dan sudah saya tes untuk merekam.
>Kalau sdh tes dan berhasil, jangan lupa doakan beliau yang telah memberi inspirasi.
>
>
>Salam,
>HK
>
>
>
>On Thursday, 14 November 2013, 8:40, hendrik karnadi <hendrikkarnadi@yahoo.com> wrote:
>
>Ini warisan yang masih utuh (kalau istilah pajak belum terbagi).
>Saya belum ubah sedikitpun dan belum penah coba merekam, tapi nanti saya coba lihat lagi.
>
>
>Mungkin ada rekan lain yang bisa bantu menjawab.
>
>
>Salam,
>HK
>
>
>
>On Thursday, 14 November 2013, 8:23, Liem Suliem <liemsuliem@yahoo.co.id> wrote:
>
> 
>dear pak hk..
>saya coba download file ini tapi begitu saya buka terus coba input data dan tekan tombol
>Rekam Ke Tabel muncul pesan seperti terlampir.. karena kebetulan saya juga perlu.
>tapi masih buta tentang makroh.. pesan eror prin scren terlampir
>
>
>
>
>
>
>Pada Rabu, 13 November 2013 11:19, hendrik karnadi <hendrikkarnadi@yahoo.com> menulis:
>
> 
>Coba pelajari warisan mba Siti terlampir.
>
>
>Salam,
>HK
>
>
>
>On Wednesday, 13 November 2013, 10:41, dwi mulyaningsih <upiet29@yahoo.com> wrote:
>
> 
>Dear Pakar Excel,
>
>
>Mohon bantuannya, saya punya file untuk membuat invoice dengan nomor urut otomatis.
>Yang saya inginkan ketika saya klik tombol simpan maka : 
>1. Data dari invoice tersebut akan masuk ke dalam file rekap penjualan, dan 
>2. invoice tersebut juga secara otomatis akan tersimpan dalam file tersendiri. 
>
>
>Untuk yang point ke dua sudah bisa dijalankan, sedangkan point ke satu saya belum mendapatkan caranya.
>Mohon bantuannya.
>
>
>Terima kasih
>
>
>Dwi
>
>
>
>
>
>
>
>
>
>
>
>

Fri Nov 29, 2013 12:48 am (PST) . Posted by:

"Bagus" bagus4bls

Dear Emi;

Coba begini:
=TEXT(LEFT(A2,LEN(A2)-LEN(RIGHT(A2,2))-1)&RIGHT(A2,2),"00000")

Copas kebawah

Wassalam

~ Bagus ~

----- Original Message -----
From: Emi
To: belajar-excel@yahoogroups.com
Sent: Friday, November 29, 2013 2:00 PM
Subject: Re: [belajar-excel] Menukar angka menjadi 5 digit. [1 Attachment]

Teman BeExcel,
Saya ada kerjaan yg mau diselesaikan.
Apa rumusnya untuk saya menukar data asal yang ada 4, 5 atau 6 digit menjadi hanya 5 digit seperti di kol B.
Arti bagi kod tersebut.
1000- Item 1 sub code 00 di kol B di tulis 00100
10001- item 10 sub code 1 menjadi 01001
216006- item 216 subcode 6 menjadi 21606
Terima kasih
Emi

On Friday, November 29, 2013 2:15 PM, Emi <emilestariklcc@yahoo.com> wrote:

Dear Teman BeExcel,

Saya ada angka yang 4, 5 atau 6 digit.
Mau nya angka tersebut ditukar menjadi format text 5 digit.
Contoh dilampirkan.

Data Asal 5-Digit
1000 00100
1001 00101
8002 00802
8011 00811
9001 00901
9002 00902
9011 00911
10000 01000
10001 01001
10002 01002
10003 01003
10004 01004
10005 01005
10006 01006
10007 01007
10008 01008
10009 01009
10010 01010
10011 01011
216000 21600
216001 21601
216002 21602
216003 21603
216004 21604
216005 21605
Terima kasih

Emi
21606

***** Mods *****
File lampiran dilepas dari email karena melebihi ketentuan maksimal 250KB
silakan mengirim kembali file yang sudah diperkecil.

Harap diperjelas juga, digit keberapa saja yang akan dihilangkan?
apakah angka Nol pertama yang akan selalu dihilangkan?
atau ada aturan yang lain?
******************

Fri Nov 29, 2013 4:13 am (PST) . Posted by:

"Emi" emilestariklcc

Terima kasih Pak Bagus. Udah berhasil

On Friday, November 29, 2013 4:51 PM, Bagus <bagus@kingjim.co.id> wrote:

 

Dear Emi;
 
Coba begini:
=TEXT(LEFT(A2,LEN(A2)-LEN(RIGHT(A2,2))-1)&RIGHT(A2,2),"00000")
 
Copas kebawah
 
 
 
Wassalam
~ Bagus~
 
----- Original Message -----
>From: Emi
>To: belajar-excel@yahoogroups.com
>Sent: Friday, November 29, 2013 2:00 PM
>Subject: Re: [belajar-excel] Menukar angka menjadi 5 digit. [1 Attachment]
>
> 
>
>
>Teman BeExcel,
>Sayaada kerjaan yg  mau diselesaikan.
>Apa rumusnya untuk saya menukar data asal yang ada 4, 5 atau 6 digit menjadi  hanya 5 digit seperti di kol B.
>Arti bagi kod tersebut.
>1000- Item 1 sub code 00 di kol B di tulis 00100
>10001- item 10 sub code 1  menjadi 01001
>216006- item 216 subcode 6 menjadi 21606
>Terima kasih
>Emi
>
>
>
>On Friday, November 29, 2013 2:15 PM, Emi <emilestariklcc@yahoo.com> wrote:
>
> 
>Dear Teman BeExcel,
>
>
>Saya ada angka yang 4, 5 atau 6 digit.
>Mau nya angka tersebut ditukar menjadi format text 5 digit.
>Contoh dilampirkan.
>
>
>Data Asal 5-Digit
>1000 00100
>1001 00101
>8002 00802
>8011 00811
>9001 00901
>9002 00902
>9011 00911
>10000 01000
>10001 01001
>10002 01002
>10003 01003
>10004 01004
>10005 01005
>10006 01006
>10007 01007
>10008 01008
>10009 01009
>10010 01010
>10011 01011
>216000 21600
>216001 21601
>216002 21602
>216003 21603
>216004 21604
>216005 21605
>Terima kasih
>
>Emi
> 21606
>
>
>
>
>
>***** Mods *****
>File lampiran dilepas dari email karena melebihi ketentuan maksimal
250KB
>silakan mengirim kembali file yang sudah diperkecil.
>
>Harap diperjelas juga, digit keberapa saja yang akan
dihilangkan?
>apakah angka Nol pertama yang akan selalu
dihilangkan?
>atau ada aturan yang lain?
>******************
>
>
>

Fri Nov 29, 2013 12:57 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Coba:
=Text( Int( dataasal / 1000 ) *100+Mod( dataasal, 1000 ),"00000")
On Nov 29, 2013 1:14 PM, "Emi" <emilestariklcc@yahoo.com> wrote:

>
>
> Dear Teman BeExcel,
>
> Saya ada angka yang 4, 5 atau 6 digit.
> Mau nya angka tersebut ditukar menjadi format text 5 digit.
> Contoh dilampirkan.
>
> Data Asal 5-Digit 1000 00100 1001 00101 8002 00802 8011 00811 9001
> 00901 9002 00902 9011 00911 10000 01000 10001 01001 10002 01002
> 10003 01003 10004 01004 10005 01005 10006 01006 10007 01007 10008
> 01008 10009 01009 10010 01010 10011 01011 216000 21600 216001 21601
> 216002 21602 216003 21603 216004 21604 216005 21605 Terima kasih
>
> Emi
> 21606
>
>
>
>
>
> ***** Mods *****
> File lampiran dilepas dari email karena melebihi ketentuan maksimal 250KB
> silakan mengirim kembali file yang sudah diperkecil.
>
> Harap diperjelas juga, digit keberapa saja yang akan dihilangkan?
> apakah angka Nol pertama yang akan selalu dihilangkan?
> atau ada aturan yang lain?
> ******************
>
>

Fri Nov 29, 2013 4:01 am (PST) . Posted by:

"neza ibaneza" nezaibaneza

Assalamualaikum Master sekalian
Salam B-Excel

Saya punya masalah yang pernah saya tanyakan, pada sampel awal saya pake text (hasilnya bisa)
tetapi ketika memakai angka kok (Tidak bisa) 
file terlampir

Salam 
Neza

Fri Nov 29, 2013 4:02 am (PST) . Posted by:

respati007

Terlampir Data nya..

Case :
Saya mempunyai 1 workbook dengan table yang banyak yg saya inginkan di Import (copy) di New Workbook di jadikan satu kolom dengan format terlampir dan contoh hasil ny..

sudah ada coding yg saya buat.. tp bingung karena tidak sesuai...

Mohon Bantuan Para Master, Terima Kasih...
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
---------------------------------------------------------------------
Diposting oleh EXCEL FEED LEARNING di 04.38

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)