Tecnologia, programação e muito Visual FoxPro.

terça-feira, 17 de dezembro de 2013

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
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:
+-:: 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              |
+-------------------------------------------------------------------+
.

__,_._,___

Nenhum comentário:

Arquivo do blog