Rabu, 03 Juli 2013

[belajar-excel] Digest Number 2400

9 New Messages

Digest #2400
1a
Cara SaveAsCopy Workbook ke Path Tertentu by "ones_marle_oke" ones_marle_oke
1b
Re: Cara SaveAsCopy Workbook ke Path Tertentu by "Mr. Kid" nmkid.family@ymail.com
1c
Re: Cara SaveAsCopy Workbook ke Path Tertentu by "ones_marle_oke" ones_marle_oke
1d
Re: Cara SaveAsCopy Workbook ke Path Tertentu by "Mr. Kid" nmkid.family@ymail.com
1e
Re: Cara SaveAsCopy Workbook ke Path Tertentu by "ones_marle_oke" ones_marle_oke
1f
Re: Cara SaveAsCopy Workbook ke Path Tertentu by "Mr. Kid" nmkid.family@ymail.com
2a
Login+authority by "ana anta" anaanta321
2b
Re: Login+authority by "ones_marle_oke" ones_marle_oke

Messages

Wed Jul 3, 2013 3:09 am (PDT) . Posted by:

"ones_marle_oke" ones_marle_oke

Salam Super semua untuk BeExcel... (Selamat Sore....) :)

Om, Tante, Brother, Sistah semua yang ada disini... #kok malah nyanyi ya saya... (guyonan sedikit aja si)

Mau tanya neh... -> *ujung - ujungnya malah nanya

Bagaimana ya cara untuk saveascopy workbook ke directory yang lain.
Jadi gini, ada "wbkDB" (sebagai workbook yang menjadi penyimpanan datanya)
nah terus, didalam "wbkDB" ini pnya 3 sheet yg isinya : sheet A, sheet B dan sheet C.

Namun saat ingin mau saya saveascopy "wbkDB" ini, ada (sheet C) yang harus saya 'Delete' terlebih dahulu sblm saya simpan ke directory lain. Ini berfungsi untuk data BackUp dari "wbkDB" saja. Karena suatu saat "wbkDB" ini hilang atau corrupt, saya masih mempunyai data BackUp dari "wbkDB" tersebut.

Nah begitu deh cerita panjang pendeknya neh BeExcel.
Saya mencoba untuk delete sheet baru simpan (saveascopy), tp malah kena debug mlulu..
(Sedihnya nasib ini)

contoh perjalanan script :
myDB = "D:\(Nama Directory)\DB_ELS.xls"
myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file
set wbkDB = workbook.open(myDB)
wbkDB.save -> untuk menyimpan file utama
set wsDB = wbkDB.worksheets("Sheet C") -> Stuck ga ngerti cara deleted sheet tersebut
wbkDB.SaveAsCopy myDBBackUp

Dari script diatas, selalu BUG terus.. Mumet, apakah ada yang terlewatkan dari perjalanan script tersebut ?

Terima kasih neh BeExcel yang bs mmberikan pencerahan dan penjelasan dari kesalahan script diatas...

Wed Jul 3, 2013 3:24 am (PDT) . Posted by:

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

Kalau ndak salah, maksudnya ada file utama yang berisi sheet A,B,C.
Yang akan dipakai adalah file yang berisi sheet A,B saja dan juga file yang
berisi A,B ini dibuatkan salinan nya di folder lain.

myDB = "D:\(Nama Directory)\DB_ELS.xls"
myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file

application.displayalerts=false
set wbkDB = workbook.open(myDB)
'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah mau
di-save

'hapus sheet bernama Sheet C
'set wsDB = wbkDB.worksheets("Sheet C") '-> Stuck ga ngerti cara
deleted sheet tersebut
wbkdb.sheets("Sheet C").delete

'savecopyas dengan nama yang sama tapi di folder beda
'wbkDB.SaveAsCopy myDBBackUp
wbkdb.savecopyas mydbbackup & "\" & wbkdb.name

application.displayalerts=true

Wassalam,
Kid.

2013/7/3 ones_marle_oke <ones_marle_oke@yahoo.com>

