Alhamdulillah sudah berhasil. Makasih Mr. Kid -------------------------------------------- On Thu, 10/16/14, 'Mr. Kid' [email protected] [belajar-excel] <[email protected]> wrote:
Subject: Re: [belajar-excel] Mencari data Untuk CheckBox To: "BeExcel" <[email protected]> Date: Thursday, October 16, 2014, 5:09 PM Wa'alaikumussalam Wr. Wb. Mungkin sebelum baris script berbunyi : baris = C.Row diberi blok script berikut : c.parent.activate CariProduk = "=countif(" & c.resize(1,7).address & ",""s%"")<>0" 'asumsi tabel data ada 7 kolom 'misal checkbox bernama chk1 sampai chk6 yang caption-nya sama dengan isi cells chk1.value=evaluate( replace( cariproduk,"s%",chk1.caption ) ) chk2.value=evaluate( replace( cariproduk,"s%",chk2.caption ) ) chk3.value=evaluate( replace( cariproduk,"s%",chk3.caption ) ) chk4.value=evaluate( replace( cariproduk,"s%",chk4.caption ) ) chk5.value=evaluate( replace( cariproduk,"s%",chk5.caption ) ) chk6.value=evaluate( replace( cariproduk,"s%",chk6.caption ) ) Wassalamu'alaikum wr. wb. Kid. 2014-10-16 17:33 GMT+11:00 ris ha [email protected] [belajar-excel] <[email protected]>: Assalamu'alaikum. Salam sukses untuk para master semua. Kali ini, saya mau bertanya terkait mencari data, kemudian data tersebut muncul pada CheckBox yang kita buat. Saya telah membuat pendarian data, yang ditampilkan pada TextBox dengan macro spt dibawah Dim CariProduk As String CariProduk = Me.NoKP.Value If Trim(CariProduk) <> "" Then With Sheets("ItemCOQ").Range("A2:A1048576") Set C = .Find(CariProduk, LookIn:=xlValues) If Not C Is Nothing Then Application.Goto C, True If C = "" Then Sheets("ItemCOQ").Range("A1").Select End If baris = C.Row Me.ProdukKP.Value = Worksheets("ItemCOQ").Cells(baris, 2).ValueElse Me.ProdukKP.Value = "Produk Tidak Ada" Kemudian saya ingin memunculkan data pengetesan yang ditampilkan pada CheckBox sebagaimana gambar terlampir. Misal No urut 002 Item TestCheckBox Appearance tercentangCheckBox Colour ASTM tercentangCheckBox Density tercentangCheckBox Total Base Number tidak tercentangCheckBox Viscosity Kinematic 40 tidak tercentangCheckBox Viscosity Kinematic 100 tercentang Mohon pencerahan pada para master excel semua. Terima kasih Salam Haris #yiv4633645442 #yiv4633645442 -- #yiv4633645442ygrp-mkp { border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;} #yiv4633645442 #yiv4633645442ygrp-mkp hr { border:1px solid #d8d8d8;} #yiv4633645442 #yiv4633645442ygrp-mkp #yiv4633645442hd { color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;} #yiv4633645442 #yiv4633645442ygrp-mkp #yiv4633645442ads { margin-bottom:10px;} #yiv4633645442 #yiv4633645442ygrp-mkp .yiv4633645442ad { padding:0 0;} #yiv4633645442 #yiv4633645442ygrp-mkp .yiv4633645442ad p { margin:0;} #yiv4633645442 #yiv4633645442ygrp-mkp .yiv4633645442ad a { color:#0000ff;text-decoration:none;} #yiv4633645442 #yiv4633645442ygrp-sponsor #yiv4633645442ygrp-lc { font-family:Arial;} #yiv4633645442 #yiv4633645442ygrp-sponsor #yiv4633645442ygrp-lc #yiv4633645442hd { margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;} #yiv4633645442 #yiv4633645442ygrp-sponsor #yiv4633645442ygrp-lc .yiv4633645442ad { margin-bottom:10px;padding:0 0;} #yiv4633645442 #yiv4633645442actions { font-family:Verdana;font-size:11px;padding:10px 0;} #yiv4633645442 #yiv4633645442activity { background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;} #yiv4633645442 #yiv4633645442activity span { font-weight:700;} #yiv4633645442 #yiv4633645442activity span:first-child { text-transform:uppercase;} #yiv4633645442 #yiv4633645442activity span a { color:#5085b6;text-decoration:none;} #yiv4633645442 #yiv4633645442activity span span { color:#ff7900;} #yiv4633645442 #yiv4633645442activity span .yiv4633645442underline { text-decoration:underline;} #yiv4633645442 .yiv4633645442attach { clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;} #yiv4633645442 .yiv4633645442attach div a { text-decoration:none;} #yiv4633645442 .yiv4633645442attach img { border:none;padding-right:5px;} #yiv4633645442 .yiv4633645442attach label { display:block;margin-bottom:5px;} #yiv4633645442 .yiv4633645442attach label a { text-decoration:none;} #yiv4633645442 blockquote { margin:0 0 0 4px;} #yiv4633645442 .yiv4633645442bold { font-family:Arial;font-size:13px;font-weight:700;} #yiv4633645442 .yiv4633645442bold a { text-decoration:none;} #yiv4633645442 dd.yiv4633645442last p a { font-family:Verdana;font-weight:700;} #yiv4633645442 dd.yiv4633645442last p span { margin-right:10px;font-family:Verdana;font-weight:700;} #yiv4633645442 dd.yiv4633645442last p span.yiv4633645442yshortcuts { margin-right:0;} #yiv4633645442 div.yiv4633645442attach-table div div a { text-decoration:none;} #yiv4633645442 div.yiv4633645442attach-table { width:400px;} #yiv4633645442 div.yiv4633645442file-title a, #yiv4633645442 div.yiv4633645442file-title a:active, #yiv4633645442 div.yiv4633645442file-title a:hover, #yiv4633645442 div.yiv4633645442file-title a:visited { text-decoration:none;} #yiv4633645442 div.yiv4633645442photo-title a, #yiv4633645442 div.yiv4633645442photo-title a:active, #yiv4633645442 div.yiv4633645442photo-title a:hover, #yiv4633645442 div.yiv4633645442photo-title a:visited { text-decoration:none;} #yiv4633645442 div#yiv4633645442ygrp-mlmsg #yiv4633645442ygrp-msg p a span.yiv4633645442yshortcuts { font-family:Verdana;font-size:10px;font-weight:normal;} #yiv4633645442 .yiv4633645442green { color:#628c2a;} #yiv4633645442 .yiv4633645442MsoNormal { margin:0 0 0 0;} #yiv4633645442 o { font-size:0;} #yiv4633645442 #yiv4633645442photos div { float:left;width:72px;} #yiv4633645442 #yiv4633645442photos div div { border:1px solid #666666;height:62px;overflow:hidden;width:62px;} #yiv4633645442 #yiv4633645442photos div label { color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;} #yiv4633645442 #yiv4633645442reco-category { font-size:77%;} #yiv4633645442 #yiv4633645442reco-desc { font-size:77%;} #yiv4633645442 .yiv4633645442replbq { margin:4px;} #yiv4633645442 #yiv4633645442ygrp-actbar div a:first-child { margin-right:2px;padding-right:5px;} #yiv4633645442 #yiv4633645442ygrp-mlmsg { font-size:13px;font-family:Arial, helvetica, clean, sans-serif;} #yiv4633645442 #yiv4633645442ygrp-mlmsg table { font-size:inherit;font:100%;} #yiv4633645442 #yiv4633645442ygrp-mlmsg select, #yiv4633645442 input, #yiv4633645442 textarea { font:99% Arial, Helvetica, clean, sans-serif;} #yiv4633645442 #yiv4633645442ygrp-mlmsg pre, #yiv4633645442 code { font:115% monospace;} #yiv4633645442 #yiv4633645442ygrp-mlmsg * { line-height:1.22em;} #yiv4633645442 #yiv4633645442ygrp-mlmsg #yiv4633645442logo { padding-bottom:10px;} #yiv4633645442 #yiv4633645442ygrp-msg p a { font-family:Verdana;} #yiv4633645442 #yiv4633645442ygrp-msg p#yiv4633645442attach-count span { color:#1E66AE;font-weight:700;} #yiv4633645442 #yiv4633645442ygrp-reco #yiv4633645442reco-head { color:#ff7900;font-weight:700;} #yiv4633645442 #yiv4633645442ygrp-reco { margin-bottom:20px;padding:0px;} #yiv4633645442 #yiv4633645442ygrp-sponsor #yiv4633645442ov li a { font-size:130%;text-decoration:none;} #yiv4633645442 #yiv4633645442ygrp-sponsor #yiv4633645442ov li { font-size:77%;list-style-type:square;padding:6px 0;} #yiv4633645442 #yiv4633645442ygrp-sponsor #yiv4633645442ov ul { margin:0;padding:0 0 0 8px;} #yiv4633645442 #yiv4633645442ygrp-text { font-family:Georgia;} #yiv4633645442 #yiv4633645442ygrp-text p { margin:0 0 1em 0;} #yiv4633645442 #yiv4633645442ygrp-text tt { font-size:120%;} #yiv4633645442 #yiv4633645442ygrp-vital ul li:last-child { border-right:none !important; } #yiv4633645442
