• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

sayfa üzerinde textboxla çalışmak.

Katılım
10 Mayıs 2007
Mesajlar
1,395
Excel Vers. ve Dili
2007 Türkçe
merhabalar, bu site sayesinde userform üzerinde textboxlar ile çalışmayı öğrendim.Örneklerde bu şekilde zaten.Ben şimdi textboxları sayfalarda kulannmak istiyorum bununla ilgili örnekler sitede varmı acaba bilen bir arkadaş yardımcı olabilirmi? ben aradım ama bulamadım.

sevgiler.
 
Merhaba sn hrknp

Ne tür bir çalışmayı incelemek istiyorsunuz? Örnekleyebilirmsiiniz?
 
Çok genel bir soru olmuş ... Forumda, parça parça, konuyla ilgili çok şey bulunabilir. Ne yapmak istediğinizi anlatırsanız, uygun örnekler verilebilir ...
 
herhangi yapmam gereken birşey yok aslında demek istediğim örneğin textbox uygulamaları diyince forumda bir sürü örnek çıkıyor amam hepsi userform üzerinde yapılmış örnekler benim isteidğim userform kullanmadan çalışma sayfasına yerleştirilerek yapılan örnekler.umarım açabilmişimidr sorumu.
 
Merhaba Sn hrknp

Çok ufak bir "Veri Kaydı" örneği uygulaması hazırladım. İnceleyiniz...
 
harikasınız çok teşekkür edeirm ellerinize sağlık tam istediğim buydu iyi kaynak oldu benim için :)
 
belgeye commbobox eklesek comboboxdada sayfaları görüntületip hangi sayfa seçildiyse o sayfaya verileri eklemek olurmu
 
vovvvv:) harika olmuş çok işime yarayacak:) sitede böle örnek bulamamıştım.
çok teşekkürler.
 
peki mesela verileri sıradan işliyoruz diyelimki a1olsun b1 atlasın c1 olsun d4 atlasın d1 diye devam etsin bunu hangi kodla yapacağız.biraz karışık sordum aslında kayıt düğmesine bastığımızda aralardaki boş kalmasını istediğmiz hücreler olduğunu düşünebilirsiniz?
 
bir soru da ben ekleyeyim,texboxlarda yön tuşlarıyla veya enter ile ilerlemek mümkün mü?
 
Merhaba hrknp

Kodu İnceleyiniz...

Kod:
Private Sub CommandButton1_Click()
Dim box
box = Array(TextBox1, TextBox2, TextBox3, TextBox4, TextBox5)
son = Sheets(ComboBox1.Value).Cells(65536, 1).End(3).Row + 1
Sheets(ComboBox1.Value).Cells(son, "[COLOR=red]A[/COLOR]").Value = box(0)
Sheets(ComboBox1.Value).Cells(son, "[COLOR=red]C[/COLOR]").Value = box(1)
Sheets(ComboBox1.Value).Cells(son, "[COLOR=red]E[/COLOR]").Value = box(2)
Sheets(ComboBox1.Value).Cells(son, "[COLOR=red]G[/COLOR]").Value = box(3)
Sheets(ComboBox1.Value).Cells(son, "[COLOR=red]I[/COLOR]").Value = box(4)
    For i = 0 To 4
        box(i).Value = Empty
    Next
End Sub
 
çok teşekkür edeirm siz neden uzman değilsiniz.:) dosyanın 4-5 tane yedeğini alıcam:)
 
s.aleykum arkadaşlar örnekler güzele benziyor ama bende bir türlü çalışmadı... sorun olarak "Bu çalışma kitabı VBA projesi, ActiveX denetimleri ve programlanabilirlikle ilgili diğer özelliklerini kaybetti." diye bir uyarı veriyor. ne yapmam lazım... açıklarsanız sevinirim...
 
s.aleykum arkadaşlar örnekler güzele benziyor ama bende bir türlü çalışmadı... sorun olarak "Bu çalışma kitabı VBA projesi, ActiveX denetimleri ve programlanabilirlikle ilgili diğer özelliklerini kaybetti." diye bir uyarı veriyor. ne yapmam lazım... açıklarsanız sevinirim...

Araçlar-makro-güvenlikten önce güvenlik düzeyini düşük sonrada güvenilen yayımcılar sekmesindeki "visual basic erişimine güven" kutusunu işaretleyin ve dosyayı kaydettikten sonra kapatıp tekrar açın.
 
Merhabalar,
veri giriş alanı bilgileri başka bir hücreden alabilir mi?
örnek: "Adı" bilgisini D7 den alsın. yani veri alanına =d7 nasıl yazarız

ayrıca TAB tuşu ile veri giriş alanlarını atlamamız mümkün mü?
 
örnek: "Adı" bilgisini D7 den alsın. yani veri alanına =d7 nasıl yazarız

Merhaba Sn mkahram

Aşağıdaki kodu inceleyiniz..

Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
TextBox1.Value = [d7].Value
End Sub


"TAB tuşu ile Alan atlamak" ile ilgili çalışıyorum...
 
Geri
Üst