Mungkin begini:
1 TABEL YG KOKOH dan BAIK
Sheet Master Pegawai Judul Kolom tabel di baris 6 dan 7 sebaiknya
tidak dibuat MERGED CELL., biarkan sebagai Cells yg SEHAT.
(mau dipakai sbg patokan baris kosong yg harus diisi bukan !?)
Setelah di-UnMerged, Judul Kolom akan berada di baris 6
Baris data akan dimulai ditulis di baris 7 (PojokKiriAtas Data ada di C7)
Ini harus saya katakan di sini karena ada hubungannya dengan point 3.
yaitu mencari nilai iRow dan TxtNo.
2. KARAKTER PASSWORD
pada module UserForm LOGIN
tambahkan prosedur
Private Sub UserForm_Initialize()
TXTPASS.PasswordChar = "*"
End Sub
3. INPUT KE TABEL AGAR SELALU MENCARI BARIS BARU
pada Module UserForm FRMINPUT
(a) pada prosedur UserForm_Initialize:
Private Sub UserForm_Initialize()
Dim r As Integer, ws As Worksheet, c As Byte, darr()
Set ws = Worksheets("Master Pegawai")
txtNo.Value = ws.Cells(Rows.Count, 3).End(xlUp).Row - 6
(b) pada PROSEDUR CmdInput_Click
Private Sub CMDINPUT_Click()
Dim irow As Long, ws As Worksheet
Set ws = Worksheets("Master Pegawai")
irow = ws.Cells(Rows.Count, 3).End(xlUp).Offset(1, 0).Row
----- Original Message -----
From: Fandy Rasyid
To: [email protected]
Sent: Thursday, October 22, 2009 08:54PM
Subject: [belajar-excel] Pembuatan Login dan Pengisian Form
Dear Rekan-rekan
perkenalkan nama saya fandy sat ini saya sedang mencoba untuk belajar
membuat fungsi perhitungan dengan menggunakan macro yang tersedia di excel,
hanya saja ada kendala yang saya hadapi, sebelumnya saya telah membaca
penginputan dengan menggunakan form di pembahasan sebelumnya dari bahasan
tersebut ingin saya kembangkan untuk pembuatan perhitungan gaji dengan
ditambahkan fungsi Login, tetapi di form login ini saya tidak bisa
menyembunyikan passwordnya untuk menyemunyikan password itu bagaimana caranya?
terus didalam form penginputan saya sudah mengikuti contoh dari pembahasan
sebelumnya tetapi malah hasil penginputannya tidak bisa pindah ke row
selanjutnya, kira22 salah dimana ya?? mohon bantuannya
username dan password = fandy dan 123
Terima kasih
fandy
(fandy474)
