منتدى جزيرة الرياضيات - تعلم استعمال مساعد الافس ليؤدي بعض الحركات الشيقة بالباور بوينت

السلام عليكم

اثناء بحثي عن التحريك وجدت هذا الكود الشيق بمساعد الافس و هو خاص باضهار مساعد الافس مثل الدبوس وتستطيعوا تغيير شكلة.

قم بإدراج زر CommandButton1
و اكتب بداخله هذا الكود (انسخه والصقه هناك)

كود:

With Assistant

    .On = True

    .Visible = True

    .Move xLeft:=400, yTop:=300

    .MoveWhenInTheWay = True

    .TipOfDay = True

    .Animation = msoAnimationGetTechy



End With

و لتغيير شكله استبدل اجملة الاخيرة msoAnimationGetTechy
بأحدى الجمل التالية:

msoAnimationCheckingSomething
msoAnimationGetTechy

msoAnimationListensToComputer

msoAnimationSearching

msoAnimationThinking
msoAnimationWorkingAtSomething

msoAnimationWritingNotingSomething

جرب بنفسك و هذا ملف تطبيقي
الاستاذ خليل