> **
>
>
> Salam Super semua untuk BeExcel... (Selamat Sore....) :)
>
> Om, Tante, Brother, Sistah semua yang ada disini... #kok malah nyanyi ya
> saya... (guyonan sedikit aja si)
>
> Mau tanya neh... -> *ujung - ujungnya malah nanya
>
> Bagaimana ya cara untuk saveascopy workbook ke directory yang lain.
> Jadi gini, ada "wbkDB" (sebagai workbook yang menjadi penyimpanan datanya)
> nah terus, didalam "wbkDB" ini pnya 3 sheet yg isinya : sheet A, sheet B
> dan sheet C.
>
> Namun saat ingin mau saya saveascopy "wbkDB" ini, ada (sheet C) yang harus
> saya 'Delete&#39; terlebih dahulu sblm saya simpan ke directory lain. Ini
> berfungsi untuk data BackUp dari "wbkDB" saja. Karena suatu saat "wbkDB"
> ini hilang atau corrupt, saya masih mempunyai data BackUp dari "wbkDB"
> tersebut.
>
> Nah begitu deh cerita panjang pendeknya neh BeExcel.
> Saya mencoba untuk delete sheet baru simpan (saveascopy), tp malah kena
> debug mlulu..
> (Sedihnya nasib ini)
>
> contoh perjalanan script :
> myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file
> set wbkDB = workbook.open(myDB)
> wbkDB.save -> untuk menyimpan file utama
> set wsDB = wbkDB.worksheets("Sheet C") -> Stuck ga ngerti cara deleted
> sheet tersebut
> wbkDB.SaveAsCopy myDBBackUp
>
> Dari script diatas, selalu BUG terus.. Mumet, apakah ada yang terlewatkan
> dari perjalanan script tersebut ?
>
> Terima kasih neh BeExcel yang bs mmberikan pencerahan dan penjelasan dari
> kesalahan script diatas...
>
>
>

Wed Jul 3, 2013 4:04 am (PDT) . Posted by:

"ones_marle_oke" ones_marle_oke

Bener om Kid. Jadi Sheet A dan B berserta isinya akan di simpan ke folder lain. Ya intinya si, mau backup 'wbkDB&#39; ini tanpa Sheet C.

{'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah mau di-save} -> ah bisa aja ini si om Kid. Kan cm jln cerita mksdnya.

Mau tanya sedikit lg deh om tentang maksud ini :
1. application.displayalerts=false -> Ini gunanya untuk apa ya ?
2. {wbkdb.'name'} -> untuk name yg saya beri tanda kutip ini, ini sebuah pedeklarasian terlebih dahulu tidak?

Sekali lagi terima kasih ya om Kid..
#ngomong", Kopdar ver2 diadakan kpn lagi ya?
-> mau ikut klo ada kopdar lagi..

--- In belajar-excel@yahoogroups.com, "Mr. Kid" <mr.nmkid@...> wrote:
>
> Kalau ndak salah, maksudnya ada file utama yang berisi sheet A,B,C.
> Yang akan dipakai adalah file yang berisi sheet A,B saja dan juga file yang
> berisi A,B ini dibuatkan salinan nya di folder lain.
>
> myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file
>
> application.displayalerts=false
> set wbkDB = workbook.open(myDB)
> 'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah mau
> di-save
>
> 'hapus sheet bernama Sheet C
> 'set wsDB = wbkDB.worksheets("Sheet C") '-> Stuck ga ngerti cara
> deleted sheet tersebut
> wbkdb.sheets("Sheet C").delete
>
> 'savecopyas dengan nama yang sama tapi di folder beda
> 'wbkDB.SaveAsCopy myDBBackUp
> wbkdb.savecopyas mydbbackup & "\" & wbkdb.name
>
> application.displayalerts=true
>
> Wassalam,
> Kid.
>
>
>
> 2013/7/3 ones_marle_oke <ones_marle_oke@...>
>
> > **
> >
> >
> > Salam Super semua untuk BeExcel... (Selamat Sore....) :)
> >
> > Om, Tante, Brother, Sistah semua yang ada disini... #kok malah nyanyi ya
> > saya... (guyonan sedikit aja si)
> >
> > Mau tanya neh... -> *ujung - ujungnya malah nanya
> >
> > Bagaimana ya cara untuk saveascopy workbook ke directory yang lain.
> > Jadi gini, ada "wbkDB" (sebagai workbook yang menjadi penyimpanan datanya)
> > nah terus, didalam "wbkDB" ini pnya 3 sheet yg isinya : sheet A, sheet B
> > dan sheet C.
> >
> > Namun saat ingin mau saya saveascopy "wbkDB" ini, ada (sheet C) yang harus
> > saya 'Delete&#39; terlebih dahulu sblm saya simpan ke directory lain. Ini
> > berfungsi untuk data BackUp dari "wbkDB" saja. Karena suatu saat "wbkDB"
> > ini hilang atau corrupt, saya masih mempunyai data BackUp dari "wbkDB"
> > tersebut.
> >
> > Nah begitu deh cerita panjang pendeknya neh BeExcel.
> > Saya mencoba untuk delete sheet baru simpan (saveascopy), tp malah kena
> > debug mlulu..
> > (Sedihnya nasib ini)
> >
> > contoh perjalanan script :
> > myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> > myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file
> > set wbkDB = workbook.open(myDB)
> > wbkDB.save -> untuk menyimpan file utama
> > set wsDB = wbkDB.worksheets("Sheet C") -> Stuck ga ngerti cara deleted
> > sheet tersebut
> > wbkDB.SaveAsCopy myDBBackUp
> >
> > Dari script diatas, selalu BUG terus.. Mumet, apakah ada yang terlewatkan
> > dari perjalanan script tersebut ?
> >
> > Terima kasih neh BeExcel yang bs mmberikan pencerahan dan penjelasan dari
> > kesalahan script diatas...
> >
> >
> >
>

