Otomatik Cari Hesap Kartı

[cocoa35]

Merhaba üstatlar, öncelikle güneydoğudaki deprem için herkese geçmiş olsun, bir konuda yardımınıza ihtiyacım var. Ekli örnek dosyada görüldüğü üzere UserForm1 de bulunan TextBox1 de yazılan isme göre otomatik bir sayfa açılsın ve Sayfa1 deki " Cari hesap tablosu oraya otomatik olarak oluşturulsun, oluşturulan tablonun A1 Hücresine ise adı ve soyadı& " Cari Hesap Kartı" yazsın. Bu mümkünmü bu konuda nasıl yardımcı olabilirsiniz.Teşekkürler

 

[cocoa35]

Forumda bir formül buldum istediğim şekilde sayfayı oluşturuyor ancak TextBox1 de yazan ismi A1 Hücresine yazdırtamadım vede sayfa adı numara olarak oluşuyor

 

[cocoa35]

Tamam hepsini forumdan buldum öenek olarak ekliyorum

 

[cocoa35]

3 nolu mesajımdaki örnek dosyada sayfaya aktarmada bir sorun oluyor, şöyleki TextBox daki rakkamın Binlik ayracı "." yani 23957.00 ancak yapıştırılan sayfadaki format 23.957,00 şeklinde "," ile ayrılmış sayfaya 23957.00 olarak yapıştığı için hatalı işlemler oluyor, bazı Format örnekleri buldum ; TextBox17=Format(TextBox17,"#,##0.00") veya

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = Format(TextBox1, "##,##.00")
End Sub

veya
Private Sub TextBox1_Change()
Me.TextBox1.Value = Format(Me.TextBox1.Value, "###,###")
End Sub

Bunların hiçbiri sorunu çözmüyor ne yapmalıyım?

 

[dEdE]

...Binlik ayracı "." yani 23957.00 ancak yapıştırılan sayfadaki format 23.957,00 şeklinde "," ile ayrılmış sayfaya 23957.00 olarak yapıştığı için hatalı işlemler oluyor,...

Merhaba,
Binlik ayracı değil galiba. Ondalık ayracı olmalı. Bir de aşağıdaki kodu dener misiniz?

TextBox1.Value = CDbl(Replace(TextBox1.Text, ".", ","))