Re: ]] XL-mania [[ Mencetak data urut nomor sekali perintah belum sempurna.

 



Hai Suka Sih;

 

Coba tambahkan:

On Error Resume Next
Sebelum baris yang error

 

spt ini:

 

Private Sub CommandButton1_Click()
Dim U As Integer
If TextBox3.Value = "" Then
MsgBox " nomor kosong"
End If
   With ActiveSheet
      On Error Resume Next
      For U = TextBox1.Value To TextBox2.Value
         TextBox3.Value = U
        .Range("g5:h8").PrintOut
      Next
 End With
 
End Sub

 

 

Wassalam

~ Bagus ~

 

----- Original Message -----

From: Suka Sih

To: XL-mania@yahoogroups.com

Sent: Monday, December 16, 2013 1:52 PM

Subject: ]] XL-mania [[ Mencetak data urut nomor sekali perintah belum sempurna.

 

Kepada XLmania,

Pada contoh pekerjaan saya, untuk pencetakan banyak data secara berurutan sangat mudah dengan sekali perintah dengan hanya mengisi nilai textbox dari nomor ke nomor yang dikehendaki. Tapi ketika nilai textbox-nya kosong hasilnya error. Kiranya para xlmania berkenan menyempurnakan contoh kasus yang saya alami. File terlampir

Terima kasih atas tipsnya.

__._,_.___

Reply via web post

Reply to sender

Reply to group

Start a New Topic

Messages in this topic (3)

Recent Activity:

• New Members 13

Visit Your Group

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Maaf moderasi terlambat karena yahoogroups sering error           |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di :                                            |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use • Send us Feedback

.

__,_._,___