kod editörüne aşağıdaki kodları yazdım ama olmuyor. Yapmak istediğim b sütundaki belli aralıklardaki veriyi L sütunun belli aralığına yazdırmak. tek şatta oluyor çok şat olması gerekir yapamadım yardımcı olabilecek arkadaş var mı.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("b:b")) Is Nothing Then Exit Sub
If Target.Column = 2 Then
Sheets("AnaSayfa").Range("L2").Offset = Target.Offset
End If
End Sub
na calişiyor ama ben

[vb]Sub aktar()
'Tbas = Now
Dim rg As Range
Dim son, sonstn, zSon, SonSatir As Long
Dim dizi As Variant
Dim puDizi As Variant
Dim iSonSutun As Integer


iSonSutun = Sayfa1.Cells(4, Columns.Count).End(xlToLeft).Column

Dim isim As String, aktif As Boolean
son = Sayfa1.Cells(Rows.Count, 4).End(xlUp).Row
'MsgBox iSonSutun
Set rg = Sayfa1.Range("4:" & iSonSutun & son)
dizi = rg
With Application
.DisplayAlerts = False
.ScreenUpdating = False
.EnableEvents =

Merhabalar...

Bir sürücü kursunun Access programına resim ekleme kısmı yapmaya çalışıyorum. Siteden bir hayli farklı uygulama buldum, denedim. Program 2003 Access ile yapılmış. 2016 Access ile açtığımda oluşan hataları düzelttim. Ancak bu sefer resim ekle kısmı çalışmadı. Basit bir şeydir ama ben yapamadım. Siz üstatların yapacağını biliyorum. Yardım ederseniz sevinirim. Ekte gönderdiğim kayıt formunda resim ekle kısmı 2003 Access le açılıyor ama 2016 Access ile açılmıyor.

merhaba  xampp phpmyadmin mysql veritabanı ile ilgili  verileri 500  den fazla listeleyemiyorum bu sınırı  nasıl aşabilirim. sınırlamayı kaldırabilir miyim.

Private Sub CommandButton1_Click()
sonsatır = WorksheetFunction.CountA(Worksheets("MÜŞTERİLER").Range("A:A")) + 1
If sonsatır = 2 Then

Worksheets("MÜŞTERİLER").Cells(sonsatır, 1) = 1
Worksheets("MÜŞTERİLER").Cells(sonsatır, 2) = TextBox2.value
Worksheets("MÜŞTERİLER").Cells(sonsatır, 3) = TextBox3.value
Worksheets("MÜŞTERİLER").Cells(sonsatır, 4) = ComboBox1.value
Else
Worksheets("MÜŞTERİLER").Cells(sonsatır, 1) = Worksheets("MÜŞTERİLER").Cells(sonsatır - 1, 1) + 1
Worksheets("MÜŞTERİ

Değerli arkadaşlar uygulamamda bir ana rapor, onun içerisinde de bağlı alt rapor var.
çıktı alacağım zaman baskı ön izlemede alt rapordaki kayıt sayısı kadar sayfa yazdırıyor.
alt rapordaki kayıt sayısı kadar sayfa tekrar ediyor. sadece ilk sayfayı yazdırıp hallediyorum fakat alt rapordaki kayıt sayısı ikinci sayfaya taştığı zaman sıkıntı. Bir türlü çözemedim yardımlarınız için şimdiden teşekkürler
ek de ANAMENÜ/MÜŞTERİ BİLGİLERİ/MÜŞTERİ KAYIT FORMUNDAN KAYIT SEÇİLİP ARAÇ KAYDI BUTONU TIKLA/S

Merhaba arkadaşlar öncelikle yardımlarınız için şimdiden teşekkürler. örnek bir tablo ekledim. yapmaya çalışıtğım şey şu.
satış tablom var ve satış formunda texbox a d sum ile ve çektirmeye çalışıyorum. Dsum ile satış tablomda urun_id si 1 olanları toplamını aldırtıyorum

=DSum("adet";"satis";"urun_id= 1") şeklinde sorun yok

fakat biraz daha detay eklemem lazım. yani hem urun_id 1 olanları hemde forma eklediğim 2 adet tarih kutusuna hangi tarih aralıklarını yazdıysam satış tarihinin o ta

Ekli örneğimde olduğu gibi; menü formundan açılır kutulardaki kriterlere göre altform çağırması yapıyorum formlar boş açılıyor.yardımlarınızı rica ediyorum.