Wed Jul 3, 2013 4:24 am (PDT) . Posted by:

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

1. application.displayalerts=false -> Ini gunanya untuk apa ya ?
>> Excel sering kelewatan cerewetnya, karena saking hati-hatinya terhadap
data. Akhirnya, sering muncul yang namanya dialog konfirmasi. Terutama saat
akan hapus sheet atau akan save file.
>> properti DisplayAlerts milik object Application adalah pernyataan sikap
user terhadap kecerewetan Excel ini. Jika nilai properti diset FALSE, maka
si Excel diminta user untuk tidak cerewet.
>> Sebaiknya, properti ini dikembalikan menjadi TRUE diakhir proses
(kasihan si Excel kalau ndak diijinkan cerewet, kuatirnya nanti malah
stress) agar dapat keuntungan dari kehati-hatian si Excel dalam menangani
data.

2. wbkdb.name -> untuk name itu, ini sebuah pedeklarasian terlebih
dahulu tidak?
>> variabel wbkdb memiliki type workbook.
>> name adalah sebuah properti milik object Workbook yang berisi nilai nama
workbook.
>> jadi tidak perlu deklarasi apa-apa, karena sekedar menggunakan nilai
yang disimpan oleh sebuah properti dalam suatu object.

#ngomong", Kopdar ver2 diadakan kpn lagi ya?
-> mau ikut klo ada kopdar lagi..
>> sedang menunggu panitia untuk mengadakan rekrutmen kepanitiaan kopdar2.
Kalau BeExceller yang bersedia menjadi panitia cuman dikit, bisa jadi butuh
waktu yang lama untuk bisa mewujudkan kopdar2.

Wassalam
Kid.

2013/7/3 ones_marle_oke <ones_marle_oke@yahoo.com>

