Hot Fox

Tecnologia, programação e muito Visual FoxPro.

quinta-feira, 31 de dezembro de 2009

Re: ]] XL-mania [[ Bagaimana mengotomatisasi input data Produksi & Defect

 

Di sheet 'input' digambarkan ada 4 bijik tombol.
tombol 1 dan 2 saya belum tahu maksudnya, harus mengotomatiskan apa;
values dari cell MANA mau di-input ke cell MANA.. ? Penjelasaannya
kurang jelas dikitt.. / terlalu global..
Kalau Tombol 3, saya tahu, sepertinya harus mengisikan B19:J19 ke tabel
pada sheet defect.
 
Jika pengisiannya hanya SEKALI saja, tidak ada masalah, karena kita dapat
menuliskan di cell A2 (pada sheet defect) rumus sederhana  =input!B19
lalu menyalinnya ke C19:J19
 
Tetapi dituliskan DI MANA ? itulah yg menjadi masalah; karena walaupun
tabelnya sudah tertentu tetapi cell /baris tujuan tidak berupa cell tetap. 
 
Cell /Baris Tujuan selalu baris kosong baru, maksodnya: setiap tabel diisi, pengisian
berikutnya harus di baris di bawahnya.
Memang FORMULA, katanya, dapat dibuat untuk bisa MENGHADIRKAN value dari
cell yg tidak tetap tempatnya;  tetapi FORMULA tidak dapat mencari sendiri
tempat di mana dia harus dituliskan.
Pekerjaan mencari tempat untuk menuliskan rumus /data, hanya dapat dilakukan
oleh orang / TINDAKAN DARI USER.  Sedangkan Tindakan tidak dapat dibuat
RUMUS atau FORMUA nya.
 
Agar tindakan itu 'kelihatannya' otomatis, maka tindakan itu dapat di-codekan.
Di lain waktu code itu dapat di-SURUH jalan / RUN, menjalankan tindakan yg
tertulis dalam code-code tsb.
 
Cara menuliskan code-cede ada 'aturannya'.  Aturan itu, untuk excel modern,
katanya, disebut bahasa VBA (visual basic for apa...  'gitu..)
Sekelompok tindakan yg permulaan dan berakhirnya telah jelas, ditulis dalam
sekelompok code. Ada yg bilang, ini disebut prosedur.
Di excel, prosedur ini sering disebut 'makro'.
Mungkin, mungkin lho ya... kalau di aplikasi lain bisa disebut 'carefour', atau
mungkin pula : 'giant'
 
Di bawah ini ada text salinan dua buah prosedur. 
Sub Enter3 akan JALAN kalau tombol 3 di-ceklik, sedangkan sub Reset3 akan
jalan kalau tombol 4 di-ceklik.
(wah.. sulit ya.. menceritakan tombol; kalau dlm satu area ada BANYAK tombol diberi nama sama )
 
'--------------
Sub Enter3()
   ' meng-entry data defect ke tabel defect
   Dim newRow As Range
   Set newRow = Sheets("defect").Cells(1).CurrentRegion
   Set newRow = newRow(newRow.Rows.Count + 1, 1)
   Range("DefectDetails").Copy
   newRow.PasteSpecial xlPasteValuesAndNumberFormats
   Application.CutCopyMode = False
End Sub
 
Sub Reset3()
   ' menghapus data di box defects
   Range("DefectDetails").Offset(0, 1).ClearContents
End Sub
'-------------
 
Selamat tahun baru, semoga segalanya menjadi lebih baek...
 
bluewater, 31dec2009 /01jan2010
~ctv~
 
----- Original Message -----
From: Myeko
To: xl-mania@yahoogroups.com
Sent: Thursday, December 31, 2009 1:56 PM
Subject: ]] XL-mania [[ Bagaimana mengotomatisasi input data Produksi & Defect

Selamat siang menjelang Tahun Baru 2010
saya sedang coba untuk mengotomatisasikan proses pengisian input data produksi dan jumlah defect.
yang saya harapkan adalah untuk Proses pengisian hanya dilakukan di 1 sheet input
dan hasilnya secara otomatis update ke sheet yang lain.

Kepada semua pakar excel mohon pencerahanya dan mohon bantuannya?
demikian saya sampaikan terimakasih atas perhatiannya.
eko bp

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Hoo... Hoo... Hoo... Merry Christmas! Happy Holiday!              |
| 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              |
+-------------------------------------------------------------------+
.

__,_._,___
Postado por às

Nenhum comentário:

Postar um comentário

Assinar: Postar comentários (Atom)

Arquivo do blog