oh ya mbak siti sy pake excel 2007. gmn yyahh
________________________________ Dari: hendrik karnadi <[email protected]> Kepada: [email protected] Terkirim: Jum, 10 Juni, 2011 20:51:11 Judul: Fw: [belajar-excel] macro excel Mbak Siti, Mau nanya ..., angka "48" dalam code di bawah ini (yang juga sering muncul dalam code yang Mbak buat) berfungsi untuk apa ? MsgBox "data MTBF belum diisi!", 48, "Hayyah!" Salam, Hendrik Karnadi ----- Forwarded Message ---- From: STDEV(i) <[email protected]> To: [email protected] Sent: Saturday, June 11, 2011 2:22:30 Subject: Re: [belajar-excel] macro excel penjelasannya kok minim sekali yaaa, jadi apa yg akan terbaca di bawah ini hanyalah khayalanku sendiri.. (1) membuat grafikotomatis Saya ndak tahu caranya; tetapi kalau membuat CHART otomatis .. ya tahu lah dikitts, asal.. tabel yg mau dibuat chartnya sudah ADA Tabel anda mana ??, apakah data yg anda tulis di email itu dianggap tabel di bagian mana nya saja yg mau dianggap tabel (hingga harus tampak di Chart-nya?) (2) membuat "button" ? Bisaa Aktifkan Toolbar yg bernama Control Toolbox (menu : View > Toolbax > Control Toolbox) ( anda kami anggap memakai excel 2003 ) Di situ banyak icon yg berupa tool untuk membuat (menginstance) ActiveX Control antara lain: CommandButton. Klik ikonnya, goreskan mouse pointer di sheet, maka terbentuklan sebuah CommandButton Atur atur dikit dengan kotak property nya (misal warna, nama, caption Letak dan ukuran lebih gampang diatur pakai mouse (seret kesana, seret kesini..) Makro-nya (agar bisa mengisi data MTBF MTTR) kira kira seperti ini Dianggap: data-data yg ada ei email itu tertulisnya di Sheets Data MTBF ada di C8, MTTR adadi C9) Ini serba "mengarang sendiri" karena anda datang sebagai "pendekar bertangan kosong" (gak bawa sheet gito loch..) Private Sub CommandButton1_Click() UserForm1.Show End Sub Setelah selesai mengatur CommandButton; jangan lupa: keluar dari DesignMode , (klik ikon Exit Design Mode pada Toolbar yg diceritakan di atas.) Userform nya berisi beberapa prosedur (makro) salah satunya spt ini (userform dibuat denan menu Insert > UserForm di jendela Visual Basic Editor, sedangkan Jendela VBE itu dapat dihadirkan dengan ALt + F11) Private Sub Cmd_OK_Click() ' INPUT DICEGAH BILA SALAH SATU TEXTBOX MASIH KOSONG If TxtMTBF = vbNullString Then MsgBox "data MTBF belum diisi!", 48, "Hayyah!" Exit Sub End If If TxtMTTR = vbNullString Then MsgBox "data MTTR belum diisi!", 48, "Hayyah!" Exit Sub End If ' MEMASUKKAN INPUT KE CELLS Range("C8") = CLng(TxtMTBF) Range("C9") = CLng(TxtMTTR) End Sub Saya yaQQin bahwa apa yg kita ajukan ini (workbook & "per-makro-an" nya pasti tidak cocok dengan kehendak anda. Tatapi, enaknya (bagi saya), anda tidak bisa komplain karena ssebelumnya anda tidak pernah mengajukan syarat (spesifikasi dan limitation) & penjelasan yg memadai. (kalau misalnya tetap komplain juga, ya ndak pa pa, tetap akan dibantu, kalau kita mampu menangkap maksod penjelsan anda, maupun mampu membuatnya) 2011/6/10 anggraini <[email protected]> no : 1 >nama peralatan : x ray 1 >waktu operasi : 24x30x6 (menit) >waktu gagal : ( 200 menit) >jumlah gagal : 6 kali >MTBF : 100 menit >MTTR : 50 menit >% availibility : adalah waktu operasi / waktu gagal * 100% > >bagaimana sya membuat dengan makro yang secara otomatis terbentuk grafik? >bisakah sy membuat semacam button untuk mengisi data di MTBF dan MTTR? thanks > >
