استاذي الفاضل
اسعد الله صباحك
اليك يا أخي العزيز عاشق غزالي أسطر بحبر دموعي
كلمة شكر واحترام
كلمة حب وامنتان
لك أخي
أردد
يا صاحب القلب الرائع
لك يا اخ لم تلده أمي
ولقد قمت بتعديل الكود من Me.ComboBox1.List(Me.ComboBox1.ListCount - 1, 1) = objAddressEntry.Address
الى Me.ComboBox1.List(Me.ComboBox1.ListCount - 1, 1) = objAddressEntry.Name
وتم حل المشكله
وقمت بالتعديل على الكود من Me.TextBoxto & "," & Me.ComboBox1.List
الى Me.TextBoxto & ";" & Me.ComboBox1.List في جميع الـLabel. لاني قد لاحظت عند اضافة اكثر من عنوان يفصل بين العناوين العلامه "," وفي هذه الحاله لايستطيع من قراءة العناوين وايجادها حيث ان العلامات المستخدمه بالاوت لوك بين العناوين هي ";" للتوضيح .
وسوف اطرح البرنامج عند الانتهاء منه قريباً
ولك جزيل الشكر والتقدير