My_msg1 = MsgBox("Sample belum terdaftar di StockPile, Klik Yes untuk
> Lanjut, No untuk keluar", vbYesNo, "Error Find")
>
> If My_msg1 = vbYes Then
>
> GoTo berikut_g
>
> Else
>
> Unload frm_AssayvsStockPile
>
> Exit Sub
From: belajar-excel@yahoogroups.com
[mailto:belajar-ex...@yahoogroups.com] On Behalf Of siti Vi
Sent: Friday, January 29, 2010 6:05 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Find dengan menggunakan macro/vb
?
waduh, saya malah ndak ta
dimilis sini atau milis sebelah ya saya lupa...
- Original Message -
From: hendrik karnadi
To: belajar-excel@yahoogroups.com
Sent: Friday, January 29, 2010 4:28 PM
Subject: Re: [belajar-excel] Find dengan me
From: "Posi, Yugustin (PTI-SOR)"
To: belajar-excel@yahoogroups.com
Sent: Friday, January 29, 2010 15:45:04
Subject: RE: [belajar-excel] Find dengan menggunakan macro/vb
Terimakasih masukannya Pak Hendrik.
Hal ini juga sudah saya lakukan.
My Sample mewakili ba
Terimakasih,
Salam
From: belajar-excel@yahoogroups.com
[mailto:belajar-ex...@yahoogroups.com] On Behalf Of hendrik karnadi
Sent: Friday, January 29, 2010 4:25 PM
To: belajar-excel@yahoogroups.com
Subject: Re: [belajar-excel] Find dengan menggunakan macro/vb
Macronya harus ditulis sbb :
Sub Macro_Find()
On Error GoTo ErrorHandler
Cells.Find(What:="My_Sample", After:=ActiveCell, LookIn:=xlFormulas,
LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:=False _
, SearchFormat:=False).Activate
Exit Sub
Erro
6 matches
Mail list logo