none
Random kodu RRS feed

  • Genel Tartışma

  • Bir powerpoint sunusu her açıldığında benin belirlediğim slaytlar arasında - örneğin ilk ve son slayt sabit kalacak şekilde arada yer alan 80 sayfayı rastgele getirecek makro var mıdır ? acaba. Bir kaç tane buldum ancak onlard ilk sayfayı-sunu başlığını- ve sonuç sayfasını işin içine aldığı gibi rastgele sıraladıktan sonra her sunu açılışında aynı rastgeleliği kullanıyor..Kullandığım makro :

    ActivePresentation.SlideShowWindow.View.GotoSlide Int(Rnd * ActivePresentation.Slides.Count) + 2

    ve

    Sub randjump()
    randomize
    Dim Inum As Integer
    Inum = Int(7 * Rnd + 4)
    ActivePresentation.SlideShowWindow.View.GotoSlide (Inum)
    End Sub

    ancak ikiside işime yaramadı :((

    21 Mayıs 2016 Cumartesi 08:33