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

تسجيل وترحيل وقتي


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

اخواني الكرام

اعجبنى احد ملفات الاستاذ القدير خبور خير

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

فوجب طلب العون قبل ان يطلع نافوخي من راسي

المطلوب بالمرفق رفق الله بنا وبكم

M10.rar

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله

أخي الكريم، أعتقد أن بالملف خلل، بعد تحميله أظهر الخلل مباشرة وعند محاولة فتحه تظهر أيضا نافذة الخلل ولا يفتح... لست أدري إن حدث الشيء نفسه مع الأعضاء الآخرين... رجاء إن كان به خلل أعد ضغطه وإرساله مرة أخرى...

أخوك بن علية

رابط هذا التعليق
شارك

السلام عليكم هذا الاحسان بعينه وزيادة أحسنت أخي أستاذ خبور خير أحسن الله إليك وزادك إحسانا (( ربي أوزعني أن أشكر نعمتك التي أنعمت عليّ وعلى والديّ وأن أعمل صالحاً ترضاه ))

رابط هذا التعليق
شارك

السلام عليكم

الله يزيدك احسانا ورونقا

بارك الله فيك

هناك خطا في الكود المماثل للكود التالي بعد التصحيح:

Private Sub CommandButton3_Click()

Dim M As Integer

With Sheets("farest (2)")

    M = .Range("b" & .Rows.Count).End(xlUp).Row + 1

    .Range("b" & M).Resize(1, 5) = Array(ComboBox18, TextBox2.Value, TextBox3.Value, TextBox1.Value, TextBox4.Value)

End With

MsgBox "تم الترحيل بنجاح"

TextBox1 = ""

End Sub
الخطأ كان هنا:
M = .Range("b" & .Rows.Count).End(xlUp).Row + 2
بدلا من 2 غيره 1
M = .Range("b" & .Rows.Count).End(xlUp).Row + 1

رابط هذا التعليق
شارك

السلام عليكم فتح الله عليك أستاذ خبور قمت بتعديل الكود منذ الوهلة الأولى فمن يتتلمذ علي أيايدكم لا يسعه إلا أن يكون تلميذا نجيبا ألف شكري أخي العزيز مرة أخرى لقد رفعت عن كاهلي عبئا ثقيلا دمت بألف خير وعافية

رابط هذا التعليق
شارك

السلام عليكم

اخي خالد ساعطيك طريقة لسرعة تعلم الاكواد

اذا رايت كودا وتريد تعلمه

اعبث بالكود بتغيير الارقام وانظر ماذا يحدث

احذف سطر معين وشاهد ايه اللي حصل

طبعا في ملف اخر للتجربة

من خلال النتائج الحاصلة ستتكون عندك معرفة سريعة

طبعا انا اتكلم عن الاكواد البسيطة للترحيلات وغيره والتي ليس لها علاقة بملفات النظام

احيانا قد لاتوصل الى نتيجة مباشرة ولكن مع الاستمرار والصبر والكوب الشاي ستكون هناك نتائج رهيبة

ولا تنسانا من الدعاء

ودمتم في حفظ الله

رابط هذا التعليق
شارك

السلام عليكم فكرة عبقرية لتعلم الأكواد خاصة وأن المنتدى ذاخر بشتى أنواع الأكواد ولم تصادقني مشكلة إلا ووجدت في مكتبة خلاصات الموقع ما يشابهها متعك الله بكل خير وأنعم الله على اليمن وسائر أهله بالأمن والاستقرار والازدهار

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



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

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

Important Information