> **
>
>
> Bener om Kid. Jadi Sheet A dan B berserta isinya akan di simpan ke folder
> lain. Ya intinya si, mau backup 'wbkDB&#39; ini tanpa Sheet C.
>
> {'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah mau
> di-save} -> ah bisa aja ini si om Kid. Kan cm jln cerita mksdnya.
>
> Mau tanya sedikit lg deh om tentang maksud ini :
> 1. application.displayalerts=false -> Ini gunanya untuk apa ya ?
> 2. {wbkdb.'name'} -> untuk name yg saya beri tanda kutip ini, ini sebuah
> pedeklarasian terlebih dahulu tidak?
>
> Sekali lagi terima kasih ya om Kid..
> #ngomong", Kopdar ver2 diadakan kpn lagi ya?
> -> mau ikut klo ada kopdar lagi..
>
>
> --- In belajar-excel@yahoogroups.com, "Mr. Kid" <mr.nmkid@...> wrote:
> >
> > Kalau ndak salah, maksudnya ada file utama yang berisi sheet A,B,C.
> > Yang akan dipakai adalah file yang berisi sheet A,B saja dan juga file
> yang
> > berisi A,B ini dibuatkan salinan nya di folder lain.
> >
> > myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> > myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file
> >
> > application.displayalerts=false
> > set wbkDB = workbook.open(myDB)
> > 'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah mau
> > di-save
> >
> > 'hapus sheet bernama Sheet C
> > 'set wsDB = wbkDB.worksheets("Sheet C") '-> Stuck ga ngerti cara
> > deleted sheet tersebut
> > wbkdb.sheets("Sheet C").delete
> >
> > 'savecopyas dengan nama yang sama tapi di folder beda
> > 'wbkDB.SaveAsCopy myDBBackUp
> > wbkdb.savecopyas mydbbackup & "\" & wbkdb.name
> >
> > application.displayalerts=true
> >
> > Wassalam,
> > Kid.
> >
> >
> >
> > 2013/7/3 ones_marle_oke <ones_marle_oke@...>
> >
> > > **
>
> > >
> > >
> > > Salam Super semua untuk BeExcel... (Selamat Sore....) :)
> > >
> > > Om, Tante, Brother, Sistah semua yang ada disini... #kok malah nyanyi
> ya
> > > saya... (guyonan sedikit aja si)
> > >
> > > Mau tanya neh... -> *ujung - ujungnya malah nanya
> > >
> > > Bagaimana ya cara untuk saveascopy workbook ke directory yang lain.
> > > Jadi gini, ada "wbkDB" (sebagai workbook yang menjadi penyimpanan
> datanya)
> > > nah terus, didalam "wbkDB" ini pnya 3 sheet yg isinya : sheet A, sheet
> B
> > > dan sheet C.
> > >
> > > Namun saat ingin mau saya saveascopy "wbkDB" ini, ada (sheet C) yang
> harus
> > > saya 'Delete&#39; terlebih dahulu sblm saya simpan ke directory lain. Ini
> > > berfungsi untuk data BackUp dari "wbkDB" saja. Karena suatu saat
> "wbkDB"
> > > ini hilang atau corrupt, saya masih mempunyai data BackUp dari "wbkDB"
> > > tersebut.
> > >
> > > Nah begitu deh cerita panjang pendeknya neh BeExcel.
> > > Saya mencoba untuk delete sheet baru simpan (saveascopy), tp malah kena
> > > debug mlulu..
> > > (Sedihnya nasib ini)
> > >
> > > contoh perjalanan script :
> > > myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> > > myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file
> > > set wbkDB = workbook.open(myDB)
> > > wbkDB.save -> untuk menyimpan file utama
> > > set wsDB = wbkDB.worksheets("Sheet C") -> Stuck ga ngerti cara deleted
> > > sheet tersebut
> > > wbkDB.SaveAsCopy myDBBackUp
> > >
> > > Dari script diatas, selalu BUG terus.. Mumet, apakah ada yang
> terlewatkan
> > > dari perjalanan script tersebut ?
> > >
> > > Terima kasih neh BeExcel yang bs mmberikan pencerahan dan penjelasan
> dari
> > > kesalahan script diatas...
> > >
> > >
> > >
> >
>
>
>

Wed Jul 3, 2013 4:43 am (PDT) . Posted by:

"ones_marle_oke" ones_marle_oke

Wah, dalam arti kata application.displayalerts ini digunakan untuk tidak ada seperti pertanyaan, "{name workbook sudah ada, apakah mau direplace?} -> seperti ini bkn om kid yg dimaksudkan cerewetnya?

Maaf loh om kid, klo yg ini cerewetnya kebangetan.. jd keseringan nanya.. hehehehe.. :)

