Gerardo vazquez medina respondió:
Inserta un modulo nuevo en basic con el siguiente código Sub PrintCurrentSlide() ' Declare lSldNum as a long integer. Dim lSldNum As Long ' Assign lSldNum to the current slide number. lSldNum = SlideShowWindows(1).View.Slide.SlideNumber ' Set the...