أستغفر الله العظيم ... سبحان الله وبحمده



العودة   منتديات داماس > انظمة التشغيل والاوفيس > اسئلة ونقاشات واستفسارات ودروس وشروحات الاوفيس


مواضيع مميزة  


آخر عشرة مواضيع المواضيع النشطة


10-11-2016, 11:22 PM
eight غير متصل
عضو جديد
رقم العضوية: 649930
تاريخ التسجيل: Aug 2015
المشاركات: 7
إعجاب: 1
تلقى إعجاب 1 على مشاركة واحدة
تلقى دعوات الى: 0 موضوع
    #1  

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


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



الاستفسار الثانى بخصوص الرسالة دى الشريط الاصفر اللى تحت قوائم التبويبات اول مره اسطب اوفيس عندى ويظهرلى الرسالة دى


كيفية صفحات الورد بعضها





المواضيع المشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
مشكلة في عرض صفحات الورد تعرض بعكس الترتيب shelan11 مشاكل وحلول الويندوز, اسئلة واستفسارات وشروحات الويندوز 0 27-03-2014 07:21 AM
كيفية الإستفادة من ماء الورد شروق الامل الطب البشري - العلاج بالأدوية و الأعشاب الطبية 3 27-04-2013 11:04 PM
كيفية زيادة عدد زوار موقعك و تسويق منتجاتك عبر صفحات الفيس samnile تطوير المواقع 0 19-03-2013 09:49 PM
كيفية نشر موضوع على صفحات البوابة ابو نور الهدى صيانة الكمبيوتر وحلول الحاسب الألي - هاردوير 2 23-02-2010 02:49 AM
كيفية عمل Check Box في الورد 2003 ... dell صيانة الكمبيوتر وحلول الحاسب الألي - هاردوير 7 27-05-2006 09:06 PM

03-12-2016, 11:08 PM
ahmednasermostafa غير متصل
عضو محترف
رقم العضوية: 769170
تاريخ التسجيل: Apr 2016
المشاركات: 511
إعجاب: 85
تلقى 121 إعجاب على 58 مشاركة
تلقى دعوات الى: 1 موضوع
    #2  
اخى الكريم
اذا كان عندك ملف يحتوى على 3 صفحات من الوورد يمكنك تقسيمه الى 3 ملفات كل صفحه على ملف منفصل :
فتح الملف الموجود به 3 صفحات ثم الضغط على file ومنها اختار Save as ( أو اضغط على ذر F12 من الكيبورد ) ثم اكتب اسم للملف (اسم مختلف عن الاسم الاصلى للملف الموجود) ثم اضغط حفظ .. كرر هذه العمليه مرتين ليصبح لديك 3 ملفات موجوده فيهم نفس 3 صفحات ثم بعد ذلك افتح الملف الاول وامسح الكتابه اللى فى الصفحتين الاخيرتين ثم اضغط حفظ ثم اغلاق الملف .. ثم افتح الملف الثانى واحذف منه الكتابه اللى فى الصفحه الاولى وايضا اللى فى الصفحه الاخيره واضغط حفظ ثم اغلاق الملف .. ثم فتح الملف الثالث وامسح الكتابه اللى فى الصفحه الاولى والثانيه ثم اضغط حفظ ثم غلق الملف بذلك يكون لديك 3 ملفات كل ملف يحتوى على صفحة واحده .

بالنسبه للرساله
missing proofing tools this document text in arabic which isnt being proofed you may be able to get proofing tools for this language
هذا يعنى ان الاوفس لديك محتاج تثبيت حزمة اللغه العربيه كامله (ادوات اللغه العربيه) لكن هذه الرساله ليس مشكله يمكنك الضغط على Download لتحميل حزمة اللغه العربيه للأوفس .
اتمنى لك التوفيق


04-12-2016, 02:09 AM
nietzsche غير متصل
عضو محترف
رقم العضوية: 396132
تاريخ التسجيل: Jan 2012
الإقامة: Darnah, Libya
المشاركات: 468
إعجاب: 295
تلقى 387 إعجاب على 189 مشاركة
تلقى دعوات الى: 1 موضوع
    #3  
الله يعطيك العافية، بس لو 50 صفحة، بهذه الطريقة لن يصبح كمبيوتر !
استخدم المكرو اسرع وافضل لانجاز العمليات المتكرره
انسخ السكربت التالي والصقه في صفحة المكرو بالاوفيس وورد
ثم run وتحصل على ملفات في كل ملف صفحة ومرقمة بالتسلسل
Sub SplitIntoPages() 
Dim docMultiple As Document 
Dim docSingle As Document 
Dim rngPage As Range 
Dim iCurrentPage As Integer 
Dim iPageCount As Integer 
Dim strNewFileName As String 
Application.ScreenUpdating = False 'Makes the code run faster and reduces screen _
 flicker a bit. 
Set docMultiple = ActiveDocument 'Work on the active document _
(the one currently containing the Selection) 
Set rngPage = docMultiple.Range 'instantiate the range object
iCurrentPage = 1 
'get the document's page count
iPageCount = docMultiple.Content.ComputeStatistics(wdStatisticPages) 
Do Until iCurrentPage > iPageCount 
If iCurrentPage = iPageCount Then 
rngPage.End = ActiveDocument.Range.End 'last page (there won't be a next page) 
Else
'Find the beginning of the next page
'Must use the Selection object. The Range.Goto method will not work on a page
Selection.GoTo wdGoToPage, wdGoToAbsolute, iCurrentPage + 1 
'Set the end of the range to the point between the pages
rngPage.End = Selection.Start 
End If 
rngPage.Copy 'copy the page into the Windows clipboard
Set docSingle = Documents.Add 'create a new document
docSingle.Range.Paste 'paste the clipboard contents to the new document
'remove any manual page break to prevent a second blank
docSingle.Range.Find.Execute Findtext:="^m", ReplaceWith:="" 
'build a new sequentially-numbered file name based on the original multi-paged file name and path
strNewFileName = Replace(docMultiple.FullName, ".doc", "_" & Right$("000" & iCurrentPage, 4) & ".doc") 
docSingle.SaveAs strNewFileName 'save the new single-paged document
 iCurrentPage = iCurrentPage + 1 'move to the next page
docSingle.Close 'close the new document
rngPage.Collapse wdCollapseEnd 'go to the next page
Loop 'go to the top of the do loop
Application.ScreenUpdating = True 'restore the screen updating 
'Destroy the objects.
Set docMultiple = Nothing 
Set docSingle = Nothing 
Set rngPage = Nothing 
End Sub 
تقبل تحياتي



 


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

English

Powered by vBulletin® Version
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
The owner and operator of the site is not responsible for the availability of, or any content provided.
Topics that are written in the site reflect the opinion of the author.
جميع ما يُطرح من مواضيع ومشاركات تعبر عن رأي كاتبها ولا تعبر عن رأي مالك الموقع أو الإدارة بأي حال من الأحوال.