--- In belajar-excel@yahoogroups.com, "Mr. Kid" <mr.nmkid@...> wrote:
>
> 1. application.displayalerts=false -> Ini gunanya untuk apa ya ?
> >> Excel sering kelewatan cerewetnya, karena saking hati-hatinya terhadap
> data. Akhirnya, sering muncul yang namanya dialog konfirmasi. Terutama saat
> akan hapus sheet atau akan save file.
> >> properti DisplayAlerts milik object Application adalah pernyataan sikap
> user terhadap kecerewetan Excel ini. Jika nilai properti diset FALSE, maka
> si Excel diminta user untuk tidak cerewet.
> >> Sebaiknya, properti ini dikembalikan menjadi TRUE diakhir proses
> (kasihan si Excel kalau ndak diijinkan cerewet, kuatirnya nanti malah
> stress) agar dapat keuntungan dari kehati-hatian si Excel dalam menangani
> data.
>
> 2. wbkdb.name -> untuk name itu, ini sebuah pedeklarasian terlebih
> dahulu tidak?
> >> variabel wbkdb memiliki type workbook.
> >> name adalah sebuah properti milik object Workbook yang berisi nilai nama
> workbook.
> >> jadi tidak perlu deklarasi apa-apa, karena sekedar menggunakan nilai
> yang disimpan oleh sebuah properti dalam suatu object.
>
>
> #ngomong", Kopdar ver2 diadakan kpn lagi ya?
> -> mau ikut klo ada kopdar lagi..
> >> sedang menunggu panitia untuk mengadakan rekrutmen kepanitiaan kopdar2.
> Kalau BeExceller yang bersedia menjadi panitia cuman dikit, bisa jadi butuh
> waktu yang lama untuk bisa mewujudkan kopdar2.
>
>
> Wassalam
> Kid.
>
>
>
> 2013/7/3 ones_marle_oke <ones_marle_oke@...>
>
> > **
> >
> >
> > Bener om Kid. Jadi Sheet A dan B berserta isinya akan di simpan ke folder
> > lain. Ya intinya si, mau backup 'wbkDB&#39; ini tanpa Sheet C.
> >
> > {'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah mau
> > di-save} -> ah bisa aja ini si om Kid. Kan cm jln cerita mksdnya.
> >
> > Mau tanya sedikit lg deh om tentang maksud ini :
> > 1. application.displayalerts=false -> Ini gunanya untuk apa ya ?
> > 2. {wbkdb.'name'} -> untuk name yg saya beri tanda kutip ini, ini sebuah
> > pedeklarasian terlebih dahulu tidak?
> >
> > Sekali lagi terima kasih ya om Kid..
> > #ngomong", Kopdar ver2 diadakan kpn lagi ya?
> > -> mau ikut klo ada kopdar lagi..
> >
> >
> > --- In belajar-excel@yahoogroups.com, "Mr. Kid" <mr.nmkid@> wrote:
> > >
> > > Kalau ndak salah, maksudnya ada file utama yang berisi sheet A,B,C.
> > > Yang akan dipakai adalah file yang berisi sheet A,B saja dan juga file
> > yang
> > > berisi A,B ini dibuatkan salinan nya di folder lain.
> > >
> > > myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> > > myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file
> > >
> > > application.displayalerts=false
> > > set wbkDB = workbook.open(myDB)
> > > 'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah mau
> > > di-save
> > >
> > > 'hapus sheet bernama Sheet C
> > > 'set wsDB = wbkDB.worksheets("Sheet C") '-> Stuck ga ngerti cara
> > > deleted sheet tersebut
> > > wbkdb.sheets("Sheet C").delete
> > >
> > > 'savecopyas dengan nama yang sama tapi di folder beda
> > > 'wbkDB.SaveAsCopy myDBBackUp
> > > wbkdb.savecopyas mydbbackup & "\" & wbkdb.name
> > >
> > > application.displayalerts=true
> > >
> > > Wassalam,
> > > Kid.
> > >
> > >
> > >
> > > 2013/7/3 ones_marle_oke <ones_marle_oke@>
> > >
> > > > **
> >
> > > >
> > > >
> > > > Salam Super semua untuk BeExcel... (Selamat Sore....) :)
> > > >
> > > > Om, Tante, Brother, Sistah semua yang ada disini... #kok malah nyanyi
> > ya
> > > > saya... (guyonan sedikit aja si)
> > > >
> > > > Mau tanya neh... -> *ujung - ujungnya malah nanya
> > > >
> > > > Bagaimana ya cara untuk saveascopy workbook ke directory yang lain.
> > > > Jadi gini, ada "wbkDB" (sebagai workbook yang menjadi penyimpanan
> > datanya)
> > > > nah terus, didalam "wbkDB" ini pnya 3 sheet yg isinya : sheet A, sheet
> > B
> > > > dan sheet C.
> > > >
> > > > Namun saat ingin mau saya saveascopy "wbkDB" ini, ada (sheet C) yang
> > harus
> > > > saya 'Delete&#39; terlebih dahulu sblm saya simpan ke directory lain. Ini
> > > > berfungsi untuk data BackUp dari "wbkDB" saja. Karena suatu saat
> > "wbkDB"
> > > > ini hilang atau corrupt, saya masih mempunyai data BackUp dari "wbkDB"
> > > > tersebut.
> > > >
> > > > Nah begitu deh cerita panjang pendeknya neh BeExcel.
> > > > Saya mencoba untuk delete sheet baru simpan (saveascopy), tp malah kena
> > > > debug mlulu..
> > > > (Sedihnya nasib ini)
> > > >
> > > > contoh perjalanan script :
> > > > myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> > > > myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup file
> > > > set wbkDB = workbook.open(myDB)
> > > > wbkDB.save -> untuk menyimpan file utama
> > > > set wsDB = wbkDB.worksheets("Sheet C") -> Stuck ga ngerti cara deleted
> > > > sheet tersebut
> > > > wbkDB.SaveAsCopy myDBBackUp
> > > >
> > > > Dari script diatas, selalu BUG terus.. Mumet, apakah ada yang
> > terlewatkan
> > > > dari perjalanan script tersebut ?
> > > >
> > > > Terima kasih neh BeExcel yang bs mmberikan pencerahan dan penjelasan
> > dari
> > > > kesalahan script diatas...
> > > >
> > > >
> > > >
> > >
> >
> >
> >
>

