Merhaba,
Form1.Altfom2'de "Seç" alanında işaretleme yapınca Form1.Altform1'de otomatik butonlar oluşturmak,
butonların ölçü+renk+yazı ve konum bilgilerini Form1.Altform2'deki değerlere göre oluşturmak istiyorum.
Değerli yardımlarınızı rica ederim.
Saygılar,
Bu örnek kodları çalışmama uyarlamaya çalıştım ama pek ilerleyemedim.
Size bir başlangıç olabilir mi?
Sub NewControls()
Dim frm As Form
Dim ctlButton As Control
Set frm = CreateForm
Set ctlButton = CreateControl(frm.Name, acCommandButton, , , , Left:=2834.645669291 / 5 * 1, Top:=2834.645669291 / 5 * 2, _
Width:=2834.645669291 / 5 * 3, Height:=2834.645669291 / 5 * 1)
End Sub
Yanılmıyorsam
Access formlarının böyle bir özelliği yok, yani form çalışırken nesne ekleyemiyorsunuz
Exceldeki userformlarda oluyor, ama
Access userformu hiç denemedim onu bilmiyorum
Çalışmanızı inceleyemediğim için kesin bir öneride bulunamam ama eklenmesini istediğiniz butonları önceden ekleyip görünmez yapabilirsiniz
Form1'de Alt1.Recordsource="" iken
kod çalışsa ve Altform1'de butonları oluştursa
daha sonra Alt1.Recordsource="Altform1"
şeklinde bir işlem yapabilir miyiz mesela?
Ama bu durumda da her defasında formdan tekrar butonları silmek gerekecek
Neden bu yöntemi kullanmak istiyorsunuz?
En fazla kaç butona ihtiyacınız var? Butonlar bir defa oluşturulup gizlenir, ihtiyacınız olduğunda görünür yapıp özelliklerini değiştirebilirsiniz
Evet; butonları silmem gerekecek.
Çünkü listede seçim yaptığım satıra ait buton gelecek; seçimi kaldırdığım buton silinecek.
Listede bazen yüze yakın veya geçen satır oluşacak.