ben de onunla uğraşıyordum)
tüm alanları seçip fonksiyon çağırmaya çalışıyorum ama daha tanımlayamadım
module 
Public Function tumEtiket()
DoCmd.OpenForm "F_04_AdisyonFisi"
Forms![F_04_AdisyonFisi]![txtMasaNo] = ActiveControl.Controls(1).Caption ' Me!EditControl.Controls(0).Caption
End Function

diye bir fonksiyon tanımladım ama fonksiyon sorunlu hata veriyor onu düzeltmeye çalışıyorum