Wed Jul 3, 2013 4:52 am (PDT) . Posted by:

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

Ya, maksudnya seperti itu.

hehehehe...
buat marle gak akan saya kasih
marle.displayalerts=false
jadi santai aja...

Wassalam,
Kid.

2013/7/3 ones_marle_oke <ones_marle_oke@yahoo.com>

> **
>
>
> Wah, dalam arti kata application.displayalerts ini digunakan untuk tidak
> ada seperti pertanyaan, "{name workbook sudah ada, apakah mau direplace?}
> -> seperti ini bkn om kid yg dimaksudkan cerewetnya?
>
> Maaf loh om kid, klo yg ini cerewetnya kebangetan.. jd keseringan nanya..
> hehehehe.. :)
>
>
> --- In belajar-excel@yahoogroups.com, "Mr. Kid" <mr.nmkid@...> wrote:
> >
> > 1. application.displayalerts=false -> Ini gunanya untuk apa ya ?
> > >> Excel sering kelewatan cerewetnya, karena saking hati-hatinya terhadap
> > data. Akhirnya, sering muncul yang namanya dialog konfirmasi. Terutama
> saat
> > akan hapus sheet atau akan save file.
> > >> properti DisplayAlerts milik object Application adalah pernyataan
> sikap
> > user terhadap kecerewetan Excel ini. Jika nilai properti diset FALSE,
> maka
> > si Excel diminta user untuk tidak cerewet.
> > >> Sebaiknya, properti ini dikembalikan menjadi TRUE diakhir proses
> > (kasihan si Excel kalau ndak diijinkan cerewet, kuatirnya nanti malah
> > stress) agar dapat keuntungan dari kehati-hatian si Excel dalam menangani
> > data.
> >
> > 2. wbkdb.name -> untuk name itu, ini sebuah pedeklarasian terlebih
> > dahulu tidak?
> > >> variabel wbkdb memiliki type workbook.
> > >> name adalah sebuah properti milik object Workbook yang berisi nilai
> nama
> > workbook.
> > >> jadi tidak perlu deklarasi apa-apa, karena sekedar menggunakan nilai
> > yang disimpan oleh sebuah properti dalam suatu object.
> >
> >
> > #ngomong", Kopdar ver2 diadakan kpn lagi ya?
> > -> mau ikut klo ada kopdar lagi..
> > >> sedang menunggu panitia untuk mengadakan rekrutmen kepanitiaan
> kopdar2.
> > Kalau BeExceller yang bersedia menjadi panitia cuman dikit, bisa jadi
> butuh
> > waktu yang lama untuk bisa mewujudkan kopdar2.
> >
> >
> > Wassalam
> > Kid.
> >
> >
> >
> > 2013/7/3 ones_marle_oke <ones_marle_oke@...>
> >
> > > **
>
> > >
> > >
> > > Bener om Kid. Jadi Sheet A dan B berserta isinya akan di simpan ke
> folder
> > > lain. Ya intinya si, mau backup 'wbkDB&#39; ini tanpa Sheet C.
> > >
> > > {'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah
> mau
> > > di-save} -> ah bisa aja ini si om Kid. Kan cm jln cerita mksdnya.
> > >
> > > Mau tanya sedikit lg deh om tentang maksud ini :
> > > 1. application.displayalerts=false -> Ini gunanya untuk apa ya ?
> > > 2. {wbkdb.'name'} -> untuk name yg saya beri tanda kutip ini, ini
> sebuah
> > > pedeklarasian terlebih dahulu tidak?
> > >
> > > Sekali lagi terima kasih ya om Kid..
> > > #ngomong", Kopdar ver2 diadakan kpn lagi ya?
> > > -> mau ikut klo ada kopdar lagi..
> > >
> > >
> > > --- In belajar-excel@yahoogroups.com, "Mr. Kid" <mr.nmkid@> wrote:
> > > >
> > > > Kalau ndak salah, maksudnya ada file utama yang berisi sheet A,B,C.
> > > > Yang akan dipakai adalah file yang berisi sheet A,B saja dan juga
> file
> > > yang
> > > > berisi A,B ini dibuatkan salinan nya di folder lain.
> > > >
> > > > myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> > > > myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup
> file
> > > >
> > > > application.displayalerts=false
> > > > set wbkDB = workbook.open(myDB)
> > > > 'wbkDB.save -> untuk menyimpan file utama baru saja dibuka kok udah
> mau
> > > > di-save
> > > >
> > > > 'hapus sheet bernama Sheet C
> > > > 'set wsDB = wbkDB.worksheets("Sheet C") '-> Stuck ga ngerti cara
> > > > deleted sheet tersebut
> > > > wbkdb.sheets("Sheet C").delete
> > > >
> > > > 'savecopyas dengan nama yang sama tapi di folder beda
> > > > 'wbkDB.SaveAsCopy myDBBackUp
> > > > wbkdb.savecopyas mydbbackup & "\" & wbkdb.name
> > > >
> > > > application.displayalerts=true
> > > >
> > > > Wassalam,
> > > > Kid.
> > > >
> > > >
> > > >
> > > > 2013/7/3 ones_marle_oke <ones_marle_oke@>
> > > >
> > > > > **
> > >
> > > > >
> > > > >
> > > > > Salam Super semua untuk BeExcel... (Selamat Sore....) :)
> > > > >
> > > > > Om, Tante, Brother, Sistah semua yang ada disini... #kok malah
> nyanyi
> > > ya
> > > > > saya... (guyonan sedikit aja si)
> > > > >
> > > > > Mau tanya neh... -> *ujung - ujungnya malah nanya
> > > > >
> > > > > Bagaimana ya cara untuk saveascopy workbook ke directory yang lain.
> > > > > Jadi gini, ada "wbkDB" (sebagai workbook yang menjadi penyimpanan
> > > datanya)
> > > > > nah terus, didalam "wbkDB" ini pnya 3 sheet yg isinya : sheet A,
> sheet
> > > B
> > > > > dan sheet C.
> > > > >
> > > > > Namun saat ingin mau saya saveascopy "wbkDB" ini, ada (sheet C)
> yang
> > > harus
> > > > > saya 'Delete&#39; terlebih dahulu sblm saya simpan ke directory lain.
> Ini
> > > > > berfungsi untuk data BackUp dari "wbkDB" saja. Karena suatu saat
> > > "wbkDB"
> > > > > ini hilang atau corrupt, saya masih mempunyai data BackUp dari
> "wbkDB"
> > > > > tersebut.
> > > > >
> > > > > Nah begitu deh cerita panjang pendeknya neh BeExcel.
> > > > > Saya mencoba untuk delete sheet baru simpan (saveascopy), tp malah
> kena
> > > > > debug mlulu..
> > > > > (Sedihnya nasib ini)
> > > > >
> > > > > contoh perjalanan script :
> > > > > myDB = "D:\(Nama Directory)&#92;DB_ELS.xls"
> > > > > myDBBackUp = "D:\(Nama Directory)" -> Nama Directory untuk backup
> file
> > > > > set wbkDB = workbook.open(myDB)
> > > > > wbkDB.save -> untuk menyimpan file utama
> > > > > set wsDB = wbkDB.worksheets("Sheet C") -> Stuck ga ngerti cara
> deleted
> > > > > sheet tersebut
> > > > > wbkDB.SaveAsCopy myDBBackUp
> > > > >
> > > > > Dari script diatas, selalu BUG terus.. Mumet, apakah ada yang
> > > terlewatkan
> > > > > dari perjalanan script tersebut ?
> > > > >
> > > > > Terima kasih neh BeExcel yang bs mmberikan pencerahan dan
> penjelasan
> > > dari
> > > > > kesalahan script diatas...
> > > > >
> > > > >
> > > > >
> > > >
> > >
> > >
> > >
> >
>
>
>

