اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السلام عليكم 

 

اريد كيفيه فتح ملف والتسجيل فيه عغند الوقف او دخول اعلامه في العمود المعين علي ان يتم تسجيل التاريخ والرحله واسم المندوب للسطر من الملف الاساي وتسجيله مباشره في الملف الذي سيتم فتحه لكي اسجل البيانات التي اريدها مباشره دو ن الحاجه الي نسخ البيانات يدويا مره اخري 

 

officna.rar

قام بنشر

حسب فهمي للمطلوب

ضع هذا الكود في حدث الصفحة

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, [N2:N10]) Is Nothing Then
A_E = Range("A" & Target.Row) & " " & Range("B" & Target.Row) & " " & _
Range("C" & Target.Row) & " " & Range("D" & Target.Row) & " " & Range("E" & Target.Row)
F_J = Range("F" & Target.Row) & " " & Range("G" & Target.Row) & " " & _
Range("H" & Target.Row) & " " & Range("I" & Target.Row) & " " & Range("J" & Target.Row)
Target = A_E & "  " & F_J
End If
End Sub
قام بنشر

السلام عليكم

الاستاذ القدير / عبدالله المجرب

 

اقل ما يقال عنك وعن اعمالك كلها

انه هو (( الابداع ذاته ))

جزاك الله خيرا استاذنا

قام بنشر

السلام عليكم  اانا اسف لعدم الرد لانشغالي وشكرا لكم الاستاذ عبد الله لمت يتم تفعيل الكود  فاسألك بالله ان تشرح لي كيفيه تشجيل الكود وتشغيله وشكرا لكم

قام بنشر

السلام عليكم انا ارى الكود ولكنه لا يعمل  ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟  غير موجود للتفعيل عند تنفيذ برنامج الماكرو لا يتم تحديد ماكروا من لالاساس ؟؟؟؟؟؟؟؟لماذا

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information