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

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

قام بنشر

السلام عليكم

مرفق ملف به بيانات اريد ان افرزها بحيث تجمع title +first name+last name في السطر الاول

address في السطر الثاني

city + pr.+code في السطر الثالث وطبعها على مظروف

جزاكم الله الف خير محتاجة ضروري

مرفق الملف

Diaa.rar

قام بنشر (معدل)

السلام عليكم

لم ارى حل الاخ قطان لكن هنا حل سريع

Sub SortAddress()
  For i = 2 To 7
   TT = Cells(100, 4).End(xlUp).Row + 3
   Cells(TT, 4) = Cells(i, 1) & Cells(i, 2) & Cells(i, 3)
   TT = TT + 1
   Cells(TT, 4) = Cells(i, 4)
   TT = TT + 1
   Cells(TT, 4) = Cells(i, 5) & Cells(i, 6) & Cells(i, 7)
  Next i
End Sub

Diaa2.rar

تم تعديل بواسطه ابو اسامة العينبوسي
قام بنشر

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

تحياتي للأخ الكريم والأستاذ القدير أبو أسامة، وبعد إذنه أضع هذا الرد

أخي الكريم :

تم وضع ملفين ملف إكسيل وملف وورد

ملف الإكسيل يتم العرض بطريقتين :

في الورقة الثانية يتم عرض البيانات حسب الرقم التسلسلي في القائمة باختياره من الخلية المخصصة لذلك

في الورقة الثالثة يتم تسجيل اللقب والإسم في خانتي اللقب والإسم وباقي المعلومات يتم عرضها تلقائيا

أما في حالة أردت طبع كل العناوين مرة واحدة فتم وضع ملف الوورد

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

أرجو أن أكون وفقت في توضيح مما تحتاجه

diaa.rar

قام بنشر

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information