Wed Jul 3, 2013 3:09 am (PDT) . Posted by:

"ana anta" anaanta321

dear para master.

saya punya satu file excel yang ingin di kasih login dengan otoritas tiap yang login berbeda (seperti administrator), ada yang punya otoritas penuh, ada yang sebagian, dan ada juga yang hanya bisa melihat saja tanpa bisa mengubah.

mohon bantuannya para master

Wed Jul 3, 2013 4:25 am (PDT) . Posted by:

"ones_marle_oke" ones_marle_oke

Mau coba bantu neh.. soalnya saya jg abis buat untuk tahap login.. dan akhirnya bisa si.

Untuk setiap variabelnya bisa dengan nama yg berbeda aja.. biar lebih gampang aja untuk menghafal saat untuk pemanggilan varibel tersebut...

Mudah"an si bener penjelasannya...
Untuk om momod dan yg lain ada di group ini, tolong diluruskan ya klo ada kata"saya dalam menerangkan salah.. hehehe.. :)

Private Sub cmdok_Click()
LoginUser = Me.txtuser.Text
LoginPass = Me.txtpass.Text
Set wsDB = wbkDB.Worksheets("Login";)
''-> wbkDB sudah dideklarasikan saat open application userform nya.
DBCek = WorksheetFunction.CountIf(wsDB.Range("B:B"), LoginUser)
If LoginUser = "" Or LoginPass = "" Then
MsgBox "Harap Masukkan Username dan Password", vbCritical, "Error"
bersih
ElseIf DBCek = 0 Then
MsgBox "Username Tidak Terdaftar", vbCritical, "Error"
bersih
Else
DBUser = WorksheetFunction.VLookup(LoginUser, wsDB.Range("B:D"), 1, False)
DBPass = WorksheetFunction.VLookup(LoginUser, wsDB.Range("B:D"), 2, False)
DBHak = WorksheetFunction.VLookup(LoginUser, wsDB.Range("B:D"), 3, False)
If LoginUser = DBUser And LoginPass = DBPass And DBHak = "Admin" Then
MsgBox "Welcome EL System", vbInformation, "Information&quot;
MsgBox "Your Log On Administrator", vbInformation, "Information&quot;
OpenMenu
ElseIf LoginUser = DBUser And LoginPass = DBPass And DBHak = "User" Then
MsgBox "Welcome EL System", vbInformation, "Information&quot;
OpenMenu
Else
MsgBox "Username dan Password Salah", vbCritical, "Error"
bersih
End If
End If
End Sub

