مطلوب فورم اضافة وتعديل

[الفارس محمد رجب]

تم تعديل المطلوب -- قمت باضافة الفورم وهو عبارة عن فورم به كمبو بوكس وبه تكست بوكس واريد الكود الذى يجعل اسماء عناوين الاعمدة تظهر بالكمبو بوكس وعند اختيار عمود معين يقوم المستخدم بكتابة الحساب الجديد  وعند ضغط على الزر اضافة يتم اضافة الحساب الجديد الى الحسابات الموجودة فى هذا العمود

الحسابات.xlsb

[الفارس محمد رجب]

حاولت فى كتابة الاكواد ولكن بدون نفع فما هو الخطا

Private Sub CommandButton1_Click()
Dim ddd As Range
Set ddd = Rows(1).Find(ComboBox1, MatchCase:=True).Select
ddd.Offset(Rows.Count, 0).End (xlDown)
End Sub

 

[الفارس محمد رجب]

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

وهل من الممكن ان يتم الاضافة والتعديل على الرغم من ان صفحة الاكسيل المراد الاضافة فيها تم اخفائها

الحسابات .xlsb