dostum bişey soracağım şimdi kendi projemi baz alarak inceledim ve bir kaç sıkıntı yaşadım.Misal 10 tane butonum var.Bu butonlar örnek bilgi olsun diye söylüyorum altan1, altan2, altan3.... altan10 a kadar buton1 e bastığımda altan1 yazısı eklendi bundan sonra illa buton 2 değil istediğim bir butona istediğim sırada basabilirim. yani hangi butona ne zaman bastığım önemli dğeil sadece neye basarsam satıra bastığım sırada ekleyecek. yani satırda altan3 altan1 altan10 görülebilecek.biraz uğraştım 1. butondan bağımsız çalışıyoruz ama şimdide ekleme alanı boş ise şunu yap değilse böyle yap diyerek tüm butonlara çalışıyorum.Yardımcı olursan sevinirim.
Private Sub kumanda_Click()
If Me.aksesuaralan.Value = "" Then
Me.aksesuaralan.SetFocus
Me.aksesuaralan.Value = "altan1"
Me.metindenal.SetFocus
Me.metindenal.Value = "altan1"
Else
Me.aksesuaralan.SetFocus
Me.aksesuaralan.Value = Me.metindenal.Value & " " & "altan1"
Me.metindenal.SetFocus
Me.metindenal.Value = Me.aksesuaralan.Value
End If
End Sub
Böyle yaptım ama ilk if hatalı olmuş direk else ye geçiyor BOŞLUK BIRAKIP altan1 yazıyor.birde metindenal ın görünür özelliğini hayır yapınca Me.metindenal.SetFocus hata veriyor.

Adı Soyadı:
ME.... AL....
Yaşı:
37
Konum:
Balıkesir
Ofis Versiyonu:
Ofis 2010 32 Bit
Son Oturumu:
16/09/2023,20:26
Yorumları:
97
Konuları:
30
Kayıt Tarihi:
10/02/2014
Teşekkür Puanı:
0
Mesleğiniz:
BİLİŞİM TEKNOLOJİLER
Cevapla