Menurut saya si msh kepanjangan cara mendeklarasikan setiap variabelnya...

--- In belajar-excel@yahoogroups.com, ana anta <anaanta321@...> wrote:
>
> dear para master.
>
>
> saya punya satu file excel yang ingin di kasih login dengan otoritas tiap yang login berbeda (seperti administrator), ada yang punya otoritas penuh, ada yang sebagian, dan ada juga yang hanya bisa melihat saja tanpa bisa mengubah.
>
> mohon bantuannya para master
>

Wed Jul 3, 2013 4:03 am (PDT) . Posted by:

"leonard merari" ari140583

Pak Zainul & De Premor,
Thanks fedback nya , sangat membantu untuk visualize data.

Regards,

________________________________
From: De Premor <de@premor.net>
To: belajar-excel@yahoogroups.com
Sent: Wednesday, July 3, 2013 3:37 PM
Subject: Re: [belajar-excel] menempatkan buble (latitude, longitude dan besar buble bisa diatur value nya) di atas peta


 
Kalau yang tadi menggunakan shape, image dan makro ( sorry tadi nga baca kalau rekuesnya dalam bentuk chart ), kebiasaan dari orok lagi kambuh => males baca :-D
yang terlampir semoga sesuai harapan, pake bubble chart

mbikinnya seperti bikin chart seperti biasah, hanya nilai Min dan
max nya saja yang dibuat sesuai koordinat peta

Rgds,
[dp]

On 03/07/2013 12:20, De Premor wrote:

 
>Terlampir semoga sesuai harapan
>
>Cuman koordinat gambar peta indonesia itu cuman kira2,
kalau mas bisa mendapatkan gambar dan koordinat yang pas,
mustinya hasilnya akurat.
>
>Rgds,
>[dp]
>
>
>On 03/07/2013 8:48, leonard merari wrote:
>

>>Dear Master Excel'ers, 
>>Terlampir set data dan hasil yang diinginkan dalam buble chart di excel. Latitude dan Longitude ditempatkan di atas peta dengan besar buble yang diatur-atur, file asli nya gak bisa saya pelajari saya coba share schreenshootnya. Apakah ada yang bisa membuat buble chart dengan background peta seperti attachment? Mohon bantuannya para Master ..
>>
>>
>>Thanks
>> 
>> 
>>
>>
>> 
>

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

Tidak ada komentar:

Posting Komentar