Betul , saya tidak mengamati ada spasi  di depan pertama , jadi koreksi 
:Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    With TextBox1
        If Len(.Value) > 0 Then
            .Value = .Value & " "
        End If
    End With
End Sub

 catatan : trims atas koreksinyaTo: [email protected]
From: [email protected]
Date: Thu, 3 Nov 2011 09:44:06 +0700
Subject: Re: [belajar-excel] Mohon pencerahan : Menambah spasi setiap input 1 
karakter di textbox


















 



  


    
      
      
      Kalau gak salah duga (kalau gak salah loh ya -- kalo salah, dicuekin aja 
semua tulisan diemail ini--), script :
TextBox1.Value = TextBox1.Value & " "

pada event keypress akan membuat hasil didahului dengan spasi (" ").



Mungkin dengan diberi kondisi cek isi textbox-nya lebih dulu, bisa dihilangkan 
spasi paling depannya.
with textbox1
   if lenb(.text)<>0 then
       .text=.text & " "
   endif
end with



Kid.

2011/11/3 jkssxls <[email protected]>

















 



  


    
      
      
       Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

    TextBox1.Value = TextBox1.Value & " "End Sub Textbox atas adalah TextBox1 
dan bawah adalah TextBox2

 -----Original Message-----
From: [email protected] [mailto:[email protected]] On 
Behalf Of Asror Al-Aliif's


Sent: Thursday, November 03, 2011 9:09 AM
To: [email protected]
Subject: [belajar-excel] Mohon pencerahan : Menambah spasi setiap input 1 
karakter di textbox

 Assalamualaikum, Rekan milis BeExcel, saya memang pendatang baru di dunia VBA, 
dan masih tanya sana sini, saya ingin bertanya, saya mempunyai Textbox, 
biasanya textbox itu ketika ditulis akan seperti nulis biasa di media lain, 
saya ingin membuat textbox itu ketika ditulis karakter, langsung otomatis 
membuat spasi, contohnya, saya menulis "asror" tapi di textbox tersebut 
langsung membuat spasi diantaranya, menjadi "a s r o r".

 Terimakasih, Asror  Safety is my responsibilitySent from Super Asror's  
BlackBerry® smartphone from Sinyal Bagus XL, Nyambung Teruuusss...!

  --- Mods ---BeExceler yang baik hati sekalian, dimohon buanget agar judul 
kasus mencerminkan kasusnya ya, supaya memudahkan search posting lama. Repot 
kan kalau semua thread posting judulnya Tolong atau Mohon pencerahan, padahal 
mau cari tentang Index dan Match misalnya.

 Jadi tulung ya... diikhlas-ikhlasken untuk membuat judul thread yang 
mencerminkan kasusnya.------------ ------------------------------------

 ---------------------------------------------------------------------bergabung 
ke milis (subscribe), kirim mail kosong ke: 
[email protected]

 posting ke milis, kirimkan ke: [email protected]

 berkunjung ke web 
milishttp://tech.groups.yahoo.com/group/belajar-excel/messages

 melihat file archive / mendownload lampiran 
http://www.mail-archive.com/[email protected]/

atau (sejak 25-Apr-2011) bisa juga di 
:http://milis-belajar-excel.1048464.n5.nabble.com/

 menghubungi moderators & owners: [email protected]

 keluar dari membership milis (UnSubscribe):kirim mail kosong ke  
[email protected]

    [email protected] 

 

    
     

    
    






  










    
     

    
    






                                          

<<attachment: image001.png>>

Kirim email ke