Jumat, 10 Februari 2012

[belajar-excel] Digest Number 1508

Messages In This Digest (15 Messages)

Messages

1a.

Re: copy data ke bawah

Posted by: "Rachmad HIDAYAT" rachmad.hidayat@external.total.com

Thu Feb 9, 2012 12:56 am (PST)



Terima kasih saran dan solusi mr kid...

Kalo boleh di sharing sebenarnya fungsi dari LENn itu apa ya ?
Karena LEN yang biasa saya gunakan untuk menghitung karakter saja.
Nah ini LEN di dalam fungsi IF... saya belum begitu paham...
Mohon maaf kalo pertanyaannya terlalu jadul...

R@h

From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] On Behalf Of Kid Mr.
Sent: 09 February 2012 16:12
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] copy data ke bawah

Coba pelajari fungsi dasar excel seperti IF dsb

=IF( len( a2 ) , a2, c1)

Kid.
2012/2/9 Rachmad HIDAYAT <rachmad.hidayat@external.total.com<mailto:rachmad.hidayat@external.total.com>>

[cid:image001.gif@01CCE74B.9D7E5F10]

Dear pakar,

Mohon bantuan jika saya pingin mengcopy data ke bawah denga rumus gimana ya...
Case seperti di bawah ini....

DATA

HASIL

AA

1

AA

1

2

AA

2

3

AA

3

4

AA

4

5

AA

5

6

AA

6

7

AA

7

8

AA

8

9

AA

9

10

AA

10

11

AA

11

AB

1

AB

1

2

AB

2

3

AB

3

4

AB

4

5

AB

5

6

AB

6

7

AB

7

8

AB

8

9

AB

9

10

AB

10

11

AB

11

12

AB

12

AC

A

AC

A

B

AC

B

C

AC

C

A

AC

A

B

AC

B

C

AC

C

A

AC

A

B

AC

B

C

AC

C

A

AC

A

B

AC

B

C

AC

C

Terima kasih

1b.

Re: copy data ke bawah

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

Thu Feb 9, 2012 1:14 am (PST)



Kalau anda mau pakai Macro, kita bisa pakai Worksheet Event (Double Click)
File terlampir.

Salam,
Hendrik Karnadi

jangan lupa aktifkan macronya

________________________________
From: Rachmad HIDAYAT <rachmad.hidayat@external.total.com>
To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com>
Sent: Thursday, 9 February 2012, 15:06
Subject: [belajar-excel] copy data ke bawah


 
 
Dear pakar,
 
Mohon bantuan jika saya pingin mengcopy data ke bawah denga rumus gimana ya…
Case seperti di bawah ini….
 
DATA HASIL
AA 1 AA 1
  2 AA 2
  3 AA 3
  4 AA 4
  5 AA 5
  6 AA 6
  7 AA 7
  8 AA 8
  9 AA 9
  10 AA 10
  11 AA 11
AB 1 AB 1
  2 AB 2
  3 AB 3
  4 AB 4
  5 AB 5
  6 AB 6
  7 AB 7
  8 AB 8
  9 AB 9
  10 AB 10
  11 AB 11
  12 AB 12
AC A AC A
  B AC B
  C AC C
  A AC A
  B AC B
  C AC C
  A AC A
  B AC B
  C AC C
  A AC A
  B AC B
  C AC C
 
 
 
Terima kasih
1c.

Re: copy data ke bawah

Posted by: "Kid Mr." mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Feb 9, 2012 1:19 am (PST)



Jika sempat, dibaca tentang fungsi IF

Len untuk menghitung jumlah karakter

Kondisi dalam if harus yang menghasilkan TRUE (setara numerik bukan 0) atau
FALSE (setara 0)
Jika data tidak ada isinya, hasil Len akan 0
Jika data ada isinya bukan nullstring, hasil Len adalah numrik bukan 0

Kid.

2012/2/9 Rachmad HIDAYAT <rachmad.hidayat@external.total.com>

