Tecnologia, programação e muito Visual FoxPro.

sexta-feira, 25 de setembro de 2009

Re: ]] XL-mania [[ Masalah Data Validation

 

setelah kolom diberi validasi spt itu
untuk mencegah NON Number masuk (walaupun dengan cara di copy paste)
worksheets perlu diberi sedikit makro (di module sheet ybs)
makro yg ditulis hendaknya MAU otomatis jalan jika cell di kolom tsb berubah nilainya
(memamfaatkan event wokbuk_ching)

inti kerjaan makro-nya
* jika data yg dicopykan bukan NUMBER maka langsung di hapus
* jika data berupa bertype numbers, ya di diamkan saja

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cel As Range
If Target.Column = 1 Then
For Each Cel In Target
If Not WorksheetFunction.IsNumber(Cel.Value) Then Cel.ClearContents
Next Cel
End If
End Sub

mengenai: apakah numbers yg dicopy paste-kan tsb berada dlm rentang angka 1 - 10;
data validation lah yg akan mengurusnya.

(note :kayaknya isnumber dari woksit tidak sama kerjanya dng isnumeric dari vba)

ctv



2009/9/23 ruud_mail2007 <ruud_mail2007@yahoo.co.id>
>
> hai semuanya,
> saya saat ini sedang menalami masalah dengan data validation microsoft excel.
>
> begini masalahnya:
> saya memformat cell A1 dengan tipe number dan memberikan data validation pada cell itu bahawa data yang valid adalah 1 s/d 10.
> kemudian saya melakukan protect sheet agar data validation yang telah saya buat tidak bisa di edit oleh orang lain.
> ketika saya mengetikkan nilai pada cell A1, data validation berjalan dengan baik, tetapi ketika saya melakukan copy n paste ke cell itu (misalkan nilai "coba") maka data validation seolah2 tidak bekerja karena nilai "coba" yang saya masukkan ke cell A1 tidak di tolak.
> ketika saya teliti lagi bahwa copy n paste yang saya lakukan telah merubah format cell yang telah saya setting sebelumnya dari numerik menjadi text.
>
> pertanyaan saya adalah:
> 1. bagaimana supaya ketika user melakukan copy n paste dari file excel lain maka data validation saya tetap bekerja.
> 2. bagaimana supaya ketika user malakukan copy paste tidak merubah format cell yang telah saya buat sebelumnya.
>
> terima kasih
>

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Selamat Idul Fitri... Mohon maap dari momods...                   |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
Recent Activity
Visit Your Group
Give Back

Yahoo! for Good

Get inspired

by a good cause.

Y! Toolbar

Get it Free!

easy 1-click access

to your groups.

Yahoo! Groups

Start a group

in 3 easy steps.

Connect with others.

.

__,_._,___

Nenhum comentário:

Arquivo do blog