منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم قواعد البيانات > قسم أمثلة ومشاريع قواعد البيانات تحت بيئة الـ.NET > [جديد ] التحرير في ملف اكسل
نسخة كاملة : [جديد ] التحرير في ملف اكسل
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

سعود

12-03-23, 12:54 PM

السلام عليكم ورحمة الله و بركاته
أقصد بالجديد علي شخصياSmile
بصراحة ماكنت اتوقع سهولة التعامل مع الاكسل وانه لا يحتاج الا خطوتين فقط لتتعامل معه وكانك تتعامل مع الاكسس وبنفس ال_ provider  مع اضافة لنص الاتصال في آخر جملة الاتصال
كلمة المرور sarab
صباح الخير
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
نسيت ان انبه الى انه لا بد من اضافة التالية كمرجع:
Microsoft.Office.Interop.Excel
ووصفها ضمن تبويب الـCom الخاص بالـReference التالي:
Microsoft Excel 12.0 Object Library

Taha Okla

12-03-23, 01:49 PM
الفرق عن اكسس
1 - هو أنك لا تستطيع أن تقوم بعمليات الحذف، كما في الاكسس.
2 - شيء آخر أنك لو حددت خلية خارج النطاق المحدد للجدول سيقوم الاكسل بجلبها وجلب كل الخلاياا الفارغة معها.

سعود

12-03-23, 04:28 PM
(12-03-23, 01:49 PM)Taha Okla كتب : [ -> ]الفرق عن اكسس
1 - هو أنك لا تستطيع أن تقوم بعمليات الحذف، كما في الاكسس.
2 - شيء آخر أنك لو حددت خلية خارج النطاق المحدد للجدول سيقوم الاكسل بجلبها وجلب كل الخلاياا الفارغة معها.

فعلا مثل ماقلت لكن الحذف لا اهتم به عند كل تجربة جديدةSmile
إقتباس :‏‏حذف البيانات في جدول مرتبط غير معتمد بواسطة ISAM هذا.

سعود

13-03-23, 04:53 PM
آخر تحديث 
passw:vb4arb
حذف الكل كود يحتاج تعديل بخصوص  رقم آخر صف

سعود

13-03-23, 10:22 PM
اضفت زرين كتحرير في الاعمدة الخاصة بملف اكسل الاول ينظف الورقة والاخر يضيف الاعمدة ... الشيء اللذي لم افهمه وهو كيف اجعل التحرير فوري لانه لابد من الخروج من النظام ثم العودة اليه.
PHP كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        xl()
        xlWorkSheet.Cells.Clear()
        xlWorkBook.Save()
        If Not IsNothing(xlWorkBook) Then
            xlWorkBook.Close()
        End If
        xlApp.Quit()
    End Sub

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        xl()
        Try
            xlWorkSheet.Range("A1").Value = "tid"
            xlWorkSheet.Range("B1").Value = "tname"
            xlWorkSheet.Range("C1").Value = "age"
            xlWorkSheet.Range("D1").Value = "phone"

            xlWorkBook.Save()
            If Not IsNothing(xlWorkBook) Then
                xlWorkBook.Close()
            End If
            xlApp.Quit()
            MsgBox("Done", MsgBoxStyle.Information, "")
        Catch ex As Exception
            MsgBox(Err.Description, MsgBoxStyle.Critical, "error")
        End Try
    End Sub 
منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم قواعد البيانات > قسم أمثلة ومشاريع قواعد البيانات تحت بيئة الـ.NET > [جديد ] التحرير في ملف اكسل