أبو أحمد قام بنشر ديسمبر 28, 2019 قام بنشر ديسمبر 28, 2019 السلام عليكم ورحمة الله الاساتذة الكرام /السلام عليكم ورحمة الله عندي نموذج مبني على جدول المطلوب وضع حقلين معا في حقل واحد في النموذج ولكن كل منهم على سطرمستقل ارجو المساعدة سريعا لحاجة العمل وجزاكم الله خيرا
jjafferr قام بنشر ديسمبر 28, 2019 قام بنشر ديسمبر 28, 2019 وعليكم السلام 🙂 استخدم فاصل الاسطر : vBCrLf مثلا : السطر الاول & vBCrLf & السطر الثاني Constant Value Description ---------------------------------------------------------------- vbCr Chr(13) Carriage return vbCrLf Chr(13) & Chr(10) Carriage return–linefeed combination vbLf Chr(10) Line feed vbCr : - return to line beginning Represents a carriage-return character for print and display functions. vbCrLf : - similar to pressing Enter Represents a carriage-return character combined with a linefeed character for print and display functions. vbLf : - go to next line Represents a linefeed character for print and display functions. جعفر 1
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 جزاكم الله خير ولكن كيف اضع الحقلين معا في حقل واحد داخل النموذج بدلا من حقلين 24 minutes ago, jjafferr said: وعليكم السلام 🙂 استخدم فاصل الاسطر : vBCrLf مثلا : السطر الاول & vBCrLf & السطر الثاني Constant Value Description ---------------------------------------------------------------- vbCr Chr(13) Carriage return vbCrLf Chr(13) & Chr(10) Carriage return–linefeed combination vbLf Chr(10) Line feed vbCr : - return to line beginning Represents a carriage-return character for print and display functions. vbCrLf : - similar to pressing Enter Represents a carriage-return character combined with a linefeed character for print and display functions. vbLf : - go to next line Represents a linefeed character for print and display functions. جعفر جزاكم الله خير ولكن كيف اضع الحقلين معا في حقل واحد داخل النموذج بدلا من حقلين
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 السلام عليكم ورحمة الله الاساتذة الكرام /السلام عليكم ورحمة الله عندي نموذج مبني على جدول المطلوب وضع حقلين معا في حقل واحد في النموذج ولكن كل منهم على سطرمستقل ارجو المساعدة سريعا لحاجة العمل وجزاكم الله خيرا = [data1] + [data2] كيف اضع كل منهم في سطر
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 = [data1] + [data2] كيف اضع كل منهم في سطر 3 minutes ago, أبو أحمد said: = [data1] + [data2] كيف اضع كل منهم في سطر جزاكم الله خيرا
أبوبسمله قام بنشر ديسمبر 28, 2019 قام بنشر ديسمبر 28, 2019 بعد اذن اخى ومعلمى جعفر فى حدث عند الخروج مثلا لمربع النص الثانى سيتم كتابه الحدث فى محرر الاكواد vba وليس كمصدر لمربع النص المراد التجميع به text = Me.date1 & vbCrLf & Me.date2 text = اسم الحقل المراد جمع الحقلين به تقبل تحياتى
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 (معدل) 24 minutes ago, أحمد الفلاحجى said: بعد اذن اخى ومعلمى جعفر فى حدث عند الخروج مثلا لمربع النص الثانى سيتم كتابه الحدث فى محرر الاكواد vba وليس كمصدر لمربع النص المراد التجميع به text = Me.date1 & vbCrLf & Me.date2 text = اسم الحقل المراد جمع الحقلين به تقبل تحياتى ما زال في مشكلة ما ادري ايه السبب برجاء المساعدة تظهر هكذا Expr1: [text]=[Me].[date1] & [vbCrLf] & [Me].[date2] تم تعديل ديسمبر 28, 2019 بواسطه أبو أحمد يعطي لي رسالة الاستفسار عن & vBCrLf &
أبوبسمله قام بنشر ديسمبر 28, 2019 قام بنشر ديسمبر 28, 2019 جزاكم الله خيرا اخى خالد واخى جعفر اقترح ضم الموضوعين لانهم نفس السؤال وجزاكم الله خيرا اساتذتى الافاضل
Khalid Jnb قام بنشر ديسمبر 28, 2019 قام بنشر ديسمبر 28, 2019 (معدل) السلام عليكم احدى الطرق تعمل زرين واخد للنسخ والاخر للصق تحياتي Option Compare Database Option Explicit Private Sub Command5_Click() Me.kh.SetFocus 'يجب وضع التركيز على اسم الحقل المطلوب نسخه DoCmd.RunCommand acCmdCopy 'هنا تتم عملية نسخ القيمة الموجوده في الحقل End Sub Private Sub Command10_Click() Me.kh.SetFocus 'يجب وضع التركيز على اسم الحقل المطلوب لصقه DoCmd.RunCommand acCmdPaste 'هنا تتم عملية لصق القيمة المنسوخة سابقا End Sub تم تعديل ديسمبر 28, 2019 بواسطه خالد سيسكو 1
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 31 minutes ago, أحمد الفلاحجى said: بعد اذن اخى ومعلمى جعفر فى حدث عند الخروج مثلا لمربع النص الثانى سيتم كتابه الحدث فى محرر الاكواد vba وليس كمصدر لمربع النص المراد التجميع به text = Me.date1 & vbCrLf & Me.date2 text = اسم الحقل المراد جمع الحقلين به تقبل تحياتى تمام جزاكم الله خيرا نتيجة الاستعجال كان الخطأ 1
أبوبسمله قام بنشر ديسمبر 28, 2019 قام بنشر ديسمبر 28, 2019 (معدل) الحمدلله اللذى بنعمته تتم الصالحات جزاهم الله خيرا اساتذتنا الافاضل @jjafferr و @kha9009lid بالتوفيق اخى تم تعديل ديسمبر 28, 2019 بواسطه أحمد الفلاحجى 1
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 1 minute ago, أحمد الفلاحجى said: اخى الفاضل ممكن مثال لما لديك تقبل تحياتى استاذي الكريم جزاكم الله خيرا تمام ولكن كان الخطأ نتيجة استعجالي ولكن لي سؤال هنا هل ممكن نجعل ثلاث أو في في اربع سطور لكل حقل سطر واسف على زيادة الطلب
أبوبسمله قام بنشر ديسمبر 28, 2019 قام بنشر ديسمبر 28, 2019 هل تقصد لديك اربع حقول مثلا اذا كان ما تقصده text = Me.date1 & vbCrLf & Me.date2 & vbCrLf & Me.date3 & vbCrLf & Me.date4 على ما فهمت من المقصود تقبل تحياتى
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 (معدل) 6 minutes ago, أحمد الفلاحجى said: هل تقصد لديك اربع حقول مثلا اذا كان ما تقصده text = Me.date1 & vbCrLf & Me.date2 & vbCrLf & Me.date3 & vbCrLf & Me.date4 على ما فهمت من المقصود تقبل تحياتى نعم استاذي الكريم هذا ما قصدته فهل يمكن جعل اكثر من حقل معا اربع سطور لاربع حقول ، .. بالاضافة الى عدم تغيير السجل يبقى حقل الجمع كما هو لا يتغير بياناته ... فما العمل ؟ تم تعديل ديسمبر 28, 2019 بواسطه أبو أحمد
أبوبسمله قام بنشر ديسمبر 28, 2019 قام بنشر ديسمبر 28, 2019 لانك قمت بزياده الحقول ولم تجعل الحدث فى الخروج من الحقل الاخير ممكن تضع كود اخى خالد فى مصدر عنصر التحكم لحقل التجميع او تغيير الحدث كما تحب او تضع زر امر وعند النقر يتم التجميع =[data1] & Chr(13) & Chr(10) & [data2] & Chr(13) & Chr(10) & [data3] بالتوفيق اخى
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 7 minutes ago, أحمد الفلاحجى said: لانك قمت بزياده الحقول ولم تجعل الحدث فى الخروج من الحقل الاخير ممكن تضع كود اخى خالد فى مصدر عنصر التحكم لحقل التجميع او تغيير الحدث كما تحب او تضع زر امر وعند النقر يتم التجميع =[data1] & Chr(13) & Chr(10) & [data2] & Chr(13) & Chr(10) & [data3] بالتوفيق اخى استاذي الكريم / جزاكم الله خيرا هذا هو المطلوب ولكن لي سؤال اخير كيف يمكن انسخ محتوى حقل لحقل اخر في نفس النموذج علما بأنني أريد التغيير في الحقول المنسوخ اليه وليس المنسوخ منه بمعنى اريد النسخ من الحقل A الى الحقل B وعمل التغيير بعد ذلك في الحقل الثاني B وجزاكم الله خيرا
أبو أحمد قام بنشر ديسمبر 28, 2019 الكاتب قام بنشر ديسمبر 28, 2019 (معدل) 1 hour ago, خالد سيسكو said: السلام عليكم احدى الطرق تعمل زرين واخد للنسخ والاخر للصق تحياتي Option Compare Database Option Explicit Private Sub Command5_Click() Me.kh.SetFocus 'يجب وضع التركيز على اسم الحقل المطلوب نسخه DoCmd.RunCommand acCmdCopy 'هنا تتم عملية نسخ القيمة الموجوده في الحقل End Sub Private Sub Command10_Click() Me.kh.SetFocus 'يجب وضع التركيز على اسم الحقل المطلوب لصقه DoCmd.RunCommand acCmdPaste 'هنا تتم عملية لصق القيمة المنسوخة سابقا End Sub هل في طريقة اخرى افضل من ذلك ؟ وجزاكم اله خيرا بحيث لا نحتاج لاظهار الحقل الذي ننسخ منه علما بأنني سأقوم بتعديل في الحقل المنسوخ اليه وليس المنسوخ منه لأسف يعطي لي debug فما الحل جزاكم الله خيرا تم تعديل ديسمبر 28, 2019 بواسطه أبو أحمد
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.