Private Sub CommandButton1_Click()

    Dim ctl As Control

    For Each ctl In Me.Form

        If ctl.ControlType = acBoundObjectFrame Then

            If (ctl.Name = Me.TextBox1.Value) Then

                ctl.BackColor = GetHexColor(Me.TextBox2.Value)

            End If

        End If

    Next ctl

    Set ctl = Nothing

End Sub

bu kod ile Excelde
"Me.TextBox1.Value" değerine formdan manuel olarak "Frame8" 
"Me.TextBox2.Value" değerine formdan manuel olarak "#AAECDF" 

Merhaba.

Ado ile bağlantılı comboboxlar yapmaya çalıştım lakin başaramadım.
Yardımcı olanlara teşekkürler şimdiden.
1 adet Excel dosyaysı ekliyorum orda örnek var bağlantılı comboboxlar.Buna göre olacak.

Örnek Access dosyasınıda ekliyorum.
Alttaki kod bu konu ile ilgili bu kadar ilerleyebildim.


[php]Sub Combo(ByVal Tablo As String)

    On Error Resume Next
   
    If Tablo <> "" Then
        cmboAdArama.RowSource = "select distinct Ad from '" & Tablo & "'"
        cmboSoyad

sorudan da anlaşıldığı üzere userformdan kayıt ekledik ama sadece hücrelere data yazmış oluyoruz
arka renkler çizgiler vs olmuyor son satırın özellikleri ile yeni satır oluşturulup yeni kayıt o satıra yazılsa olur mu
mesela mouse ile ortalardan bir yerden sayfaya satır eklense diğer hücrelerin özellikleri ile satır ekleniyor bunu Vba kodları ile nasıl yapabiliriz

Hazırladığım class ile seçilen textboxun arkaplan rengini değiştirme örneğini ekliyorum.
Umarım birilerinin işine yarar.

[Resim: https://s1.imagebanana.com/file/200118/1EWoaosG.gif]

Class modül kodlar;

[code]Public WithEvents opt As TextBox


Public Property Set BenimOptionButton(Txttext As TextBox)
    Set opt = Txttext
        opt.OnEnter = "[Event Procedure]"
        opt.OnExit = "[Event Procedure]"
End Property


Private Sub op

Merhaba.

Form1 de textbox var ona tıklayınca Tablo  adındaki Form süzülecek.

Textboxun altındada Tablo formu gösterilecek aynı listbox gibi mesela.

Accessi fazla bilmediğim için ekteki kadar ilerleyebildim

Saygılar.

Merhaba.

Abone olduğum konu vs... ilgili bildirim gelince neden çift geliyor?

Yani biri cevap yazınca ayarların yanındaki zil simgesinde aynı mesajdan 2 adet geliyor.

Acaba neden?

iyi günler 3. Excel dosyasından Vba kod yazarak 
kapalı halde bulunan 1. Excel dosyasından verileri alıp
kapalı halde bulunan 2. Excel dosyasına veri yazabilir miyiz
kapalı haldeki Excel dosyasından zaten veri alabiliyoruz muhtemelen yazabiliriz diye düşünüyorum

bir türlü yapamadım yardım edebilir misiniz

Hayırlı cumalar
"INSERT INTO " kullanarak
for next gibi bir döngü ile 2020 yılının tüm günlerini tabloya nasıl ekleyebilirim
yani başlangıç tarihi ile bitiş tarihi arasında döngü yapabilir miyim

Değerli Access Kullanıcıları, Eskiden Çalışan Vba ile excelden veri çekme kodu  accesi böldükten sonra hata veriyor..

Hata Kodu  Girdiğiniz Bir değer bu tablo veya listedeki tanmlı ayarları ihlal ettiğinden(örneğin bir değer en küçük değerden küçük veya en büyük değerden büyük olduğundan), değişikliklerinizi kaydedemezsiniz hatayı düzeltip yeniden deneyin uyarısı veriyor


sarı yanan kod satırı.. DoCmd.transferspreadsheet acımport, 10,, me.metin10,me.metin3, true me.metin11 

metin10 ver