barangkali masih tertarik, masalah ini...
cara agak lain dari code akang Ayang...
Private Sub CommandButton1_Click()
Dim n As Long, PassList As String, X As Range
Set X = Range([A1], [A1].End(xlDown))
With TextInput
If TextInput = "" Then
MsgBox "Anda belum menginput..", 48, "L
Dear Pak,
Maap saya dah lama belum cek milis belajar-excel lagi, Bapak bisa menggunakan
Tools -> Reference -> Microsoft ActiveX Data Object ..., pakai versi yang
terakhir saja ya Pak ...
Trim's
- Original Message -
From: vcwalet haris
To: [EMAIL PROTECTED]
Sent: Monday, Nove
2 matches
Mail list logo