15 New Messages
Digest #2392
3
FW: [belajar-excel] vba code untuk transfer data lewat usb. by "zainul_ulum@yahoo.com" zainul_ulum
4b
Re: cara buat pencarian berdasarkan nim atau nama pada excel by "eyeshield_ic@rocketmail.com" eyeshield_ic@rocketmail.com
Messages
Sat Jun 29, 2013 7:40 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
USB nya berisi apa mas ? atau sebarang USB kosong yang dijadikan media
storage saja ?
Apakah data dari alatnya ataukah aplikasi untuk komunikasi dengan alatnya ?
Wassalam,
Kid.
2013/6/29 zainul_ulum@yahoo.com <zainul_ulum@yahoo.com >
> **
>
>
> Be-excel
> saya sering menerima data yg dikumpulkan dengan datacolector misal dari
> alat gps dan alat survey. Biasanya data tersebut didownload terlebih dahulu
> lewat USb komputer dengan software khusus dengan melakukan setting
> communication port.
>
> Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> menggunakan software bantu? Atau vba codenya seperti apa untuk melakukan
> koneksi hardware melalui usb
>
> wassalam
> -zainul-
> #dikirim bukan dari blackberry apalagi iphone#
>
>
storage saja ?
Apakah data dari alatnya ataukah aplikasi untuk komunikasi dengan alatnya ?
Wassalam,
Kid.
2013/6/29 zainul_ulum@
> **
>
>
> Be-excel
> saya sering menerima data yg dikumpulkan dengan datacolector misal dari
> alat gps dan alat survey. Biasanya data tersebut didownload terlebih dahulu
> lewat USb komputer dengan software khusus dengan melakukan setting
> communication port.
>
> Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> menggunakan software bantu? Atau vba codenya seperti apa untuk melakukan
> koneksi hardware melalui usb
>
> wassalam
> -zainul-
> #dikirim bukan dari blackberry apalagi iphone#
>
>
Sat Jun 29, 2013 7:53 am (PDT) . Posted by:
"De Premor"
kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
Kira-kira begitu
Rgds,
[dp]
On 29/06/2013 21:30, zainul_ulum@yahoo.com wrote:
>
> Be-excel
> saya sering menerima data yg dikumpulkan dengan datacolector misal
> dari alat gps dan alat survey. Biasanya data tersebut didownload
> terlebih dahulu lewat USb komputer dengan software khusus dengan
> melakukan setting communication port.
>
> Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> menggunakan software bantu? Atau vba codenya seperti apa untuk
> melakukan koneksi hardware melalui usb
>
> wassalam
> -zainul-
> #dikirim bukan dari blackberry apalagi iphone#
>
>
dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
Kira-kira begitu
Rgds,
[dp]
On 29/06/2013 21:30, zainul_ulum@
>
> Be-excel
> saya sering menerima data yg dikumpulkan dengan datacolector misal
> dari alat gps dan alat survey. Biasanya data tersebut didownload
> terlebih dahulu lewat USb komputer dengan software khusus dengan
> melakukan setting communication port.
>
> Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> menggunakan software bantu? Atau vba codenya seperti apa untuk
> melakukan koneksi hardware melalui usb
>
> wassalam
> -zainul-
> #dikirim bukan dari blackberry apalagi iphone#
>
>
Sat Jun 29, 2013 8:03 am (PDT) . Posted by:
"zainul_ulum@yahoo.com" zainul_ulum
Iya mas, memang perlu tahu cara kerja alatnya.
Saya pernah buat di basica untuk merecord koordinat dari alat digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa program phyton.
Wassalam,
zainul
#dikirim bukan dari blackberry apalagi iphone#
-----Original Message-----
From: De Premor
Sent: 29/06/2013, 21:47
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
Kira-kira begitu
Rgds,
[dp]
On 29/06/2013 21:30, zainul_ulum@yahoo.com wrote:
>
> Be-excel
> saya sering menerima data yg dikumpulkan dengan datacolector misal
> dari alat gps dan alat survey. Biasanya data tersebut didownload
> terlebih dahulu lewat USb komputer dengan software khusus dengan
> melakukan setting communication port.
>
> Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> menggunakan software bantu? Atau vba codenya seperti apa untuk
> melakukan koneksi hardware melalui usb
>
> wassalam
> -zainul-
> #dikirim bukan dari blackberry apalagi iphone#
>
>
Saya pernah buat di basica untuk merecord koordinat dari alat digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa program phyton.
Wassalam,
zainul
#dikirim bukan dari blackberry apalagi iphone#
-----Original Message-----
From: De Premor
Sent: 29/06/2013, 21:47
To: belajar-excel@
Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
Kira-kira begitu
Rgds,
[dp]
On 29/06/2013 21:30, zainul_ulum@
>
> Be-excel
> saya sering menerima data yg dikumpulkan dengan datacolector misal
> dari alat gps dan alat survey. Biasanya data tersebut didownload
> terlebih dahulu lewat USb komputer dengan software khusus dengan
> melakukan setting communication port.
>
> Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> menggunakan software bantu? Atau vba codenya seperti apa untuk
> melakukan koneksi hardware melalui usb
>
> wassalam
> -zainul-
> #dikirim bukan dari blackberry apalagi iphone#
>
>
Sat Jun 29, 2013 8:10 am (PDT) . Posted by:
"De Premor"
Berarti tinggal di porting ke bahasa VBA :D
Untungnya saya nga pernah kenalan sama kangmas Phyton, ketemu sama uler
aer aja saya lari tunggang langgang, hehehe
On 29/06/2013 22:03, zainul_ulum@yahoo.com wrote:
>
> Iya mas, memang perlu tahu cara kerja alatnya.
> Saya pernah buat di basica untuk merecord koordinat dari alat
> digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
>
> hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa
> program phyton.
>
> Wassalam,
> zainul
> #dikirim bukan dari blackberry apalagi iphone#
> -----Original Message-----
> From: De Premor
> Sent: 29/06/2013, 21:47
> To: belajar-excel@yahoogroups.com <mailto:belajar-excel%40yahoogroups.com>
> Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
>
> kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
> dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
> datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
> mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
> khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
> dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
>
> Kira-kira begitu
>
> Rgds,
> [dp]
>
> On 29/06/2013 21:30, zainul_ulum@yahoo.com
> <mailto:zainul_ulum%40yahoo.com> wrote:
> >
> > Be-excel
> > saya sering menerima data yg dikumpulkan dengan datacolector misal
> > dari alat gps dan alat survey. Biasanya data tersebut didownload
> > terlebih dahulu lewat USb komputer dengan software khusus dengan
> > melakukan setting communication port.
> >
> > Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> > menggunakan software bantu? Atau vba codenya seperti apa untuk
> > melakukan koneksi hardware melalui usb
> >
> > wassalam
> > -zainul-
> > #dikirim bukan dari blackberry apalagi iphone#
> >
> >
>
>
Untungnya saya nga pernah kenalan sama kangmas Phyton, ketemu sama uler
aer aja saya lari tunggang langgang, hehehe
On 29/06/2013 22:03, zainul_ulum@
>
> Iya mas, memang perlu tahu cara kerja alatnya.
> Saya pernah buat di basica untuk merecord koordinat dari alat
> digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
>
> hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa
> program phyton.
>
> Wassalam,
> zainul
> #dikirim bukan dari blackberry apalagi iphone#
> -----Original Message-----
> From: De Premor
> Sent: 29/06/2013, 21:47
> To: belajar-excel@
> Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
>
> kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
> dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
> datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
> mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
> khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
> dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
>
> Kira-kira begitu
>
> Rgds,
> [dp]
>
> On 29/06/2013 21:30, zainul_ulum@
> <mailto:zainul_
> >
> > Be-excel
> > saya sering menerima data yg dikumpulkan dengan datacolector misal
> > dari alat gps dan alat survey. Biasanya data tersebut didownload
> > terlebih dahulu lewat USb komputer dengan software khusus dengan
> > melakukan setting communication port.
> >
> > Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> > menggunakan software bantu? Atau vba codenya seperti apa untuk
> > melakukan koneksi hardware melalui usb
> >
> > wassalam
> > -zainul-
> > #dikirim bukan dari blackberry apalagi iphone#
> >
> >
>
>
Sat Jun 29, 2013 8:17 am (PDT) . Posted by:
"zainul_ulum@yahoo.com" zainul_ulum
Atau bisa juga disharing ke milis, barangkali ada yg pernah membuat vbacode untuk membaca barcode dari mesin barcode reader kemudian disimpan di excel.
Sebagai referensi saya untuk belajar.
#dikirim bukan dari blackberry apalagi iphone#
-----Original Message-----
From: De Premor
Sent: 29/06/2013, 22:07
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
Berarti tinggal di porting ke bahasa VBA :D
Untungnya saya nga pernah kenalan sama kangmas Phyton, ketemu sama uler
aer aja saya lari tunggang langgang, hehehe
On 29/06/2013 22:03, zainul_ulum@yahoo.com wrote:
>
> Iya mas, memang perlu tahu cara kerja alatnya.
> Saya pernah buat di basica untuk merecord koordinat dari alat
> digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
>
> hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa
> program phyton.
>
> Wassalam,
> zainul
> #dikirim bukan dari blackberry apalagi iphone#
> -----Original Message-----
> From: De Premor
> Sent: 29/06/2013, 21:47
> To: belajar-excel@yahoogroups.com
> Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
>
> kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
> dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
> datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
> mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
> khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
> dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
>
> Kira-kira begitu
>
> Rgds,
> [dp]
>
> On 29/06/2013 21:30, zainul_ulum@yahoo.com
> wrote:
> >
> > Be-excel
> > saya sering menerima data yg dikumpulkan dengan datacolector misal
> > dari alat gps dan alat survey. Biasanya data tersebut didownload
> > terlebih dahulu lewat USb komputer dengan software khusus dengan
> > melakukan setting communication port.
> >
> > Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> > menggunakan software bantu? Atau vba codenya seperti apa untuk
> > melakukan koneksi hardware melalui usb
> >
> > wassalam
> > -zainul-
> > #dikirim bukan dari blackberry apalagi iphone#
> >
> >
>
>
Sebagai referensi saya untuk belajar.
#dikirim bukan dari blackberry apalagi iphone#
-----Original Message-----
From: De Premor
Sent: 29/06/2013, 22:07
To: belajar-excel@
Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
Berarti tinggal di porting ke bahasa VBA :D
Untungnya saya nga pernah kenalan sama kangmas Phyton, ketemu sama uler
aer aja saya lari tunggang langgang, hehehe
On 29/06/2013 22:03, zainul_ulum@
>
> Iya mas, memang perlu tahu cara kerja alatnya.
> Saya pernah buat di basica untuk merecord koordinat dari alat
> digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
>
> hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa
> program phyton.
>
> Wassalam,
> zainul
> #dikirim bukan dari blackberry apalagi iphone#
> -----Original Message-----
> From: De Premor
> Sent: 29/06/2013, 21:47
> To: belajar-excel@
> Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
>
> kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
> dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
> datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
> mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
> khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
> dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
>
> Kira-kira begitu
>
> Rgds,
> [dp]
>
> On 29/06/2013 21:30, zainul_ulum@
> wrote:
> >
> > Be-excel
> > saya sering menerima data yg dikumpulkan dengan datacolector misal
> > dari alat gps dan alat survey. Biasanya data tersebut didownload
> > terlebih dahulu lewat USb komputer dengan software khusus dengan
> > melakukan setting communication port.
> >
> > Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> > menggunakan software bantu? Atau vba codenya seperti apa untuk
> > melakukan koneksi hardware melalui usb
> >
> > wassalam
> > -zainul-
> > #dikirim bukan dari blackberry apalagi iphone#
> >
> >
>
>
Sat Jun 29, 2013 8:40 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Data yang didapat dari alatnya berupa apa mas ?
tempo dulu yang pakai comm2 sudah dicoba untuk dipakai via usb ?
2013/6/29 zainul_ulum@yahoo.com <zainul_ulum@yahoo.com >
> **
>
>
> Atau bisa juga disharing ke milis, barangkali ada yg pernah membuat
> vbacode untuk membaca barcode dari mesin barcode reader kemudian disimpan
> di excel.
> Sebagai referensi saya untuk belajar.
>
> #dikirim bukan dari blackberry apalagi iphone#
> -----Original Message-----
> From: De Premor
> Sent: 29/06/2013, 22:07
> To: belajar-excel@yahoogroups.com
> Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
>
> Berarti tinggal di porting ke bahasa VBA :D
> Untungnya saya nga pernah kenalan sama kangmas Phyton, ketemu sama uler
> aer aja saya lari tunggang langgang, hehehe
>
> On 29/06/2013 22:03, zainul_ulum@yahoo.com wrote:
> >
> > Iya mas, memang perlu tahu cara kerja alatnya.
> > Saya pernah buat di basica untuk merecord koordinat dari alat
> > digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
> >
> > hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa
> > program phyton.
> >
> > Wassalam,
> > zainul
> > #dikirim bukan dari blackberry apalagi iphone#
> > -----Original Message-----
> > From: De Premor
> > Sent: 29/06/2013, 21:47
> > To: belajar-excel@yahoogroups.com
> > Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
> >
> > kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
> > dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
> > datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
> > mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
> > khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
> > dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
> >
> > Kira-kira begitu
> >
> > Rgds,
> > [dp]
> >
> > On 29/06/2013 21:30, zainul_ulum@yahoo.com
> > wrote:
> > >
> > > Be-excel
> > > saya sering menerima data yg dikumpulkan dengan datacolector misal
> > > dari alat gps dan alat survey. Biasanya data tersebut didownload
> > > terlebih dahulu lewat USb komputer dengan software khusus dengan
> > > melakukan setting communication port.
> > >
> > > Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> > > menggunakan software bantu? Atau vba codenya seperti apa untuk
> > > melakukan koneksi hardware melalui usb
> > >
> > > wassalam
> > > -zainul-
> > > #dikirim bukan dari blackberry apalagi iphone#
> > >
> > >
> >
> >
>
>
>
tempo dulu yang pakai comm2 sudah dicoba untuk dipakai via usb ?
2013/6/29 zainul_ulum@
> **
>
>
> Atau bisa juga disharing ke milis, barangkali ada yg pernah membuat
> vbacode untuk membaca barcode dari mesin barcode reader kemudian disimpan
> di excel.
> Sebagai referensi saya untuk belajar.
>
> #dikirim bukan dari blackberry apalagi iphone#
> -----Original Message-----
> From: De Premor
> Sent: 29/06/2013, 22:07
> To: belajar-excel@
> Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
>
> Berarti tinggal di porting ke bahasa VBA :D
> Untungnya saya nga pernah kenalan sama kangmas Phyton, ketemu sama uler
> aer aja saya lari tunggang langgang, hehehe
>
> On 29/06/2013 22:03, zainul_ulum@
> >
> > Iya mas, memang perlu tahu cara kerja alatnya.
> > Saya pernah buat di basica untuk merecord koordinat dari alat
> > digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
> >
> > hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa
> > program phyton.
> >
> > Wassalam,
> > zainul
> > #dikirim bukan dari blackberry apalagi iphone#
> > -----Original Message-----
> > From: De Premor
> > Sent: 29/06/2013, 21:47
> > To: belajar-excel@
> > Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
> >
> > kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
> > dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
> > datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
> > mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
> > khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
> > dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
> >
> > Kira-kira begitu
> >
> > Rgds,
> > [dp]
> >
> > On 29/06/2013 21:30, zainul_ulum@
> > wrote:
> > >
> > > Be-excel
> > > saya sering menerima data yg dikumpulkan dengan datacolector misal
> > > dari alat gps dan alat survey. Biasanya data tersebut didownload
> > > terlebih dahulu lewat USb komputer dengan software khusus dengan
> > > melakukan setting communication port.
> > >
> > > Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> > > menggunakan software bantu? Atau vba codenya seperti apa untuk
> > > melakukan koneksi hardware melalui usb
> > >
> > > wassalam
> > > -zainul-
> > > #dikirim bukan dari blackberry apalagi iphone#
> > >
> > >
> >
> >
>
>
>
Sat Jun 29, 2013 9:15 am (PDT) . Posted by:
"zainul_ulum@yahoo.com" zainul_ulum
Datanya berupa text file.
Coding tempo dulu belum sempat dicoba, karena codingnya sdh nggak ada lagi waktu itu yang aku ingat saya simpan di floppy disk verbatim HD 1.2mb
#dikirim bukan dari blackberry apalagi iphone#
-----Original Message-----
From: Mr. Kid
Sent: 29/06/2013, 22:40
To: BeExcel
Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
Data yang didapat dari alatnya berupa apa mas ?
tempo dulu yang pakai comm2 sudah dicoba untuk dipakai via usb ?
2013/6/29 zainul_ulum@yahoo.com
> **
>
>
> Atau bisa juga disharing ke milis, barangkali ada yg pernah membuat
> vbacode untuk membaca barcode dari mesin barcode reader kemudian disimpan
> di excel.
> Sebagai referensi saya untuk belajar.
>
> #dikirim bukan dari blackberry apalagi iphone#
> -----Original Message-----
> From: De Premor
> Sent: 29/06/2013, 22:07
> To: belajar-excel@yahoogroups.com
> Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
>
> Berarti tinggal di porting ke bahasa VBA :D
> Untungnya saya nga pernah kenalan sama kangmas Phyton, ketemu sama uler
> aer aja saya lari tunggang langgang, hehehe
>
> On 29/06/2013 22:03, zainul_ulum@yahoo.com wrote:
> >
> > Iya mas, memang perlu tahu cara kerja alatnya.
> > Saya pernah buat di basica untuk merecord koordinat dari alat
> > digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
> >
> > hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa
> > program phyton.
> >
> > Wassalam,
> > zainul
> > #dikirim bukan dari blackberry apalagi iphone#
> > -----Original Message-----
> > From: De Premor
> > Sent: 29/06/2013, 21:47
> > To: belajar-excel@yahoogroups.com
> > Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
> >
> > kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
> > dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
> > datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
> > mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
> > khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
> > dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
> >
> > Kira-kira begitu
> >
> > Rgds,
> > [dp]
> >
> > On 29/06/2013 21:30, zainul_ulum@yahoo.com
> > wrote:
> > >
> > > Be-excel
> > > saya sering menerima data yg dikumpulkan dengan datacolector misal
> > > dari alat gps dan alat survey. Biasanya data tersebut didownload
> > > terlebih dahulu lewat USb komputer dengan software khusus dengan
> > > melakukan setting communication port.
> > >
> > > Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> > >
Coding tempo dulu belum sempat dicoba, karena codingnya sdh nggak ada lagi waktu itu yang aku ingat saya simpan di floppy disk verbatim HD 1.2mb
#dikirim bukan dari blackberry apalagi iphone#
-----Original Message-----
From: Mr. Kid
Sent: 29/06/2013, 22:40
To: BeExcel
Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
Data yang didapat dari alatnya berupa apa mas ?
tempo dulu yang pakai comm2 sudah dicoba untuk dipakai via usb ?
2013/6/29 zainul_ulum@
> **
>
>
> Atau bisa juga disharing ke milis, barangkali ada yg pernah membuat
> vbacode untuk membaca barcode dari mesin barcode reader kemudian disimpan
> di excel.
> Sebagai referensi saya untuk belajar.
>
> #dikirim bukan dari blackberry apalagi iphone#
> -----Original Message-----
> From: De Premor
> Sent: 29/06/2013, 22:07
> To: belajar-excel@
> Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
>
> Berarti tinggal di porting ke bahasa VBA :D
> Untungnya saya nga pernah kenalan sama kangmas Phyton, ketemu sama uler
> aer aja saya lari tunggang langgang, hehehe
>
> On 29/06/2013 22:03, zainul_ulum@
> >
> > Iya mas, memang perlu tahu cara kerja alatnya.
> > Saya pernah buat di basica untuk merecord koordinat dari alat
> > digitizer. Waktu itu thn 1994 blm ada usb connection hanya melalau com2
> >
> > hasil googling, ketemu source code yg saya maksud tetapi dalam bahasa
> > program phyton.
> >
> > Wassalam,
> > zainul
> > #dikirim bukan dari blackberry apalagi iphone#
> > -----Original Message-----
> > From: De Premor
> > Sent: 29/06/2013, 21:47
> > To: belajar-excel@
> > Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
> >
> > kalau begitu ceritanya, mas perlu pahami gimana alat itu bekerja, gimana
> > dia berkomunikasi dengan program bawaannya (Misal: Map Source buat mbuka
> > datanya Garmin), kalau sudah paham, baru deh dibuat codenya untuk
> > mengkoneksikan ke alat itu, bisa juga menggunakan DLL nya program
> > khususnya, itupun mas harus tau dulu apa saja fungsi2 yang ada didalam
> > dll tersebut (^_^), baru deh fungsi2nya diimport ke VBA
> >
> > Kira-kira begitu
> >
> > Rgds,
> > [dp]
> >
> > On 29/06/2013 21:30, zainul_ulum@
> > wrote:
> > >
> > > Be-excel
> > > saya sering menerima data yg dikumpulkan dengan datacolector misal
> > > dari alat gps dan alat survey. Biasanya data tersebut didownload
> > > terlebih dahulu lewat USb komputer dengan software khusus dengan
> > > melakukan setting communication port.
> > >
> > > Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> > >
Sat Jun 29, 2013 7:53 am (PDT) . Posted by:
"Ahmad Adriansyah"
Dear Om Kid,
Terima kasih panduannya, Alhamdulillah reportnya udah jadi. He..he...
Om & Para Master VB
Mau nanya lagi nieh, jika kita input pada TextBox1, namun ternyata data tersebut sudah ditemukan di dalam range table pada data excel, maka akan memberikan informasi bahwa "Data sudah ada". Bagaimana ya Om kodingnya.
Saya membuat koding seperti ini, namun error :
----------------------------------------------------------
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim LastRow2 As Range
Set LastRow2 = Sheet1.Range("c10").End(xlUp)
Dim dKey As Range
Set dKey = Sheets("Data Entry").Range("B2")
Set dKey = Range(dKey, dKey.End(xlDown))
dKey.Name = "dKey"
If TextBox1.Text = dKey Then
Cancel = True
MsgBox "Data sudah ada!"
Exit Sub
End If
End Sub
----------------------------------------------------------
Rgds,
AA
From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com ] On Behalf Of Mr. Kid
Sent: 26 Juni 2013 17:38
To: BeExcel
Subject: Re: [belajar-excel] VBA untuk Tanggal
oh... gini aja deh
ke VBE -> menu Tools -> Options -> tab Editor -> centang semuanya -> OK
Wassalam,
Kid.
2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id <mailto:ahmad.adriansyah@trac.astra.co.id >>
He..he...
Maklum nih, newbie Om Kid... :)
Untuk sTglInput memang tidak dideklarasikan variable-nya Om, sehingga saya hanya menggunakan variable TbStartR sebagai value pada textbox : "TbStartR";.
Masalahnya adalah, ketika saya ketikkan :
1. Di modulenya Om Kid, txtTglStart.text = Format( ==> maka ketika itu muncul help pada VBA, setelah mengetikkan tanda buka kurung "(".
2. Di modulenya saya, TbStartR.text = Format( ==> Tidak muncul apa2 setelah mengetikkan tanda buka kurung "(".
Nah, masalahnya apakah? Apakah versi excel saya yang perlu di upgrade atau di update? Mohon maaf jadi ngerepotkan he..he...
Rgds,
AA
From: belajar-excel@yahoogroups.com <mailto:belajar-excel@yahoogroups.com > [mailto:belajar-excel@yahoogroups.com <mailto:belajar-excel@yahoogroups.com >] On Behalf Of Mr. Kid
Sent: 26 Juni 2013 15:06
To: BeExcel
Subject: Re: [belajar-excel] VBA untuk Tanggal
hik..hik..hiks.... :(
kok belum bisa ya...
Bukannya yang diminta ganti itu cuma bunyi sTglInput aja ya, dan bukan semua barisnya.... :(
Baiklah, kita mulai dari awal.
Ada script bunyinya :
Private Sub TbStartR_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Len(Me.TbStartR.Value) > 0 Then
If Not IsDate(Me.TbStartR.Value) Then
Cancel = True
LblInfo.Caption = "Inputan tidak mencerminkan tanggal yang benar!" & vbCrLf & "Gunakan format : YYYY/MM/DD"
Exit Sub
End If
If Me.TbStartR.Value < TbIn.Value Then
Cancel = True
LblInfo.Caption = "Tanggal start repair tidak boleh lebih kecil dari Tanggal In!"
Exit Sub
End If
End If
LblInfo.Caption = vbNullString
Tb.StartR.Text = Format$(sTglInput, "YYYY-MM-DD")
End Sub
Tolong dijawab ya... (siapa saja yang sedang belajar VBA boleh jawab deh)
1. Tolong cari tulisan sTglInput selain yang dimerah. Ada berapakah ?
2. Apa maksud sTglInput di baris yang dimerah ?
ditunggu ya...
Wassalam,
Kid.
2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id <mailto:ahmad.adriansyah@trac.astra.co.id >>
Belum bisa Om Kid,
Kalau saya ganti menjadi TbStartR.Text, maka format expression-nya tidak keluar. Setelah saya ganti menjadi Replace$(TbStartR.Text,"/","-") muncul pesan sbb :
[cid:image001.jpg@01CE7407.494736C0 ]
Kalau dibiarkan, jadinya setelah input tanggal maka formatnya sesuai dengan yang diinput oleh user (meskipun pada labelnya telah ditulis "Gunakan Format : "YYYY-MM-DD") :) ...
Rgds,
AA
From: belajar-excel@yahoogroups.com <mailto:belajar-excel@yahoogroups.com > [mailto:belajar-excel@yahoogroups.com <mailto:belajar-excel@yahoogroups.com >] On Behalf Of Mr. Kid
Sent: 26 Juni 2013 14:47
To: BeExcel
Subject: Re: [belajar-excel] VBA untuk Tanggal
Coba ganti
sTglInput
menjadi :
Tb.StartR.Text
Kalau ndak bisa, ganti
sTglInput
menjadi
Replace$( Tb.StartR.Text , "/" , "-" )
Wassalam,
Kid.
2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id <mailto:ahmad.adriansyah@trac.astra.co.id >>
Masalahnya sepertinya di format kayanya. Soalnya di module VBA saya seperti ini :
[cid:image002.jpg@01CE7407.494736C0 ]
Sedangkan kalau menggunakan module punya Om Kid jadinya seperti ini :
[cid:image003.jpg@01CE7407.494736C0 ]
Kenapa ya Om Kid?
Rgds,
AA
From: belajar-excel@yahoogroups.com <mailto:belajar-excel@yahoogroups.com > [mailto:belajar-excel@yahoogroups.com <mailto:belajar-excel@yahoogroups.com >] On Behalf Of Mr. Kid
Sent: 26 Juni 2013 14:32
To: BeExcel
Subject: Re: [belajar-excel] VBA untuk Tanggal
xixixixi... sTglInput
typo error karena belum ada deklarsi variabelnya kali ya
2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id <mailto:ahmad.adriansyah@trac.astra.co.id >>
Tb.StartR.Text = Format$(sTglInput, "YYYY-MM-DD")
Terima kasih panduannya, Alhamdulillah reportnya udah jadi. He..he...
Om & Para Master VB
Mau nanya lagi nieh, jika kita input pada TextBox1, namun ternyata data tersebut sudah ditemukan di dalam range table pada data excel, maka akan memberikan informasi bahwa "Data sudah ada". Bagaimana ya Om kodingnya.
Saya membuat koding seperti ini, namun error :
------------
Private Sub TextBox1_Exit(
Dim LastRow2 As Range
Set LastRow2 = Sheet1.Range(
Dim dKey As Range
Set dKey = Sheets("
Set dKey = Range(dKey, dKey.End(xlDown)
dKey.Name = "dKey"
If TextBox1.Text = dKey Then
Cancel = True
MsgBox "Data sudah ada!"
Exit Sub
End If
End Sub
------------
Rgds,
AA
From: belajar-excel@
Sent: 26 Juni 2013 17:38
To: BeExcel
Subject: Re: [belajar-excel] VBA untuk Tanggal
oh... gini aja deh
ke VBE -> menu Tools -> Options -> tab Editor -> centang semuanya -> OK
Wassalam,
Kid.
2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@
He..he...
Maklum nih, newbie Om Kid... :)
Untuk sTglInput memang tidak dideklarasikan variable-nya Om, sehingga saya hanya menggunakan variable TbStartR sebagai value pada textbox : "TbStartR"
Masalahnya adalah, ketika saya ketikkan :
1. Di modulenya Om Kid, txtTglStart.
2. Di modulenya saya, TbStartR.text = Format( ==> Tidak muncul apa2 setelah mengetikkan tanda buka kurung "("
Nah, masalahnya apakah? Apakah versi excel saya yang perlu di upgrade atau di update? Mohon maaf jadi ngerepotkan he..he...
Rgds,
AA
From: belajar-excel@
Sent: 26 Juni 2013 15:06
To: BeExcel
Subject: Re: [belajar-excel] VBA untuk Tanggal
hik..hik..hiks.
kok belum bisa ya...
Bukannya yang diminta ganti itu cuma bunyi sTglInput aja ya, dan bukan semua barisnya.... :(
Baiklah, kita mulai dari awal.
Ada script bunyinya :
Private Sub TbStartR_Exit(
If Len(Me.TbStartR.
If Not IsDate(Me.TbStartR.
Cancel = True
LblInfo.Caption = "Inputan tidak mencerminkan tanggal yang benar!" & vbCrLf & "Gunakan format : YYYY/MM/DD"
Exit Sub
End If
If Me.TbStartR.
Cancel = True
LblInfo.Caption = "Tanggal start repair tidak boleh lebih kecil dari Tanggal In!"
Exit Sub
End If
End If
LblInfo.Caption = vbNullString
Tb.StartR.Text = Format$(sTglInput, "YYYY-MM-
End Sub
Tolong dijawab ya... (siapa saja yang sedang belajar VBA boleh jawab deh)
1. Tolong cari tulisan sTglInput selain yang dimerah. Ada berapakah ?
2. Apa maksud sTglInput di baris yang dimerah ?
ditunggu ya...
Wassalam,
Kid.
2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@
Belum bisa Om Kid,
Kalau saya ganti menjadi TbStartR.Text, maka format expression-nya tidak keluar. Setelah saya ganti menjadi Replace$(TbStartR.
[cid:image001.jpg@
Kalau dibiarkan, jadinya setelah input tanggal maka formatnya sesuai dengan yang diinput oleh user (meskipun pada labelnya telah ditulis "Gunakan Format : "YYYY-MM-
Rgds,
AA
From: belajar-excel@
Sent: 26 Juni 2013 14:47
To: BeExcel
Subject: Re: [belajar-excel] VBA untuk Tanggal
Coba ganti
sTglInput
menjadi :
Tb.StartR.Text
Kalau ndak bisa, ganti
sTglInput
menjadi
Replace$( Tb.StartR.Text , "/" , "-" )
Wassalam,
Kid.
2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@
Masalahnya sepertinya di format kayanya. Soalnya di module VBA saya seperti ini :
[cid:image002.jpg@
Sedangkan kalau menggunakan module punya Om Kid jadinya seperti ini :
[cid:image003.jpg@
Kenapa ya Om Kid?
Rgds,
AA
From: belajar-excel@
Sent: 26 Juni 2013 14:32
To: BeExcel
Subject: Re: [belajar-excel] VBA untuk Tanggal
xixixixi... sTglInput
typo error karena belum ada deklarsi variabelnya kali ya
2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@
Tb.StartR.Text = Format$(sTglInput, "YYYY-MM-
Sat Jun 29, 2013 10:40 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Misal area pencarian di sheet bernama 'data entry' mulai cell B2 sepanjang
data dan kolom A ada isinya. Teks yang dicari ada di textbox1
dim rngData as range, rngCari as range
dim lRows as long , sCari as string
'asumsi, header hanya 1 baris
set rngdata=sheets("data entry").range("a1")
lrec=rngdata.currentregion.rows.count
scari=textbox1.text
if lenb(scari)=0 then
exit sub
elseif lrec<2 then 'belum ada isi
'script tulis data disini
rngdata.offset(lrows,1).value=scari
msgbox "done.",vbinformation,"Input";
exit sub
endif
set
rngcari=rngdata.offset(1,1).resize(lrows-1).find(scari,rngdata.offset(0,1).resize(1,1),lookat:=xlwhole)
if rngcari is nothing then
rngdata.offset(lrows,1).value=scari
msgbox "done.",vbinformation,"Input";
else
msgbox "Data sudah ada",vbexclamation,"Input"
endif
Wassalam,
Kid.
2013/6/28 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id >
> Dear Om Kid,****
>
> Terima kasih panduannya, Alhamdulillah reportnya udah jadi. He..he…****
>
> ** **
>
> Om & Para Master VB****
>
> Mau nanya lagi nieh, jika kita input pada TextBox1, namun ternyata data
> tersebut sudah ditemukan di dalam range table pada data excel, maka akan
> memberikan informasi bahwa "Data sudah ada". Bagaimana ya Om kodingnya.***
> *
>
>
> Saya membuat koding seperti ini, namun error :****
>
> ** **
>
>
> ----------------------------------------------------------
> ****
>
> Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)****
>
> Dim LastRow2 As Range****
>
> Set LastRow2 = Sheet1.Range("c10").End(xlUp)****
>
> Dim dKey As Range****
>
> Set dKey = Sheets("Data Entry").Range("B2")****
>
> Set dKey = Range(dKey, dKey.End(xlDown))****
>
> dKey.Name = "dKey"****
>
> If TextBox1.Text = dKey Then****
>
> Cancel = True****
>
> MsgBox "Data sudah ada!"****
>
> Exit Sub****
>
> End If****
>
> End Sub****
>
>
> ----------------------------------------------------------
> ****
>
> ** **
>
> Rgds,****
>
> AA****
>
> ** **
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com ] *On Behalf Of *Mr. Kid
> *Sent:* 26 Juni 2013 17:38
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] VBA untuk Tanggal****
>
> ** **
>
> ** **
>
> oh... gini aja deh****
>
> ke VBE -> menu Tools -> Options -> tab Editor -> centang semuanya -> OK***
> *
>
> Wassalam,
> Kid.****
>
> ** **
>
> 2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id >****
>
> ** **
>
> He..he…****
>
> Maklum nih, newbie Om Kid… J****
>
> Untuk *sTglInput *memang tidak dideklarasikan variable-nya Om, sehingga
> saya hanya menggunakan variable *TbStartR* sebagai value pada textbox : "*
> TbStartR*".****
>
> ****
>
> Masalahnya adalah, ketika saya ketikkan :****
>
> 1. Di modulenya Om Kid, *txtTglStart.text = Format(* è maka
> ketika itu muncul help pada VBA, setelah mengetikkan tanda buka kurung "(".
> ****
>
> 2. Di modulenya saya, *TbStartR.text = Format(** *è Tidak muncul
> apa2 setelah mengetikkan tanda buka kurung "(".****
>
> ****
>
> Nah, masalahnya apakah? Apakah versi excel saya yang perlu di upgrade atau
> di update? Mohon maaf jadi ngerepotkan he..he…****
>
> ****
>
> Rgds,****
>
> ****
>
> AA****
>
> ****
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com ] *On Behalf Of *Mr. Kid
> *Sent:* 26 Juni 2013 15:06****
>
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] VBA untuk Tanggal****
>
> ****
>
> ****
>
> hik..hik..hiks.... :(****
>
> kok belum bisa ya...****
>
> Bukannya yang diminta ganti itu cuma bunyi sTglInput aja ya, dan bukan
> semua barisnya.... :(****
>
> Baiklah, kita mulai dari awal.****
>
> Ada script bunyinya :****
>
> Private Sub TbStartR_Exit(ByVal Cancel As MSForms.ReturnBoolean)****
>
> If Len(Me.TbStartR.Value) > 0 Then****
>
> If Not IsDate(Me.TbStartR.Value) Then****
>
> Cancel = True****
>
> LblInfo.Caption = "Inputan tidak mencerminkan tanggal yang benar!"
> & vbCrLf & "Gunakan format : YYYY/MM/DD"****
>
> Exit Sub****
>
> End If****
>
> If Me.TbStartR.Value < TbIn.Value Then****
>
> Cancel = True****
>
> LblInfo.Caption = "Tanggal start repair tidak boleh lebih kecil
> dari Tanggal In!"****
>
> Exit Sub****
>
> End If****
>
> End If****
>
> LblInfo.Caption = vbNullString****
>
> *Tb.StartR.Text = Format$(sTglInput, "YYYY-MM-DD")*****
>
> End Sub****
>
> ****
>
> Tolong dijawab ya... (siapa saja yang sedang belajar VBA boleh jawab deh)*
> ***
>
> 1. Tolong cari tulisan sTglInput selain yang dimerah. Ada berapakah ?****
>
> 2. Apa maksud sTglInput di baris yang dimerah ?****
>
> ****
>
> ditunggu ya...****
>
> Wassalam,****
>
> Kid.****
>
> ****
>
> ****
>
> 2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id >****
>
> ****
>
> Belum bisa Om Kid,****
>
> Kalau saya ganti menjadi TbStartR.Text, maka format expression-nya tidak
> keluar. Setelah saya ganti menjadi Replace$(TbStartR.Text,"/","-") muncul
> pesan sbb :****
>
> ****
>
> ****
>
> ****
>
> Kalau dibiarkan, jadinya setelah input tanggal maka formatnya sesuai
> dengan yang diinput oleh user (meskipun pada labelnya telah ditulis
> "Gunakan Format : "YYYY-MM-DD") J …****
>
> ****
>
> Rgds,****
>
> ****
>
> AA****
>
> ****
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com ] *On Behalf Of *Mr. Kid
> *Sent:* 26 Juni 2013 14:47****
>
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] VBA untuk Tanggal****
>
> ****
>
> ****
>
> Coba ganti
> *sTglInput*****
>
> menjadi :
> *Tb.StartR.Text *****
>
> Kalau ndak bisa, ganti
> *sTglInput*****
>
> menjadi ****
>
> Replace$( *Tb.StartR.Text *, "/" , "-" )****
>
> ****
>
> Wassalam,
> Kid.****
>
> ****
>
> ****
>
> 2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id >****
>
> ****
>
> Masalahnya sepertinya di *format** *kayanya. Soalnya di module VBA saya
> seperti ini :****
>
> ****
>
> ****
>
> Sedangkan kalau menggunakan module punya Om Kid jadinya seperti ini :****
>
> ****
>
> ****
>
> ****
>
> Kenapa ya Om Kid?****
>
> ****
>
> Rgds,****
>
> ****
>
> AA****
>
> ****
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com ] *On Behalf Of *Mr. Kid
> *Sent:* 26 Juni 2013 14:32****
>
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] VBA untuk Tanggal****
>
> ****
>
> ****
>
> xixixixi... *sTglInput*****
>
> typo error karena belum ada deklarsi variabelnya kali ya****
>
> ****
>
> 2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@trac.astra.co.id >****
>
> *Tb.StartR.Text = Format$(sTglInput, "YYYY-MM-DD")*****
>
> ****
>
> ****
>
> ****
>
> ** **
>
> ****
>
data dan kolom A ada isinya. Teks yang dicari ada di textbox1
dim rngData as range, rngCari as range
dim lRows as long , sCari as string
'asumsi, header hanya 1 baris
set rngdata=sheets(
lrec=rngdata.
scari=textbox1.
if lenb(scari)=
exit sub
elseif lrec<2 then 'belum ada isi
'script tulis data disini
rngdata.offset(
msgbox "done."
exit sub
endif
set
rngcari=rngdata.
if rngcari is nothing then
rngdata.offset(
msgbox "done."
else
msgbox "Data sudah ada",vbexclama
endif
Wassalam,
Kid.
2013/6/28 Ahmad Adriansyah <ahmad.adriansyah@
> Dear Om Kid,****
>
> Terima kasih panduannya, Alhamdulillah reportnya udah jadi. He..he…****
>
> ** **
>
> Om & Para Master VB****
>
> Mau nanya lagi nieh, jika kita input pada TextBox1, namun ternyata data
> tersebut sudah ditemukan di dalam range table pada data excel, maka akan
> memberikan informasi bahwa "Data sudah ada". Bagaimana ya Om kodingnya.**
> *
>
>
> Saya membuat koding seperti ini, namun error :****
>
> ** **
>
>
> ------------
> ****
>
> Private Sub TextBox1_Exit(
>
> Dim LastRow2 As Range****
>
> Set LastRow2 = Sheet1.Range(
>
> Dim dKey As Range****
>
> Set dKey = Sheets("
>
> Set dKey = Range(dKey, dKey.End(xlDown)
>
> dKey.Name = "dKey"
>
> If TextBox1.Text = dKey Then****
>
> Cancel = True****
>
> MsgBox "Data sudah ada!"**
>
> Exit Sub****
>
> End If****
>
> End Sub****
>
>
> ------------
> ****
>
> ** **
>
> Rgds,****
>
> AA****
>
> ** **
>
> *From:* belajar-excel@
> belajar-excel@
> *Sent:* 26 Juni 2013 17:38
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] VBA untuk Tanggal****
>
> ** **
>
> ** **
>
> oh... gini aja deh****
>
> ke VBE -> menu Tools -> Options -> tab Editor -> centang semuanya -> OK***
> *
>
> Wassalam,
> Kid.****
>
> ** **
>
> 2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@
>
> ** **
>
> He..he…****
>
> Maklum nih, newbie Om Kid… J****
>
> Untuk *sTglInput *memang tidak dideklarasikan variable-nya Om, sehingga
> saya hanya menggunakan variable *TbStartR* sebagai value pada textbox : "*
> TbStartR*".**
>
> ****
>
> Masalahnya adalah, ketika saya ketikkan :****
>
> 1. Di modulenya Om Kid, *txtTglStart.
> ketika itu muncul help pada VBA, setelah mengetikkan tanda buka kurung "(".
> ****
>
> 2. Di modulenya saya, *TbStartR.text = Format(** *è Tidak muncul
> apa2 setelah mengetikkan tanda buka kurung "(".****
>
> ****
>
> Nah, masalahnya apakah? Apakah versi excel saya yang perlu di upgrade atau
> di update? Mohon maaf jadi ngerepotkan he..he…****
>
> ****
>
> Rgds,****
>
> ****
>
> AA****
>
> ****
>
> *From:* belajar-excel@
> belajar-excel@
> *Sent:* 26 Juni 2013 15:06****
>
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] VBA untuk Tanggal****
>
> ****
>
> ****
>
> hik..hik..hiks.
>
> kok belum bisa ya...****
>
> Bukannya yang diminta ganti itu cuma bunyi sTglInput aja ya, dan bukan
> semua barisnya.... :(****
>
> Baiklah, kita mulai dari awal.****
>
> Ada script bunyinya :****
>
> Private Sub TbStartR_Exit(
>
> If Len(Me.TbStartR.
>
> If Not IsDate(Me.TbStartR.
>
> Cancel = True****
>
> LblInfo.Caption = "Inputan tidak mencerminkan tanggal yang benar!"
> & vbCrLf & "Gunakan format : YYYY/MM/DD"
>
> Exit Sub****
>
> End If****
>
> If Me.TbStartR.
>
> Cancel = True****
>
> LblInfo.Caption = "Tanggal start repair tidak boleh lebih kecil
> dari Tanggal In!"***
>
> Exit Sub****
>
> End If****
>
> End If****
>
> LblInfo.Caption = vbNullString*
>
> *Tb.StartR.Text = Format$(sTglInput, "YYYY-MM-
>
> End Sub****
>
> ****
>
> Tolong dijawab ya... (siapa saja yang sedang belajar VBA boleh jawab deh)*
> ***
>
> 1. Tolong cari tulisan sTglInput selain yang dimerah. Ada berapakah ?****
>
> 2. Apa maksud sTglInput di baris yang dimerah ?****
>
> ****
>
> ditunggu ya...****
>
> Wassalam,***
>
> Kid.****
>
> ****
>
> ****
>
> 2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@
>
> ****
>
> Belum bisa Om Kid,****
>
> Kalau saya ganti menjadi TbStartR.Text, maka format expression-nya tidak
> keluar. Setelah saya ganti menjadi Replace$(TbStartR.
> pesan sbb :****
>
> ****
>
> ****
>
> ****
>
> Kalau dibiarkan, jadinya setelah input tanggal maka formatnya sesuai
> dengan yang diinput oleh user (meskipun pada labelnya telah ditulis
> "Gunakan Format : "YYYY-MM-DD") J …****
>
> ****
>
> Rgds,****
>
> ****
>
> AA****
>
> ****
>
> *From:* belajar-excel@
> belajar-excel@
> *Sent:* 26 Juni 2013 14:47****
>
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] VBA untuk Tanggal****
>
> ****
>
> ****
>
> Coba ganti
> *sTglInput**
>
> menjadi :
> *Tb.StartR.Text *****
>
> Kalau ndak bisa, ganti
> *sTglInput**
>
> menjadi ****
>
> Replace$( *Tb.StartR.Text *, "/" , "-" )****
>
> ****
>
> Wassalam,
> Kid.****
>
> ****
>
> ****
>
> 2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@
>
> ****
>
> Masalahnya sepertinya di *format** *kayanya. Soalnya di module VBA saya
> seperti ini :****
>
> ****
>
> ****
>
> Sedangkan kalau menggunakan module punya Om Kid jadinya seperti ini :****
>
> ****
>
> ****
>
> ****
>
> Kenapa ya Om Kid?****
>
> ****
>
> Rgds,****
>
> ****
>
> AA****
>
> ****
>
> *From:* belajar-excel@
> belajar-excel@
> *Sent:* 26 Juni 2013 14:32****
>
>
> *To:* BeExcel
> *Subject:* Re: [belajar-excel] VBA untuk Tanggal****
>
> ****
>
> ****
>
> xixixixi... *sTglInput**
>
> typo error karena belum ada deklarsi variabelnya kali ya****
>
> ****
>
> 2013/6/26 Ahmad Adriansyah <ahmad.adriansyah@
>
> *Tb.StartR.Text = Format$(sTglInput, "YYYY-MM-
>
> ****
>
> ****
>
> ****
>
> ** **
>
> ****
>
Sat Jun 29, 2013 7:55 am (PDT) . Posted by:
"zainul_ulum@yahoo.com" zainul_ulum
Maaf kalo uraiannya kurang jelas. Maksud saya adalah transfer lewat usb cable.
Jadi data yg tersimpan di alat akan ditransfer melalui usb cable.
Dulu saya pakai telnet di windows kalo bawaan softwarenya tidak ada.
Jaman masih pakai basica dan belum ada connection via usb,untuk melakukan koneksi melalui open port atau com memakai perintah OPEN kemudian ada paremeter set baut rate, parity dll sdh lupa aku.
Apakah metodenya sama kalo pakai usb cable ?
Wassalam,
zainul
#dikirim bukan dari blackberry apalagi iphone#
-----Original Message-----
From: Mr. Kid
Sent: 29/06/2013, 21:39
To: BeExcel
Subject: Re: [belajar-excel] vba code untuk transfer data lewat usb.
USB nya berisi apa mas ? atau sebarang USB kosong yang dijadikan media
storage saja ?
Apakah data dari alatnya ataukah aplikasi untuk komunikasi dengan alatnya ?
Wassalam,
Kid.
2013/6/29 zainul_ulum@
> **
>
>
> Be-excel
> saya sering menerima data yg dikumpulkan dengan datacolector misal dari
> alat gps dan alat survey. Biasanya data tersebut didownload terlebih dahulu
> lewat USb komputer dengan software khusus dengan melakukan setting
> communication port.
>
> Bagaimana caranya agar data tersebut bisa didownload ke excel tanpa
> menggunakan software bantu? Atau vba codenya seperti apa untuk melakukan
> koneksi hardware melalui usb
>
> wassalam
> -zainul-
> #dikirim bukan dari blackberry apalagi iphone#
>
>
Sat Jun 29, 2013 10:14 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Wa'alaikumussalam Wr. Wb.
Coba file terlampir yang memanfaatkan properti LinkedCell dari activex
control yang digunakan.
Kemudian dibantu dengan beberapa cell sebagai penentu indeks kolom data
yang harus diperiksa beserta susunan teks kriterianya.
Untuk membuat daftar hasil filter digunakan kolom bantu yang berisi array
formula filtering
coretan tentang array formula filtering bisa dibaca
disini<http://excel-mr-kid.blogspot.com/2011/04/formula-filter-data-filtering-formula.html >
File terlampir.
Wassalamu'alaikum Wr. Wb.
Kid.
2013/6/28 eyeshield_ic@rocketmail.com <eyeshield_ic@rocketmail.com >
> **
>
>
> Assalamualaikum wr wb...
> saya baru mengenal dunia excel. saya belum mahir dengan vba...
> saya mau mnta bantuan membuat tombol pencarian sebuah data berdasarkan
> pilihan...
> seperti mencari dgn nama atau nim..
> dan pda kolom pencarian jika saya mengetik huru "a" maka nama2 yang
> depannya "a" akan muncul di bawah (seperti pencarian pada google)...
>
> maaf kloe penjelasan saja agak membingungkan...
>
> https://www.box.com/s/eswg9wfjivenrym8dg4b
>
>
>
Coba file terlampir yang memanfaatkan properti LinkedCell dari activex
control yang digunakan.
Kemudian dibantu dengan beberapa cell sebagai penentu indeks kolom data
yang harus diperiksa beserta susunan teks kriterianya.
Untuk membuat daftar hasil filter digunakan kolom bantu yang berisi array
formula filtering
coretan tentang array formula filtering bisa dibaca
disini<http://excel-
File terlampir.
Wassalamu'
Kid.
2013/6/28 eyeshield_ic@
> **
>
>
> Assalamualaikum wr wb...
> saya baru mengenal dunia excel. saya belum mahir dengan vba...
> saya mau mnta bantuan membuat tombol pencarian sebuah data berdasarkan
> pilihan...
> seperti mencari dgn nama atau nim..
> dan pda kolom pencarian jika saya mengetik huru "a" maka nama2 yang
> depannya "a" akan muncul di bawah (seperti pencarian pada google)...
>
> maaf kloe penjelasan saja agak membingungkan.
>
> https://www.
>
>
>
Sat Jun 29, 2013 12:18 pm (PDT) . Posted by:
"eyeshield_ic@rocketmail.com" eyeshield_ic@rocketmail.com
terikasih buat smua master2 yg udah menjelaskan jln keluar nya...
alhamdulillah sya sudah dpt jln keluarnya berkat bimbingan dri masta2
smua
sekali lg sya ucapkan terimakasih banyak.... [=P~]
alhamdulillah sya sudah dpt jln keluarnya berkat bimbingan dri masta2
smua
sekali lg sya ucapkan terimakasih banyak.... [=P~]
Terima kasih respond nya Mr. Kid.
Powered by Telkomsel BlackBerry®
-----Original Message-----
From: "Mr. Kid" <mr.nmkid@gmail.com >
Sender: belajar-excel@yahoogroups.com
Date: Sat, 29 Jun 2013 21:29:15
To: BeExcel<belajar-excel@yahoogroups.com >
Reply-To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Pengosongan Isi variabel
Wa'alaikumussalam Wr. Wb.
Andaikan dalam satu sub routine, setelah proses deklarasi beberapa variabel
melalui statement DIM, seberapa banyak pengaruh nya terhadap kinerja
aplikasi VBA apabila subroutine tsb di run ber ulang2 ?
>> Variabel yang dideklarasikan dalam sebuah prosedur akan dibuang begitu
prosedur tersebut mencapai baris End dan tidak ada pengaruhnya jika
prosedur dijalankan berulang kali selama selalu bisa selesai sebelum
dijalankan lagi. Beda halnya dengan prosedur yang bersifat rekursif, yaitu
prosedur yang didalam prosesnya menjalankan si prosedur itu kembali. Pada
prosedur yang refkursif semacam ini, maka penggunaan memory akan bertambah
setiap kali prosedur tersebut dijalankan.
Contoh :
Public Sub Rekursif(optional lNilai as long)
dim lLoop as long
for lLoop=1 to 10
lNilai =lNilai + rekursif( lNilai )
next lLoop
End Sub
maka variabel lLoop akan ada banyak di memory walau nilainya dari 1 sampai
10.
Apakah perlu setiap akhir subroutine isi variabel yg sudah kita
deklarasikan diawaln kita kosong kan lagi ?
>> tidak perlu
Mungkin dengan cara variabel = "" ? Atau mungkin ada cara lain ?
>> cara ini memang bisa untuk mengosongkan variabel bertipe string, tetapi
katanya orang jaman dulu, akan lebih cepat dengan :
variabel_bertipe_string = vbnullstring
Konsern saya hanya apabila pada saat proses testing sebuah subroutine,
dimana kita harus me run ber ulang-ulang, memory komputer jadi penuh dan
berpengaruh thd kinerja aplikasi kita.
>> Selama variabel dideklarasikan dalam sebuah prosedur, maka tidak perlu
kuatir memory akan habis karena si variabel. Yang harus di-konsern-ken
adalah pemilihan tipe data bagi variabel yang sangat melebihi kebutuhan
nilai data yang akan disimpan.
Wassalam,
Kid.
2013/6/29 <sony.ario1@gmail.com >
> Assalamualaikum.
>
> Hanya ingin tau. Andaikan dalam satu sub routine, setelah proses deklarasi
> beberapa variabel melalui statement DIM, seberapa banyak pengaruh nya
> terhadap kinerja aplikasi VBA apabila subroutine tsb di run ber ulang2 ?
>
> Apakah perlu setiap akhir subroutine isi variabel yg sudah kita
> deklarasikan diawaln kita kosong kan lagi ? Mungkin dengan cara variabel =
> "" ? Atau mungkin ada cara lain ?
>
> Konsern saya hanya apabila pada saat proses testing sebuah subroutine,
> dimana kita harus me run ber ulang-ulang, memory komputer jadi penuh dan
> berpengaruh thd kinerja aplikasi kita.
>
> Terima kasih sebelumnya.
>
> Wassalam
> Sony
> Powered by Telkomsel BlackBerry®
>
> ------------------------------------
>
> =====================================================================
> 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
> ----------------------------------------------------------Yahoo!
> Groups Links
>
>
>
>
Powered by Telkomsel BlackBerry®
-----Original Message-----
From: "Mr. Kid" <mr.nmkid@gmail.
Sender: belajar-excel@
Date: Sat, 29 Jun 2013 21:29:15
To: BeExcel<belajar-excel@
Reply-To: belajar-excel@
Subject: Re: [belajar-excel] Pengosongan Isi variabel
Wa'alaikumussal
Andaikan dalam satu sub routine, setelah proses deklarasi beberapa variabel
melalui statement DIM, seberapa banyak pengaruh nya terhadap kinerja
aplikasi VBA apabila subroutine tsb di run ber ulang2 ?
>> Variabel yang dideklarasikan dalam sebuah prosedur akan dibuang begitu
prosedur tersebut mencapai baris End dan tidak ada pengaruhnya jika
prosedur dijalankan berulang kali selama selalu bisa selesai sebelum
dijalankan lagi. Beda halnya dengan prosedur yang bersifat rekursif, yaitu
prosedur yang didalam prosesnya menjalankan si prosedur itu kembali. Pada
prosedur yang refkursif semacam ini, maka penggunaan memory akan bertambah
setiap kali prosedur tersebut dijalankan.
Contoh :
Public Sub Rekursif(optional lNilai as long)
dim lLoop as long
for lLoop=1 to 10
lNilai =lNilai + rekursif( lNilai )
next lLoop
End Sub
maka variabel lLoop akan ada banyak di memory walau nilainya dari 1 sampai
10.
Apakah perlu setiap akhir subroutine isi variabel yg sudah kita
deklarasikan diawaln kita kosong kan lagi ?
>> tidak perlu
Mungkin dengan cara variabel = "" ? Atau mungkin ada cara lain ?
>> cara ini memang bisa untuk mengosongkan variabel bertipe string, tetapi
katanya orang jaman dulu, akan lebih cepat dengan :
variabel_bertipe_
Konsern saya hanya apabila pada saat proses testing sebuah subroutine,
dimana kita harus me run ber ulang-ulang, memory komputer jadi penuh dan
berpengaruh thd kinerja aplikasi kita.
>> Selama variabel dideklarasikan dalam sebuah prosedur, maka tidak perlu
kuatir memory akan habis karena si variabel. Yang harus di-konsern-ken
adalah pemilihan tipe data bagi variabel yang sangat melebihi kebutuhan
nilai data yang akan disimpan.
Wassalam,
Kid.
2013/6/29 <sony.ario1@gmail.
> Assalamualaikum.
>
> Hanya ingin tau. Andaikan dalam satu sub routine, setelah proses deklarasi
> beberapa variabel melalui statement DIM, seberapa banyak pengaruh nya
> terhadap kinerja aplikasi VBA apabila subroutine tsb di run ber ulang2 ?
>
> Apakah perlu setiap akhir subroutine isi variabel yg sudah kita
> deklarasikan diawaln kita kosong kan lagi ? Mungkin dengan cara variabel =
> "" ? Atau mungkin ada cara lain ?
>
> Konsern saya hanya apabila pada saat proses testing sebuah subroutine,
> dimana kita harus me run ber ulang-ulang, memory komputer jadi penuh dan
> berpengaruh thd kinerja aplikasi kita.
>
> Terima kasih sebelumnya.
>
> Wassalam
> Sony
> Powered by Telkomsel BlackBerry®
>
> ------------
>
> ============
> 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.
> ============
> 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-
>
> posting ke milis, kirimkan ke:
> belajar-excel@
>
> berkunjung ke web milis
> http://tech.
>
> melihat file archive / mendownload lampiran
> http://www.mail-
> atau (sejak 25-Apr-2011) bisa juga di :
> http://milis-
>
> menghubungi moderators & owners: belajar-excel-
>
> keluar dari membership milis (UnSubscribe)
> kirim mail kosong ke belajar-excel-
> ------------
> Groups Links
>
>
>
>
Sat Jun 29, 2013 7:19 pm (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Wa'alaikumussalam Wr. Wb.
sorry baru hari bisa sampai halaman berikutnya di Inbox (ketahuan pakai
LIFO deh).
Tabel transaksi tentang (bertema) data training bisa mengeluarkan output
tentang kegiatan training, seperti tema training apa yang belum pernah
diikuti oleh karyawan yang pernah training minimal 1 kali. Yang tidak ada
datanya di tabel ini adalah peserta yang belum pernah training dan memang
harus demikian.
Data sdm berisi data seluruh karyawan. Dari data sdm ini bisa disusun
datasource seluruh karyawan beserta status terakhir training yang diikuti.
Dari tabel datasource inilah nanti bisa dibuat report tentang karyawan yang
belum pernah training sama sekali.
tabel di sheet database sdm yang ada dalam file terlampir adalah datasource
seluruh karyawan beserta status terakhir training. Jadi bukan database
kepegawaian loh ya.
Jika data seperti ini diolah dengan query (misal memanfaatkan fitur
GetExternalData), maka datasource bisa dihasilkan dengan sebuah query untuk
menjadi seluruh output, mulai dari data pernah training sampai yang belum
pernah training sama sekali.
Wassalamu'alaikum Wr. Wb.
Kid.
2013/6/27 Prodev SIMPLE PB <prodev_simple@yahoo.com >
> **
>
>
> Assalamu'alaikum Wr. Wb.
>
> Menindaklanjuti solusi yang pernah dibuatkan oleh Mr. Kid atas
> permasalahan yang pernah saya sampaikan. Setelah diimplementasikan, masih
> ada hal-hal yang perlu ditanyakan. Masih ada ketidakmudhengan di satu dua
> hal...
> Penjelasan lebih lanjut sebagaimana terdapat dalam file terlampir.
> Atas solusi dari Mr. Kid dan para member yang lain, disampaikan matur
> suwun sanget.
>
> Wassalamu'alaikum Wr. Wb.
>
> - prodev simple -
>
>
>
>
sorry baru hari bisa sampai halaman berikutnya di Inbox (ketahuan pakai
LIFO deh).
Tabel transaksi tentang (bertema) data training bisa mengeluarkan output
tentang kegiatan training, seperti tema training apa yang belum pernah
diikuti oleh karyawan yang pernah training minimal 1 kali. Yang tidak ada
datanya di tabel ini adalah peserta yang belum pernah training dan memang
harus demikian.
Data sdm berisi data seluruh karyawan. Dari data sdm ini bisa disusun
datasource seluruh karyawan beserta status terakhir training yang diikuti.
Dari tabel datasource inilah nanti bisa dibuat report tentang karyawan yang
belum pernah training sama sekali.
tabel di sheet database sdm yang ada dalam file terlampir adalah datasource
seluruh karyawan beserta status terakhir training. Jadi bukan database
kepegawaian loh ya.
Jika data seperti ini diolah dengan query (misal memanfaatkan fitur
GetExternalData)
menjadi seluruh output, mulai dari data pernah training sampai yang belum
pernah training sama sekali.
Wassalamu'
Kid.
2013/6/27 Prodev SIMPLE PB <prodev_simple@
> **
>
>
> Assalamu'
>
> Menindaklanjuti solusi yang pernah dibuatkan oleh Mr. Kid atas
> permasalahan yang pernah saya sampaikan. Setelah diimplementasikan, masih
> ada hal-hal yang perlu ditanyakan. Masih ada ketidakmudhengan di satu dua
> hal...
> Penjelasan lebih lanjut sebagaimana terdapat dalam file terlampir.
> Atas solusi dari Mr. Kid dan para member yang lain, disampaikan matur
> suwun sanget.
>
> Wassalamu'
>
> - prodev simple -
>
>
>
>
Sun Jun 30, 2013 1:31 am (PDT) . Posted by:
"Mr. Kid" nmkid.family@ymail.com
Apakah yang dimaksud adalah *menambahkan kriteria berdasar tahun pada
formula yang sudah Anda buat* ?
Jika demikian, kira-kira begini.
Formula yang sudah ada (belum dipengaruhi data tahunnya) : [array formula
di cell i8]
=SUM(IF(*$I$6=Detail!$M$8:$M$939*,Detail!$A$8:$A$939))
bagian yang *biru *adalah kriteria pertama yang sudah Anda buat.
Bagian biru tersebut yang harus diubah agar berisi 2 kriteria, yaitu
kriteria yang sudah ada DAN kriteria berdasar nilai tahun.
Supaya lebih aman, bagian yang dibiru dikurung dulu menjadi :
=SUM(IF(* ($I$6=Detail!$M$8:$M$939) *,Detail!$A$8:$A$939))
Sekarang, saatnya memperhatikan nilai data dan nilai kriteria.
Nilai data ada di sheet Detail dari B8:B939 dengan contoh nilai data
berbunyi : YTD 2013 atau YTD 2014
Nilai kriteria di sheet hasil bernama Summary, pada cell H8 dengan contoh
nilai data berbunyi 2013 atau 2014 bertipe numerik
Dari kedua nilai diatas akan diperbandingkan sisi data tahunnya, yaitu :
> pada nilai data di 4 karakter terakhirnya yang bisa didapat dengan
formulasi Right( detail!$b$8:$b$939 , 4 )
> harus sama dengan
> nilai kriteria di H8 (kolom tetap -> artinya di-absolut kolom menjadi
$H8) yang bertipe text yang bisa diformulasi dengan $H8 & ""
> jadi kalimat perbandingannya adalah
Right( detail!$b$8:$b$939 , 4 ) = $H8 & ""
> kalimat perbandingan tersebut dikurung dulu supaya aman dipakai menjadi :
*( Right( detail!$b$8:$b$939 , 4 ) = $H8 & "" )*
Sudah didapatkan 2 kriteria, yaitu :
1. berbunyi : * ($I$6=Detail!$M$8:$M$939)
*
2. berbunyi :* ( Right( detail!$b$8:$b$939 , 4 ) = $H8 & "" )*
yang keduanya harus terpenuhi semuanya (DAN) yang menggunakan logika AND
yang setara dengan perkalian (*)
maka seluruh kriteria bisa disusun menjadi sebuah kalimat kriteria berisi 2
syarat sebagai :
kriteria_pertama * kriteria_kedua
yaitu :
*($I$6=Detail!$M$8:$M$939)** ** *( Right( detail!$b$8:$b$939 , 4 )
= $H8 & "" )*
Bunyi kriteria ini akan menggantikan bagian biru dalam formula di cell i8
yang berbunyi :
=SUM(IF(* ($I$6=Detail!$M$8:$M$939) *,Detail!$A$8:$A$939))
hingga menjadi berbunyi :
=SUM(IF(* **($I$6=Detail!$M$8:$M$939) * ( Right(
detail!$b$8:$b$939 , 4 ) = $H8 & "" ) *,Detail!$A$8:$A$939))
Karena formula harus bisa di-copy ke kolom lainnya, maka rujukan ke $i$6
yang absolute baris dan kolom harus diganti agar hanya absolute baris saja,
sehingga ketika dicopy ke kolom lain, rujukan ke i6 akan berubah mengikuti
kolom yang baru. Rujukan tersebut menjadi i$6 dan formula akan menjadi :
=SUM(IF(* **( I$6=Detail!$M$8:$M$939) * ( Right(
detail!$b$8:$b$939 , 4 ) = $H8 & "" ) *,Detail!$A$8:$A$939))
Supaya seragam bentuk perbandingannya, yaitu *nilai_data operator
nilai_kriteria*
maka susunan bagian biru diubah dari :
* ( I$6=Detail!$M$8:$M$939) *
menjadi :
* ( Detail!$M$8:$M$939 = ** I$6 ) *
dan formula akan berbunyi :
=SUM(IF(* **( Detail!$M$8:$M$939 = I$6 ) * ( Right(
detail!$b$8:$b$939 , 4 ) = $H8 & "" ) *,Detail!$A$8:$A$939))
Sampai disini, sudah didapatkan formula (array) yang berisi 2 kriteria.
Berikutnya :
Karena fungsi terluarnya adalah proses SUM, maka selama kriteria
menghasilkan nilai yang akan di-sum atau nol, maka hasilnya akan tetap
benar. SUM( 1 , 0, 3 , 0 , 0 , 1 ) hasilnya tetap 5 seperti SUM( 1 , FALSE
, 3 , FALSE , FALSE , 1 )
Perbandingan selalu akan menghasilkan 0 (false) atau 1 (true), maka bagian
kriteria berbunyi :
* ( Detail!$M$8:$M$939 = I$6 ) * ( Right( detail!$b$8:$b$939 , 4 )
= $H8 & "" )*
pastilah hasilnya 0 atau 1.
Berhubung perkalian dalam matematika sejak jaman dulu selalu saja
mengatakan semua yang dikali 0 akan menghasilkan 0 dan yang dikalikan 1
akan menghasilkan dirinya sendiri, maka bunyi :
* ( Detail!$M$8:$M$939 = I$6 ) * ( Right( detail!$b$8:$b$939 , 4 )
= $H8 & "" ) * *Detail!$A$8:$A$939
akan tetap menghasilkan 0 ketika kriteria tidak terpenuhi atau nilai
Detail!$A$8:$A$939 ketika kriteria terpenuhi.
Maka bagian IF dalam formula bisa dibuang menjadi : (tetap array formula)
=SUM( *( Detail!$M$8:$M$939 = I$6 ) * ( Right(
detail!$b$8:$b$939 , 4 ) = $H8 & "" ) * *Detail!$A$8:$A$939 )
psssttt, katanya sih, di Excel ada fungsi sum-sum-an yang ndak perlu jadi
array formula walau yang diproses adalah array....
katanya lagi, nama fungsinya adalah SumProduct... gimana kalau dipakai
saja...
nanti bunyi formula (bukan array formula) menjadi :
=SUM*Product*( *( Detail!$M$8:$M$939 = I$6 ) * ( Right(
detail!$b$8:$b$939 , 4 ) = $H8 & "" ) * *Detail!$A$8:$A$939 )
konon, Excel 2007 keatas juga menyediakan fungsi Sum yang bisa mengolah
banyak kriteria, namanya SumIFs.
Untuk menggunakan fungsi ini, maka bagian kriteria kedua (merah) harus
disesuaikan lagi bunyi kriterianya menjadi :
"yang diakhiri dengan angka tahun terpilih"
Maka susunan fungsi SumIFs nya akan menjadi :
=SumIFs( Detail!$A$8:$A$939 , *Detail!$M$8:$M$939* , *I$6* , *
detail!$b$8:$b$939* , "*" & *$H8* )
bagian yang dilatar kuning itulah yang berbunyi :
"yang diakhiri dengan angka tahun terpilih"
karena karakter * artinya sebarang karakter, sehingga ketika si H8 berisi
nilai 2013,
bagian latar kuning menjadi bernilai *2013
yang berarti "yang diakhiri dengan angka tahun 2013"
yang bahasa londo mesinnya adalah "sebarang karakter yang diakhiri oleh
2013"
Obrolan diatas berlaku untuk : *menambahkan kriteria berdasar tahun pada
formula yang sudah Anda buat*
Oh iya, jika regional setting komputer setempat adalah Indonesia, maka
ganti seluruh karakter koma dalam formula menjadi karakter titik koma.
Wassalam,
Kid.
2013/6/28 firman 21 <firman.2121@gmail.com >
> **
>
>
> Dear Rekan,
>
> Saya sedang belajar membuat perhitungan dengan tabel excel sederhana
> untuk menghitung orang yang akan di recruit, promosi, aktivitas ini akan
> di capture untuk 2 tahun ( YTG 2013 dan 2014).
>
> Kemudian data ini di summarykan, saya sudah mencoba men summary kan nya,
> jika hanya satu tahun datanya sudah bisa ke capture, tetapi jika 2 tahun,
> saya kebingungan dengan cara menghitungnya.
>
> Mohon bantuan dan pencerahannya, terima kasih sebelumnya.
>
> salam
> firman
>
>
>
formula yang sudah Anda buat* ?
Jika demikian, kira-kira begini.
Formula yang sudah ada (belum dipengaruhi data tahunnya) : [array formula
di cell i8]
=SUM(IF(*$I$
bagian yang *biru *adalah kriteria pertama yang sudah Anda buat.
Bagian biru tersebut yang harus diubah agar berisi 2 kriteria, yaitu
kriteria yang sudah ada DAN kriteria berdasar nilai tahun.
Supaya lebih aman, bagian yang dibiru dikurung dulu menjadi :
=SUM(IF(* ($I$6=Detail!
Sekarang, saatnya memperhatikan nilai data dan nilai kriteria.
Nilai data ada di sheet Detail dari B8:B939 dengan contoh nilai data
berbunyi : YTD 2013 atau YTD 2014
Nilai kriteria di sheet hasil bernama Summary, pada cell H8 dengan contoh
nilai data berbunyi 2013 atau 2014 bertipe numerik
Dari kedua nilai diatas akan diperbandingkan sisi data tahunnya, yaitu :
> pada nilai data di 4 karakter terakhirnya yang bisa didapat dengan
formulasi Right( detail!$b$8:
> harus sama dengan
> nilai kriteria di H8 (kolom tetap -> artinya di-absolut kolom menjadi
$H8) yang bertipe text yang bisa diformulasi dengan $H8 & ""
> jadi kalimat perbandingannya adalah
Right( detail!$b$8:
> kalimat perbandingan tersebut dikurung dulu supaya aman dipakai menjadi :
*( Right( detail!$b$8:
Sudah didapatkan 2 kriteria, yaitu :
1. berbunyi : * ($I$6=Detail!
*
2. berbunyi :* ( Right( detail!$b$8:
yang keduanya harus terpenuhi semuanya (DAN) yang menggunakan logika AND
yang setara dengan perkalian (*)
maka seluruh kriteria bisa disusun menjadi sebuah kalimat kriteria berisi 2
syarat sebagai :
kriteria_pertama * kriteria_kedua
yaitu :
*($I$6=Detail!
= $H8 & "" )*
Bunyi kriteria ini akan menggantikan bagian biru dalam formula di cell i8
yang berbunyi :
=SUM(IF(* ($I$6=Detail!
hingga menjadi berbunyi :
=SUM(IF(* **($I$6=Detail!
detail!$b$8:
Karena formula harus bisa di-copy ke kolom lainnya, maka rujukan ke $i$6
yang absolute baris dan kolom harus diganti agar hanya absolute baris saja,
sehingga ketika dicopy ke kolom lain, rujukan ke i6 akan berubah mengikuti
kolom yang baru. Rujukan tersebut menjadi i$6 dan formula akan menjadi :
=SUM(IF(* **( I$6=Detail!$
detail!$b$8:
Supaya seragam bentuk perbandingannya, yaitu *nilai_data operator
nilai_kriteria*
maka susunan bagian biru diubah dari :
* ( I$6=Detail!$
menjadi :
* ( Detail!$M$8:
dan formula akan berbunyi :
=SUM(IF(* **( Detail!$M$8:
detail!$b$8:
Sampai disini, sudah didapatkan formula (array) yang berisi 2 kriteria.
Berikutnya :
Karena fungsi terluarnya adalah proses SUM, maka selama kriteria
menghasilkan nilai yang akan di-sum atau nol, maka hasilnya akan tetap
benar. SUM( 1 , 0, 3 , 0 , 0 , 1 ) hasilnya tetap 5 seperti SUM( 1 , FALSE
, 3 , FALSE , FALSE , 1 )
Perbandingan selalu akan menghasilkan 0 (false) atau 1 (true), maka bagian
kriteria berbunyi :
* ( Detail!$M$8:
= $H8 & "" )*
pastilah hasilnya 0 atau 1.
Berhubung perkalian dalam matematika sejak jaman dulu selalu saja
mengatakan semua yang dikali 0 akan menghasilkan 0 dan yang dikalikan 1
akan menghasilkan dirinya sendiri, maka bunyi :
* ( Detail!$M$8:
= $H8 & "" ) * *Detail!$A$8:
akan tetap menghasilkan 0 ketika kriteria tidak terpenuhi atau nilai
Detail!$A$8:
Maka bagian IF dalam formula bisa dibuang menjadi : (tetap array formula)
=SUM( *( Detail!$M$8:
detail!$b$8:
psssttt, katanya sih, di Excel ada fungsi sum-sum-an yang ndak perlu jadi
array formula walau yang diproses adalah array....
katanya lagi, nama fungsinya adalah SumProduct..
saja...
nanti bunyi formula (bukan array formula) menjadi :
=SUM*Product*
detail!$b$8:
konon, Excel 2007 keatas juga menyediakan fungsi Sum yang bisa mengolah
banyak kriteria, namanya SumIFs.
Untuk menggunakan fungsi ini, maka bagian kriteria kedua (merah) harus
disesuaikan lagi bunyi kriterianya menjadi :
"yang diakhiri dengan angka tahun terpilih"
Maka susunan fungsi SumIFs nya akan menjadi :
=SumIFs( Detail!$A$8:
detail!$b$8:
bagian yang dilatar kuning itulah yang berbunyi :
"yang diakhiri dengan angka tahun terpilih"
karena karakter * artinya sebarang karakter, sehingga ketika si H8 berisi
nilai 2013,
bagian latar kuning menjadi bernilai *2013
yang berarti "yang diakhiri dengan angka tahun 2013"
yang bahasa londo mesinnya adalah "sebarang karakter yang diakhiri oleh
2013"
Obrolan diatas berlaku untuk : *menambahkan kriteria berdasar tahun pada
formula yang sudah Anda buat*
Oh iya, jika regional setting komputer setempat adalah Indonesia, maka
ganti seluruh karakter koma dalam formula menjadi karakter titik koma.
Wassalam,
Kid.
2013/6/28 firman 21 <firman.2121@
> **
>
>
> Dear Rekan,
>
> Saya sedang belajar membuat perhitungan dengan tabel excel sederhana
> untuk menghitung orang yang akan di recruit, promosi, aktivitas ini akan
> di capture untuk 2 tahun ( YTG 2013 dan 2014).
>
> Kemudian data ini di summarykan, saya sudah mencoba men summary kan nya,
> jika hanya satu tahun datanya sudah bisa ke capture, tetapi jika 2 tahun,
> saya kebingungan dengan cara menghitungnya.
>
> Mohon bantuan dan pencerahannya, terima kasih sebelumnya.
>
> salam
> firman
>
>
>
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