Lagi pula pake command button kan bisa Mas
scriptnya aja yang disesuaikan kebutuhan anda
contohnya ;
Sub repl_sum_of()
'script buat ganti semua kata yang ada kata2 "SUM_OF"
Cells.Replace What:=InputBox("Masukkan kata yang akan di ganti !",
"Replace", "sum of"), _
Replacement:="ยค", LookAt:=xlPart, SearchOrder:=xlByRows,
MatchCase:=False, _
SearchFormat:=False, ReplaceFormat:=False
End Sub
noel iblish mengirimkan email pada 12/2/2008 7:22 PM:
>
> bos2 skalian, gw mohon bgt bantuan about VBA.
> gw lagi buat aplikasi kyk VB gto di VBA excel.gw mau maintain
> database kantor gw based on excel.gw udah buat form pake label, text
> box dan beberapa command button.yang buat gw bingung cara aktifkan
> button FIND dan EDIT itu bagaimana coding-nya?
>
> Nikmati chatting lebih sering di blog dan situs web. Gunakan Wizard
> Pembuat Pingbox Online. http://id.messenger.yahoo.com/pingbox/
> <http://id.messenger.yahoo.com/pingbox/>
>
> [Non-text portions of this message have been removed]
>
>
[Non-text portions of this message have been removed]
