كيف أغير اسم الشريحة بالباوربونت

اذا ممكن توضح السبب قد نجد حل بديل

فمثلا اختيار ال TITLE لكل شريحة قد يجعلك تستعيض عن تغيير الاسم باستخدام ال TITLE

أهلا بالغالي وأستاذنا محمد طاهر

أسعدني مرورك فلك أعطر وأحلى وأرق تحية

أنا يا غالي لدي مشروع يتضمن عدد كبير من الشرائح

وسأضع واحدة من الشراح بمثابة فهرس للبقية

وكل شريحة يتم فتحها عن طريق الشريحة الأولى ( الفهرس )

والمشكل إذا أرت عمل ارتباط تشعبي أجد أسماء الشرائح شريحة1 شريحة2 فلو استطعت تغيير هذه الأسماء لكان عمل الترابط أسهل ..

آخر ما توصلت له أن أن أكتب بورقة وقلم

شريحة1 = أركان الإسلام

شريحة2 = أركان الأيمان

وهكذا ...

فلو كان لديكم حل أسعفونا مشكورين :o

أخي العزيز محمد عملت بطريقتك فجدتها سهولة ورائعة شكرا لك :)

و بالاضافة الي ذلك

هذا كود يقوم بعمل قائمة بالشرائح الموجودة و أول عنوان بها و ارساله الي ملف نص علي الC , اسمه tmp.txt

Sub ListtoC()

 'Open "c:temp.txt" For Output As #1

 'Lineinput ,#1 "koko"

 '  Close #1

  Dim fs, S, A

    Set fs = CreateObject("Scripting.FileSystemObject")

    Set A = fs.CreateTextFile("c:" & "temp.txt", True)

    

    With Application.ActivePresentation

 For i = 1 To .Slides.Count

 Dim tmpLine As String

 tmpLine = Str(i) & " " & .Slides(i).Name & " : " & .Slides(i).Shapes(1).AlternativeText

  A.writeline (tmpLine)



 Next i

End With

    A.Close

    

    Dim x

    x = Shell("notepad.exe c:temp.txt", 1)





End Sub

و لتشغيل الكود

اضغط

ALT+F8

ثم

Run

listslides.rar

ألف شكر أستاذي الكبير محمد لقد وفيت وكفيت

أثابك الله ووفقك وزادك علما ونفع بك

لقد جربت الكود وكان رائعا وستخدمته في ملفات أخرى وعمل بنجاح

وهذا سيجعلني اتوجه إلى التعرف أكثر حول برمجة وأسرار برامج الأوفيس رغم أنني أعشق الفيجوال كثيرا.. فإذا كان هناك مواقع عربية تفيدني في هذا المجال .. أكون ممتنا لك ..

سؤال وأرجوا أن لا أكون أثقلت عليك أستاذي محمد

لدي بالفيجوال قائمة أسماء داخل ( List ) وأريد تصديرها للوورد داخل جدول ..

فماهو المكان المناسب لطرح هذا السؤال

وبالطبع سأرسل لك الرابط لأنني أعرف أن لديك معرفة واسعة بفيجوال بيزيك وستخدمني بإذن الله في هذا الموضوع

قسم الفيجوال ان كنت تريد ذلك بالكود

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

أما ما يخص البيزيك هنا ـ فهو فيجوال بيزيك التطبيقات ، VBA و لا أعتقد ان له حظا كبيرا فى المواقع العربية علي الانترنت

مع تحياتي

شكرا أخي وأستاذي محمد

لقد وضعت الاستفسار في قسم الفيجوال

http://arabteam2000.com/vb/showthread.php?...&threadid=27456

والحقيقة أنني عاجز :o عن شكرك وبيان إعجابي بكرمك وطيب أخلاقك

ولا أملك إلا الدعاء لك بالتوفيق والسداد (f)