> **
>
>
> Terima kasih saran dan solusi mr kid�****
>
> ** **
>
> Kalo boleh di sharing sebenarnya fungsi dari LENn itu apa ya ?****
>
> Karena LEN yang biasa saya gunakan untuk menghitung karakter saja.****
>
> Nah ini LEN di dalam fungsi IF... saya belum begitu paham�****
>
> Mohon maaf kalo pertanyaannya terlalu jadul�****
>
> ** **
>
> R@h****
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com] *On Behalf Of *Kid Mr.
> *Sent:* 09 February 2012 16:12
> *To:* belajar-excel@yahoogroups.com
> *Subject:* Re: [belajar-excel] copy data ke bawah****
>
> ** **
>
> ****
>
> Coba pelajari fungsi dasar excel seperti IF dsb
>
> =IF( len( a2 ) , a2, c1)
>
> Kid.****
>
> 2012/2/9 Rachmad HIDAYAT <rachmad.hidayat@external.total.com>****
>
> ****
>
> ****
>
> ****
>
> Dear pakar,****
>
> ****
>
> Mohon bantuan jika saya pingin mengcopy data ke bawah denga rumus gimana
> ya�****
>
> Case seperti di bawah ini�.****
>
> ****
>
> DATA ****
>
> HASIL****
>
> AA****
>
> 1****
>
> AA****
>
> 1****
>
> ****
>
> 2****
>
> AA****
>
> 2****
>
> ****
>
> 3****
>
> AA****
>
> 3****
>
> ****
>
> 4****
>
> AA****
>
> 4****
>
> ****
>
> 5****
>
> AA****
>
> 5****
>
> ****
>
> 6****
>
> AA****
>
> 6****
>
> ****
>
> 7****
>
> AA****
>
> 7****
>
> ****
>
> 8****
>
> AA****
>
> 8****
>
> ****
>
> 9****
>
> AA****
>
> 9****
>
> ****
>
> 10****
>
> AA****
>
> 10****
>
> ****
>
> 11****
>
> AA****
>
> 11****
>
> AB****
>
> 1****
>
> AB****
>
> 1****
>
> ****
>
> 2****
>
> AB****
>
> 2****
>
> ****
>
> 3****
>
> AB****
>
> 3****
>
> ****
>
> 4****
>
> AB****
>
> 4****
>
> ****
>
> 5****
>
> AB****
>
> 5****
>
> ****
>
> 6****
>
> AB****
>
> 6****
>
> ****
>
> 7****
>
> AB****
>
> 7****
>
> ****
>
> 8****
>
> AB****
>
> 8****
>
> ****
>
> 9****
>
> AB****
>
> 9****
>
> ****
>
> 10****
>
> AB****
>
> 10****
>
> ****
>
> 11****
>
> AB****
>
> 11****
>
> ****
>
> 12****
>
> AB****
>
> 12****
>
> AC****
>
> A****
>
> AC****
>
> A****
>
> ****
>
> B****
>
> AC****
>
> B****
>
> ****
>
> C****
>
> AC****
>
> C****
>
> ****
>
> A****
>
> AC****
>
> A****
>
> ****
>
> B****
>
> AC****
>
> B****
>
> ****
>
> C****
>
> AC****
>
> C****
>
> ****
>
> A****
>
> AC****
>
> A****
>
> ****
>
> B****
>
> AC****
>
> B****
>
> ****
>
> C****
>
> AC****
>
> C****
>
> ****
>
> A****
>
> AC****
>
> A****
>
> ****
>
> B****
>
> AC****
>
> B****
>
> ****
>
> C****
>
> AC****
>
> C****
>
> ****
>
> ****
>
> ****
>
> Terima kasih****
>
> ** **
>
> ****
>
>
>
1d.

Re: copy data ke bawah

Posted by: "Ki Semprul" semprul.ki@gmail.com   ki_semprull

Thu Feb 9, 2012 2:20 am (PST)



Pakai cara bodoh-bodohan yuk....

