حفظ اكثر من Row

الكود التالى

                        Dim country_name As String = .Cells(1).Value
                        Dim contry_id As String = .Cells(2).Value
                        Dim city As String = .Cells(3).Value

قم بإضافة ToStrnig إلى اخر كل سطر ليصبح كالتالى و سيعمل معك

                        Dim country_name As String = .Cells(1).Value.ToString
                        Dim contry_id As String = .Cells(2).Value.ToString
                        Dim city As String = .Cells(3).Value.ToString

و الله ولى التوفيق

اخي العزيز السلام عليكم

مشكلتي الثانية حلت والحمد لله

لكن المشكلة الاولى وهي الحفظ في جدول اخر بشرط الجيك بوكس الموجود في الدات كرد