Salon Tahsis Programı Hakkında

[Nurti64]

Merhaba arkadaşlar, Excel programını uzun yıllardır mesleğim gereği kullanıyorum ama vba da çok yeniyim. Salon Tahsis ve Mahalle Konak kiralama ile ilgili küçük bir program yazıyorum ama daha ilk dakidakan tökezledim.

Altın üye olmadığım için dosya yükleyemiyorum. 10-12 adet texbox'ım var ve textbox içine yazdığım metinleri excelde B3 A17 C24 gibi hücrelere yazdırmak istiyorum ama maalesef bunu yapamadım. İzlemiş olduğum eğitim setlerinde ise bu kısmı göremedim yada yapamadım.Userform üzerinde 11-12 adet textbox var ve ben bunları tek bir excel sayfasına değil birden fazla örnek; Dikilitaş, Karaağaç, Şerafettin mahalle konakları sayfasına da yazmasını istiyorum. Bu konu hakkında bana yardımcı olabilir misiniz?

 

[volki_112]

Merhaba arkadaşlar, Excel programını uzun yıllardır mesleğim gereği kullanıyorum ama vba da çok yeniyim. Salon Tahsis ve Mahalle Konak kiralama ile ilgili küçük bir program yazıyorum ama daha ilk dakidakan tökezledim.

Altın üye olmadığım için dosya yükleyemiyorum. 10-12 adet texbox'ım var ve textbox içine yazdığım metinleri excelde B3 A17 C24 gibi hücrelere yazdırmak istiyorum ama maalesef bunu yapamadım. İzlemiş olduğum eğitim setlerinde ise bu kısmı göremedim yada yapamadım.Userform üzerinde 11-12 adet textbox var ve ben bunları tek bir excel sayfasına değil birden fazla örnek; Dikilitaş, Karaağaç, Şerafettin mahalle konakları sayfasına da yazmasını istiyorum. Bu konu hakkında bana yardımcı olabilir misiniz?

Bütün textboxlarini doldur. Daha sonra kaydet tusuna basarsan. Kaydet tusuna alttaki gibi bir kod yazarsin.

Worksheets("Dikilitaş").Range("B3").Value = TextBox1.Value

Textbox1 deki degeri dikilitas b3 hücresine yazar.

 

[Korhan Ayhan]

Linkler faydalı olacaktır..

Veri Yönetimi Uygulamaları

Bu başlıkta, Veri kaydetme, değiştirme, silme gibi özellikleri içeren veri yönetimi uygulamalarını bulabilirsiniz.

www.excel.web.tr

Userform ve Nesnelere Yönelik uygulamalar

Bu başlıkta, userform ve nesnelerinin özelliklerini değiştirme, yeni özellikler ilave etme gibi nesneye yönelik uygulamaları bulabilirsiniz.

www.excel.web.tr

 

[Nurti64]

Bütün textboxlarini doldur. Daha sonra kaydet tusuna basarsan. Kaydet tusuna alttaki gibi bir kod yazarsin.

Worksheets("Dikilitaş").Range("B3").Value = TextBox1.Value

Textbox1 deki degeri dikilitas b3 hücresine yazar.

İyi ki varsın be hocam çok teşekkür ederim. Bir kıvılcım bekliyordum sen yaktın ateşi. Userform ekranını tamamladıktan sonra takıldığım konularda size yazabilir miyim ?

 

[Nurti64]

Peki şöyle yapabilir miyim;

Worksheets("Dikilitaş").Range("B12").Value = TextBox1.Value
Worksheets("Dikilitaş").Range("B20").Value = TextBox1.Value
Worksheets("Dikilitaş").Range("A33").Value = TextBox1.Value

Textbox'a girilen bir metnin Dikilitaş sayfasında birden fazla yere yazılması gerekiyor. Dikilitaş Sayfası 3 sayfalık bir sözleşme ve sözleşmeyi yapan kişinin her sayfada imza atması için adı soyadı var.

Aynı şekilde Dikilitaş, Karaağaç ve Şerafettin sayfalarına da bu bilgileri girmesi gerekiyor. En sonda da hangi mahalle konağının sözleşmesi çıkacaksa Dikilitaş Yazdır Butonu, Karaağaç Yazdır Butonu, Şerafettin Yazdır butonu yapıp. Hangi mahalle konağı ile ilgili sözleşme çıkacaksa onu çıktı alıp vatandaşa imzalatacağım.

Uzun lafın kısası bir sözleşme bilgilerini girdiğim form üzerinden 3 yada 4 excel sayfasına bu bilgileri gönderecek ve en sonunda hangi mahalle konağı ile ilgili çıktı almak istiyorsam onu çıktı alacağım.

Yukarıdaki örnek çalıştı her sayfa için aynen bu şekilde yazmam mı gerekiyor yoksa daha basit bir yöntemi var mı ? Şimdiden çok teşekkür ederim.

 

[volki_112]

Peki şöyle yapabilir miyim;

Worksheets("Dikilitaş").Range("B12").Value = TextBox1.Value
Worksheets("Dikilitaş").Range("B20").Value = TextBox1.Value
Worksheets("Dikilitaş").Range("A33").Value = TextBox1.Value

Textbox'a girilen bir metnin Dikilitaş sayfasında birden fazla yere yazılması gerekiyor. Dikilitaş Sayfası 3 sayfalık bir sözleşme ve sözleşmeyi yapan kişinin her sayfada imza atması için adı soyadı var.

Aynı şekilde Dikilitaş, Karaağaç ve Şerafettin sayfalarına da bu bilgileri girmesi gerekiyor. En sonda da hangi mahalle konağının sözleşmesi çıkacaksa Dikilitaş Yazdır Butonu, Karaağaç Yazdır Butonu, Şerafettin Yazdır butonu yapıp. Hangi mahalle konağı ile ilgili sözleşme çıkacaksa onu çıktı alıp vatandaşa imzalatacağım.

Uzun lafın kısası bir sözleşme bilgilerini girdiğim form üzerinden 3 yada 4 excel sayfasına bu bilgileri gönderecek ve en sonunda hangi mahalle konağı ile ilgili çıktı almak istiyorsam onu çıktı alacağım.

Yukarıdaki örnek çalıştı her sayfa için aynen bu şekilde yazmam mı gerekiyor yoksa daha basit bir yöntemi var mı ? Şimdiden çok teşekkür ederim.

her farklı yere yazılacak veri için yukarıda yaptığın gibi yapman lazım. daha pratik çözümler de mevcut ama Dosyanın kendisi olmadığı için bir şey diyemiyorum şu an. Makro ile yazdır örneğinizdeki gibi istediğiniz her şeyi yapabilirsiniz. Dosyanın kendisini paylaşırsanız daha güzel çözümler gelir.

 

[Nurti64]

Merhaba Arkadaşlar, çalışmış olduğum kurum için yazdığım ufak bir program var ama şöyle bir sorun yaşıyorum. Tahsis edilen kişi/kurum ve altındaki yazıları bulundukları kutu içerisinde ortaya hizala sağa sola hizala gibi şeyler yapamıyorum. Her yazının alt kısmı boş kalıyor bunu nasıl düzeltebilirim ?

 

[ÖmerFaruk]

Excel VBA da bu özellik ne yazık ki yok.


Çözüm yöntemleri
1. TextBox yüksekliğini yazı fontunuza göre kendiniz ayarlayın
2. textbox backstyle özelliğini trasnparan seçin. Kodla ya da Properties kısmından. Arka zemini kendiniz ayarlayabilirsiniz.