1. Isikan di bawah data pertama (A3), FORMULA * =A2*
2. *Cell A3* tsb diCOPY (*Ctrl + C*)
3. Select Range yg akan diproses (*A4:An*)
4. Tekan tombol* F5* (Go-To)
[image: Go To Special.PNG]
5. Tekan Tombol * [Special]*
6. Pilih Option : *Blanks*
7. Tekan *Ctrl + V* (mengcopy rumus hanya ke Blank cells yg terpilih
8. Kalau perlu A3:An di copy > PasteSpecial > Value ke dirinya sendiri
9. SELESAI

[image: copy to blank only.PNG]

*Semprul..., Ki !*

*

*
*2012/2/9 Rachmad HIDAYAT <rachmad.hidayat@external.total.com>*
>
> *Dear pakar, *
>
> **
>
> *Mohon bantuan jika saya pingin mengcopy data ke bawah denga rumus gimana
> ya�*
>
> *Case seperti di bawah ini�.*
>
> *Terima kasih*
>
2a.

Membatasi penginputan karakter ketika penginputan sedang berlangsung

Posted by: "Anton Gundul" antongundul@yahoo.com   antongundul

Thu Feb 9, 2012 3:14 am (PST)



Dear Para Master dan Teman sekalian

Kasusnya begini : saya ingin membatasi jumlah karakter yang bisa diinputkan dalam suatu cell ketika penginputan/pengetikan sedang berlangsung. Jadi misal saya mambatasi jumlah karakter di cell A1 sampai A10 maximal 5 karakter. maka ketika saya mulai mengetik karakter ke 6 akan muncul pesan peringatan.
Saya sudah coba dengan data validation, tetapi jika memakai data validation, pesan peringatan akan muncul setelah pengetikan selesai/enter.
Mohon Pencerahannya dan terimakasih banyak sebelumnya.

Warm Regards
Anton
2b.

Re: Membatasi penginputan karakter ketika penginputan sedang berlang

Posted by: "o' Seno" ontoseno84@gmail.com   ontoseno84@ymail.com

Thu Feb 9, 2012 3:34 am (PST)



[-1] Blok / Select Range A1:A10 (atau range yg anda kehendaki untuk
diberi pembatasan Input)
[+0] Buka dialogBox Data Validation

di excel 2003: ada di menu Data > Data Vaidation
di excel 2007: ada di Ribbon > Tab: Data > lihat di Group: Data Tools >
Data Validation

[image: data validation text length.PNG]

[+1] pada kotak kombol "Allow": pilih *Text Length*
[+2] pada kotak Minimum isikan 0
[+3] pada kotak Maximum isikan 5
[+4] *pesan panduan* dapat di set di halaman (tab) "Input Message"
[+5] *pesan peringatan* bisa di set pada Halaman (Tab) "Error Alert"
[+6] OK
[+99] ke tokobuku beli buku panduan standard pengoperasioan Excel

*o'Seno*

*
*
*2012/2/9 Anton Gundul <antongundul@yahoo.com>
*
>
> * *
> *Dear Para Master dan Teman sekalian*
> *Kasusnya begini : saya ingin membatasi jumlah karakter yang bisa
> diinputkan dalam suatu cell ketika penginputan/pengetikan sedang
> berlangsung. Jadi misal saya mambatasi jumlah karakter di cell A1 sampai
> A10 maximal 5 karakter. maka ketika saya mulai mengetik karakter ke 6 akan
> muncul pesan peringatan.*
> *Saya sudah coba dengan data validation, tetapi jika memakai data
> validation, pesan peringatan akan muncul setelah pengetikan selesai/enter.
> *
> *Mohon Pencerahannya dan terimakasih banyak sebelumnya.*
> *Warm Regards*
> *Anton*
>
2c.

Bls: [belajar-excel] Membatasi penginputan karakter ketika penginput

Posted by: "Anton Gundul" antongundul@yahoo.com   antongundul

Thu Feb 9, 2012 3:43 am (PST)



Dear Pak Ontoseno

Terimakasih banyak Pak Ontoseno, tapi yang saya inginkan adalah pesan peringatan muncul ketika pengetikan sedang berlangsung melebihi jumlah maximal karakter. Kalau dengan Data Validation pesan peringatan muncul setelah pengetikan selesai/enter.
Warm Regard
Anton

________________________________
Dari: o' Seno <ontoseno84@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 9 Februari 2012 18:34
Judul: Re: [belajar-excel] Membatasi penginputan karakter ketika penginputan sedang berlangsung


 
[-1]  Blok / Select  Range A1:A10 (atau range yg anda kehendaki untuk diberi pembatasan Input)
[+0]  Buka dialogBox Data Validation

di excel 2003: ada di menu  Data > Data Vaidation
di excel 2007: ada di Ribbon > Tab: Data > lihat di Group: Data Tools > Data Validation

[+1]  pada kotak kombol "Allow": pilih Text Length
[+2]  pada kotak Minimum isikan 0
[+3]  pada kotak Maximum isikan 5
[+4]  pesan panduan dapat di set di halaman (tab) "Input Message"
[+5]  pesan peringatan bisa di set pada Halaman (Tab) "Error Alert"
[+6]  OK
[+99]  ke tokobuku beli buku panduan standard pengoperasioan Excel 

o'Seno

2012/2/9 Anton Gundul <antongundul@yahoo.com>

>Dear Para Master dan Teman sekalian
>Kasusnya begini : saya ingin membatasi jumlah karakter yang bisa diinputkan dalam suatu cell ketika penginputan/pengetikan sedang berlangsung. Jadi misal saya mambatasi jumlah karakter di cell A1 sampai A10 maximal 5 karakter. maka ketika saya mulai mengetik karakter ke 6 akan muncul pesan peringatan.
>Saya sudah coba dengan data validation, tetapi jika memakai data validation, pesan peringatan akan muncul setelah pengetikan selesai/enter.
>Mohon Pencerahannya dan terimakasih banyak sebelumnya.
>Warm Regards
>Anton
2d.

Re: Membatasi penginputan karakter ketika penginputan sedang berlang

Posted by: "o' Seno" ontoseno84@gmail.com   ontoseno84@ymail.com

Thu Feb 9, 2012 4:00 am (PST)



Perubahan di cell itu baru di-AKUI (dapat dievalluasi) data yg diisikan
kedalamnya
jika PROSES PENGISIAN TELAH BERAKHIR, yaitu telah di ENTER atau
cell-Pointer- telah dipindah ke cell lain

Jadi (menurut pendapatku) keinginan pak Gundul itu tidak mudah dilaksanakan
*terhadap Cell *walaupun dengan bantuan makro, karena alasan yg sama
(= *event change pada worksheet* baru dapat di deteksi jika pengisian cell *
telah*
*diakhiri dengan enter*, atau berpindahnya cell pointer)

Jika pengisian ke cell melalui* TEXT BOX* barulah hal itu dapat dilakukan
karena textBox punya event change, dimana event terjadi setiap data di
dalamnya
diubah walaupun belum berakhir proses pengisian/editingnya.
Tetapi barangkali saja, temans lain punya cara yg oke, mari kita tunggu..

Sementara itu ada koreksi gambar yg tadi disertakan, ini koreksinya

[image: data validation text length2.PNG]

*o'Seno*

*2012/2/9 Anton Gundul <antongundul@yahoo.com>
*
>
> *Dear Pak Ontoseno
> *
> *Terimakasih banyak Pak Ontoseno, tapi yang saya inginkan adalah pesan
> peringatan muncul ketika pengetikan sedang berlangsung melebihi jumlah
> maximal karakter. Kalau dengan Data Validation pesan peringatan muncul
> setelah pengetikan selesai/enter.*
> *Warm Regard*
> *Anton
> *
>
> ------------------------------
> *Dari:* o' Seno <ontoseno84@gmail.com>
> *Dikirim:* Kamis, 9 Februari 2012 18:34
> [-1] Blok / Select Range A1:A10 (atau range yg anda kehendaki untuk
> diberi pembatasan Input)
> [+0] Buka dialogBox Data Validation
>
> di excel 2003: ada di menu Data > Data Vaidation
> di excel 2007: ada di Ribbon > Tab: Data > lihat di Group: Data Tools >
> Data Validation
>
> [+1] pada kotak kombol "Allow": pilih *Text Length*
> [+2] pada kotak Minimum isikan 0
> [+3] pada kotak Maximum isikan 5
> [+4] *pesan panduan* dapat di set di halaman (tab) "Input Message"
> [+5] *pesan peringatan* bisa di set pada Halaman (Tab) "Error Alert"
> [+6] OK
>
> *o'Seno*
>
>
2e.

Re: Membatasi penginputan karakter ketika penginputan sedang berlang

Posted by: "Kid Mr." mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Feb 9, 2012 4:12 am (PST)



File terlampir adalah contoh input pada cell ber textbox
Untuk penampilan pesan, sebaiknya tidak menggunakan msgbox agar tidak
mengganggu user dalam berfokus ria pada kegiatan entry datanya.

Wassalamualaikum Wr. Wb.
Kid.

2012/2/9 o' Seno <ontoseno84@gmail.com>

> **
>
>
> Perubahan di cell itu baru di-AKUI (dapat dievalluasi) data yg diisikan
> kedalamnya
> jika PROSES PENGISIAN TELAH BERAKHIR, yaitu telah di ENTER atau
> cell-Pointer- telah dipindah ke cell lain
>
> Jadi (menurut pendapatku) keinginan pak Gundul itu tidak mudah dilaksanakan
> *terhadap Cell *walaupun dengan bantuan makro, karena alasan yg sama
> (= *event change pada worksheet* baru dapat di deteksi jika pengisian
> cell *telah*
> *diakhiri dengan enter*, atau berpindahnya cell pointer)
>
> Jika pengisian ke cell melalui* TEXT BOX* barulah hal itu dapat dilakukan
> karena textBox punya event change, dimana event terjadi setiap data di
> dalamnya
> diubah walaupun belum berakhir proses pengisian/editingnya.
> Tetapi barangkali saja, temans lain punya cara yg oke, mari kita tunggu..
>
> Sementara itu ada koreksi gambar yg tadi disertakan, ini koreksinya
>
> [image: data validation text length2.PNG]
>
> *o'Seno*
>
>
>
>
> *2012/2/9 Anton Gundul <antongundul@yahoo.com>
> *
>>
>> *Dear Pak Ontoseno
>> *
>> *Terimakasih banyak Pak Ontoseno, tapi yang saya inginkan adalah pesan
>> peringatan muncul ketika pengetikan sedang berlangsung melebihi jumlah
>> maximal karakter. Kalau dengan Data Validation pesan peringatan muncul
>> setelah pengetikan selesai/enter.*
>> *Warm Regard*
>> *Anton
>> *
>>
>> ------------------------------
>> *Dari:* o' Seno <ontoseno84@gmail.com>
>> *Dikirim:* Kamis, 9 Februari 2012 18:34
>>
>> [-1] Blok / Select Range A1:A10 (atau range yg anda kehendaki untuk
>> diberi pembatasan Input)
>> [+0] Buka dialogBox Data Validation
>>
>> di excel 2003: ada di menu Data > Data Vaidation
>> di excel 2007: ada di Ribbon > Tab: Data > lihat di Group: Data Tools >
>> Data Validation
>>
>> [+1] pada kotak kombol "Allow": pilih *Text Length*
>> [+2] pada kotak Minimum isikan 0
>> [+3] pada kotak Maximum isikan 5
>> [+4] *pesan panduan* dapat di set di halaman (tab) "Input Message"
>> [+5] *pesan peringatan* bisa di set pada Halaman (Tab) "Error Alert"
>> [+6] OK
>>
>> *o'Seno*
>>
>>
>
2f.

Re: Membatasi penginputan karakter ketika penginputan sedang berlang

Posted by: "Kid Mr." mr.nmkid@gmail.com   nmkid.family@ymail.com

Thu Feb 9, 2012 4:18 am (PST)



Ups sorry, salah upload file.

File terlampir adalah yang agak lebih baik.

Kid.

2012/2/9 Kid Mr. <mr.nmkid@gmail.com>

> File terlampir adalah contoh input pada cell ber textbox
> Untuk penampilan pesan, sebaiknya tidak menggunakan msgbox agar tidak
> mengganggu user dalam berfokus ria pada kegiatan entry datanya.
>
> Wassalamualaikum Wr. Wb.
> Kid.
>
>
> 2012/2/9 o' Seno <ontoseno84@gmail.com>
>
>> **
>>
>>
>> Perubahan di cell itu baru di-AKUI (dapat dievalluasi) data yg diisikan
>> kedalamnya
>> jika PROSES PENGISIAN TELAH BERAKHIR, yaitu telah di ENTER atau
>> cell-Pointer- telah dipindah ke cell lain
>>
>> Jadi (menurut pendapatku) keinginan pak Gundul itu tidak mudah
>> dilaksanakan
>> *terhadap Cell *walaupun dengan bantuan makro, karena alasan yg sama
>> (= *event change pada worksheet* baru dapat di deteksi jika pengisian
>> cell *telah*
>> *diakhiri dengan enter*, atau berpindahnya cell pointer)
>>
>> Jika pengisian ke cell melalui* TEXT BOX* barulah hal itu dapat
>> dilakukan
>> karena textBox punya event change, dimana event terjadi setiap data di
>> dalamnya
>> diubah walaupun belum berakhir proses pengisian/editingnya.
>> Tetapi barangkali saja, temans lain punya cara yg oke, mari kita tunggu..
>>
>> Sementara itu ada koreksi gambar yg tadi disertakan, ini koreksinya
>>
>> [image: data validation text length2.PNG]
>>
>> *o'Seno*
>>
>>
>>
>>
>> *2012/2/9 Anton Gundul <antongundul@yahoo.com>
>> *
>>>
>>> *Dear Pak Ontoseno
>>> *
>>> *Terimakasih banyak Pak Ontoseno, tapi yang saya inginkan adalah pesan
>>> peringatan muncul ketika pengetikan sedang berlangsung melebihi jumlah
>>> maximal karakter. Kalau dengan Data Validation pesan peringatan muncul
>>> setelah pengetikan selesai/enter.*
>>> *Warm Regard*
>>> *Anton
>>> *
>>>
>>> ------------------------------
>>> *Dari:* o' Seno <ontoseno84@gmail.com>
>>> *Dikirim:* Kamis, 9 Februari 2012 18:34
>>>
>>> [-1] Blok / Select Range A1:A10 (atau range yg anda kehendaki untuk
>>> diberi pembatasan Input)
>>> [+0] Buka dialogBox Data Validation
>>>
>>> di excel 2003: ada di menu Data > Data Vaidation
>>> di excel 2007: ada di Ribbon > Tab: Data > lihat di Group: Data Tools >
>>> Data Validation
>>>
>>> [+1] pada kotak kombol "Allow": pilih *Text Length*
>>> [+2] pada kotak Minimum isikan 0
>>> [+3] pada kotak Maximum isikan 5
>>> [+4] *pesan panduan* dapat di set di halaman (tab) "Input Message"
>>> [+5] *pesan peringatan* bisa di set pada Halaman (Tab) "Error Alert"
>>> [+6] OK
>>>
>>> *o'Seno*
>>>
>>>
>>
>
>
2g.

Bls: [belajar-excel] Membatasi penginputan karakter ketika penginput

Posted by: "Anton Gundul" antongundul@yahoo.com   antongundul

Thu Feb 9, 2012 4:24 am (PST)



Dear Mr Kid,

Terimakasih banyak atas makro ajaibnya. Sudah sesuai dengan yang saya inginkan

Warm Regards
Anton

________________________________
Dari: Kid Mr. <mr.nmkid@gmail.com>
Kepada: belajar-excel@yahoogroups.com
Dikirim: Kamis, 9 Februari 2012 19:11
Judul: Re: [belajar-excel] Membatasi penginputan karakter ketika penginputan sedang berlangsung


File terlampir adalah contoh input pada cell ber textbox
Untuk penampilan pesan, sebaiknya tidak menggunakan msgbox agar tidak mengganggu user dalam berfokus ria pada kegiatan entry datanya.

Wassalamualaikum Wr. Wb.
Kid.

2012/2/9 o' Seno <ontoseno84@gmail.com>


>Perubahan di cell itu baru di-AKUI (dapat dievalluasi) data yg diisikan kedalamnya
>jika PROSES PENGISIAN TELAH BERAKHIR,  yaitu telah di ENTER atau 
>cell-Pointer- telah dipindah ke cell lain
>
>
>Jadi (menurut pendapatku) keinginan pak Gundul itu tidak mudah dilaksanakan
>terhadap Cell walaupun dengan bantuan makro, karena alasan yg sama
>(= event change pada worksheet baru dapat di deteksi jika pengisian cell telah
>diakhiri dengan enter, atau berpindahnya cell pointer)
>
>
>Jika pengisian ke cell melaluiTEXT BOX  barulah hal itu dapat dilakukan
>karena textBox punya event change, dimana event terjadi setiap data di dalamnya 
>diubah walaupun belum berakhir proses pengisian/editingnya.
>Tetapi barangkali saja, temans lain punya cara yg oke, mari kita tunggu..
>
>
>Sementara itu ada koreksi gambar yg tadi disertakan, ini koreksinya
>
>
>
>
>
>
>o'Seno
>
>
>
>
>
>
>
>2012/2/9 Anton Gundul <antongundul@yahoo.com>
>
>Dear Pak Ontoseno
>>
>>Terimakasih banyak Pak Ontoseno, tapi yang saya inginkan adalah pesan peringatan muncul ketika pengetikan sedang berlangsung melebihi jumlah maximal karakter. Kalau dengan Data Validation pesan peringatan muncul setelah pengetikan selesai/enter.
>>Warm Regard
>>Anton
>>
>>
>>
>>
>>________________________________
>> Dari: o' Seno <ontoseno84@gmail.com>
>>
>>Dikirim: Kamis, 9 Februari 2012 18:34 
>>[-1]  Blok / Select  Range A1:A10 (atau range yg anda kehendaki untuk diberi pembatasan Input)
>>[+0]  Buka dialogBox Data Validation
>>
>>
>>di excel 2003: ada di menu  Data > Data Vaidation
>>di excel 2007: ada di Ribbon > Tab: Data > lihat di Group: Data Tools > Data Validation
>>
>>
>>[+1]  pada kotak kombol "Allow": pilih Text Length
>>[+2]  pada kotak Minimum isikan 0
>>[+3]  pada kotak Maximum isikan 5
>>[+4]  pesan panduan dapat di set di halaman (tab) "Input Message"
>>[+5]  pesan peringatan bisa di set pada Halaman (Tab) "Error Alert"
>>[+6]  OK
>>
>>o'Seno
>>
>>
2h.

Re: Membatasi penginputan karakter ketika penginputan sedang berlang

Posted by: "o' Seno" ontoseno84@gmail.com   ontoseno84@ymail.com

Thu Feb 9, 2012 4:39 am (PST)



artinya pendapatku gak terlalu salah ya..
tidak bisa: kalau pengetikan datanya langsung di CELL
tetapi bisa: kalau diketik melalui TEXTBOX

contoh makro sudah ada di OnLineFolder mbak-e...
hanya dari tadi "gua" cari gak ketemu2,
untung Mas Kid segera turun tangan...

*o'Seno*

*2012/2/9 Kid Mr. <mr.nmkid@gmail.com>*

> Ups sorry, salah upload file.
> File terlampir adalah yang agak lebih baik.
> Kid.
>
> *2012/2/9 o' Seno <ontoseno84@gmail.com>*
>>
>>> **
>>>
>>> Perubahan di cell itu baru di-AKUI (dapat dievalluasi) data yg diisikan
>>> kedalamnya
>>> jika PROSES PENGISIAN TELAH BERAKHIR, yaitu telah di ENTER atau
>>> cell-Pointer- telah dipindah ke cell lain
>>>
>>> Jadi (menurut pendapatku) keinginan pak Gundul itu tidak mudah
>>> dilaksanakan
>>> *terhadap Cell *walaupun dengan bantuan makro, karena alasan yg sama
>>> (= *event change pada worksheet* baru dapat di deteksi jika pengisian
>>> cell *telah*
>>> *diakhiri dengan enter*, atau berpindahnya cell pointer)
>>>
>>> Jika pengisian ke cell melalui* TEXT BOX* barulah hal itu dapat
>>> dilakukan
>>> karena textBox punya event change, dimana event terjadi setiap data di
>>> dalamnya
>>> diubah walaupun belum berakhir proses pengisian/editingnya.
>>> Tetapi barangkali saja, temans lain punya cara yg oke, mari kita tunggu..
>>>
>>>
3a.

Bls: [belajar-excel] SIMPAN DATA USER FORM PADA FILE YANG BEDA

Posted by: "Harry" hariansyahptk@yahoo.com   hariansyahptk

Thu Feb 9, 2012 12:07 pm (PST)



Dear Mr. Kid,

Terima kasih atas penjelasan dan rumusya.
Untuk pertanyaan No. 1 saya telah mencoba rumusnya sbb:

   Dim iRow As Long, Reg As Range, oCtrl As Control
   Dim wbkA As Workbook, wbkDB As Workbook
 
   Set wbkA = ThisWorkbook
   Set wbkDB = Workbooks.Open(wbkA.Path & "\DATABASE.Xls")
   wbkA.Activate
  
   wbkDB.Worksheets("Registrasi").Unprotect "........."
   Set Reg = wbkDB.Worksheets("Registrasi").Cells(1)

Dan diakhir rumusnya saya pakai rumus

wbkDB.Worksheets("Registrasi").Protect "........."
End Sub

tapi hasilnya tidak bisa.
Tetapi saya harus menggunakan lagi rumus:
Dim iRow As Long, Reg As Range, oCtrl As Control
   Dim wbkA As Workbook, wbkDB As Workbook
 
   Set wbkA = ThisWorkbook
   Set wbkDB = Workbooks.Open(wbkA.Path & "\DATABASE.Xls")
   wbkA.Activate
  
   wbkDB.Worksheets("Registrasi").Protect "........."
End Sub
Sehingga proses penyimpanannya lebih lama (loadingnya lebih lama)...???

Untuk pertanyaan No 2, saya masih belum dapat mengerti.
Yang saya maksudkan adalah: Bagaimana cara / rumusnya jika pada File "DATABASE" tsb saya buat User Form yang jika saya Click dapat connect ke file "REGISTRASI.Xls"...???

Sedangkan untuk pertanyaan No. 3, saya menggunakan rumus sbb:

Private Sub UserForm_Initialize()

   Dim iRow As Long, Reg As Range, oCtrl As Control
   Dim wbkA As Workbook, wbkDB As Workbook
  
   Set wbkA = ThisWorkbook
   Set wbkDB = Workbooks.Open(wbkA.Path & "\DATABASE.Xls")
   wbkA.Activate

Dim i As Long, TbHeigh As Long, TbWidth
  
   Set MemMaster = wbkDB.Worksheets("Registrasi").Cells(1).CurrentRegion
   TbHeigh = MemMaster.Rows.Count - 1
   TbWidth = MemMaster.Columns.Count - 1
   Set MemMaster = MemMaster.Offset(1, 0).Resize(TbHeigh, TbWidth)
  
   Application.EnableEvents = False
   With Cbonoregpinjam
      .ColumnCount = 2
      .BoundColumn = 1
      For i = 1 To TbHeigh
         .AddItem
         .List(i - 1, 0) = MemMaster(i, 1)
      Next i
   End With
   Application.EnableEvents = True
   txttglkembali = Format(Date, "mm/dd/yyyy")
   txtjamkembali = Format(Time, "h:mm")

Alhamdulillah, rumus tersebut sudah sesuai dengan yang saya harapkan.
Hanya saja jika diakhir rumus saya tambah dengan rumus :
   If MsgBox("DATA ANDA TELAH DISIMPAN. TAMBAH...???", 32 + 4, "KONFIRMASI") = vbYes Then
   Else
      Unload Me
   End If
End Sub

Dan selanjutnya saya Click "YES", kenapa jadi Error...???
Tapi jika saya Click "NO", so far so good.

Mengenai rumus:
Dim iRow As Long, Reg As Range, oCtrl As Control
   Dim wbkA As Workbook, wbkDB As Workbook
 
   Set wbkA = ThisWorkbook
   Set wbkDB = Workbooks.Open(wbkA.Path & "\DATABASE.Xls")
   wbkA.Activate

Bisa atau tidak jika kita tidak menggunkan rumus:

   Set wbkDB = Workbooks.Open(wbkA.Path & "\DATABASE.Xls")

Maksudnya bagaimana caranya jika File "DATABASE.Xls" tersebut dibiarkan dalam keadaan Stand By (tetap terbuka)...???

Mohon berkenan penjelasannya.

Terima kasih.

Regards,

Harry

________________________________
Dari: Kid Mr. <mr.nmkid@gmail.com>
Dikirim: Kamis, 9 Februari 2012 9:57
 
Dear Harry,

1. Proteksi sheet :
Sheets("nama sheetnya").protect "passwordnya"       'protect
Sheets("nama sheetnya").unprotect "passwordnya"      'unprotect

Ketika akan olah sheet terproteksi, lakukan unprotect lebih dulu.
Usai mengolah sheet terproteksi, lakukan protect lagi.

2. Sebaiknya file database hanya berisi data saja. Seluruh form input (interface input) seoerti pinjam, kembali, perpanjang, beli, bayar, dsb diletakkan pada file terpisah, misal file Input. Untuk laporan (output) seperti laporan bulanan, daftar peminjam yang telat pengembaliannya, dsb, juga diletakkan di file terpisah, misal di file Output.
Untuk dapat memanfaatkan data di workbook database sheet database, maka workbook database dibuka lebih dulu. Untuk keindahan, bisa saja workbook database disembunyikan. Yang penting, jangan lupa untuk menutup file database ketika usai menggunakannya.

Misal, sebuah form butuh data dari sheet database, maka saat init form, lakukan buka file database. Bila perlu, sembunyikan file database. Ketika form ditutup, pada event query close bisa dilakukan penutupan file database.

Contoh buka dan sembunyikan file :
'letakkan di bagian deklarasi variabel module
Public wbkApp as workbook, wbkDB as workbook

'contoh routine buka dan sembunyikan file excel
public sub BukaDanSembunyi()
     application.screenupdating=false
      set wbkapp=thisworkbook
      set wbkdb=workbooks.open "d:\data\database.xls"
      wbkapp.activate
      windows(wbkdb.name).visible=false
      application.screenupdating=true
end sub

'contoh tampilkan kembali yang dihide
public sub TampilkanLagiSiFile()
      windows(wbkdb.name).visible=true
end sub

'contoh tutup file
public sub TutupFileExcel()
      wbkdb.close false     'jika tidak mau disimpan pengubahan datanya
end sub

3. Sayangnya listing code yang disertakan tidak menampakkan penggunaan sheet database.
Jika file database telah dibuka, mestinya seluruh kegiatan (non formula links) yang membutuhkan data di sheet database pada file database tersebut dapat dilakukan seperti :

'contoh init variabel sheet database di file database
dim shtDB as worksheet
set shtdb=wbkdb.sheets("database")

'contoh init variabel range di sheet database pada file database
dim rngDB as range
set rngdb=wbkdb.sheet("database").range("a1").currentregion

Wassalamualaikum Wr. Wb.
Kid.

4a.

Re: Bisakah Rapel Kekurangan Gaji ini dibuat otomatis?

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

Thu Feb 9, 2012 3:58 pm (PST)




Maaf, hanya ingin penegasan: Jadi kasus saya kali ini gak bisa diotomatiskan ya? 

--- On Wed, 2/8/12, guru muda <mudaguru@yahoo.com> wrote:

From: guru muda <mudaguru@yahoo.com>
Subject: [belajar-excel] Bisakah Rapel Kekurangan Gaji ini dibuat otomatis?
To: belajar-excel@yahoogroups.com
Date: Wednesday, February 8, 2012, 10:34 AM

 

Salam,

Kepada para master excel dan segenap warga milis belajar-excel. Sebenarnya ini adalah permintaan tolong dari teman saya di bagian keuangan yg selalu pusing jika harus membuat rapel kenaikan gaji karena kerja manual dan rawan salah.

Dia ingin membuat daftar gaji dengan segenap laporan dan rekapitulasinya secara otomatis. Selengkapnya silakan lihat pada lampiran.

Terima kasih

4b.

Re: Bisakah Rapel Kekurangan Gaji ini dibuat otomatis?

Posted by: "i Haps" hapsari.stlizbeth@gmail.com   liz_indri_haps

Thu Feb 9, 2012 4:50 pm (PST)



"tidak /belum ada yang menanggapi" kalau di simpulkan sebagai
"tidak bisa diotomatiskan" sepertinya gak nyambung, pak Guru..
jangan terlalu sederhana lah yauw.. (& jangan ditularkan kpd murids nya)

suatu kasus belum / tidak ditanggapi ada banyak penyebabnya, antara lain
- masalah dan tujuan otomatisasi sulit dipahami, misal penjelasannya
kurang,
- contoh-data sulit dipahami maksud dan tujuannya
dsb, itu dari segi materi-nya
oleh karena itu dalam posting ulang / reminder, sebaiknya tidak hanya
mengulang
atau me Remind "doang", tetapi sambil menambahkan info-info tambahan...

dari segi Calon Penanggap
- tidak semua orang tiap hari sempat membaca kasus di milis dan siap
MEMBUATKAN otomatisasinya
karena masing-masing member punya kegiatan lain diluar bermilis ria
ya (biasanya) lebih urgent dan ebrat katimbang urusan bermilis-ria
-Mood seseorang juga punya fluks, kemarin bersemangat sekali, sekarang
tidak ada semangat sama sekali, itu hal biasa kan..

kira kira begitulah cara menyikapi milis.

(itu hanya fendafat saya lho pak Guru,,,,
orang lain punya "pendapatan" lain lagi...)

-i-

2012/2/10 guru muda <mudaguru@yahoo.com>

> **
>
> Maaf, hanya ingin penegasan: Jadi kasus saya kali ini gak bisa
> diotomatiskan ya?
>
>
> *--- On Wed, 2/8/12, guru muda <mudaguru@yahoo.com> wrote:
>
> Salam,
>
> Kepada para master excel dan segenap warga milis belajar-excel. Sebenarnya
> ini adalah permintaan tolong dari teman saya di bagian keuangan yg selalu
> pusing jika harus membuat rapel kenaikan gaji karena kerja manual dan rawan
> salah.
>
> Dia ingin membuat daftar gaji dengan segenap laporan dan rekapitulasinya
> secara otomatis. Selengkapnya silakan lihat pada lampiran.
>
> Terima kasih*
>
Recent Activity
Visit Your Group
Yahoo! Groups

Small Business Group

Own a business?

Connect with others.

Yahoo! Groups

Dog Group

Connect and share with

dog owners like you

Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Need to Reply?

Click one of the "Reply" links to respond to a specific message in the Daily Digest.

Create New Topic | Visit Your Group on the Web
---------------------------------------------------------------------
bergabung ke milis (subscribe), kirim mail kosong ke:
belajar-excel-subscribe@yahoogroups.com

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

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

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

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

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

Tidak ada komentar:

Posting Komentar