te pide 2 votaciones, uno a favor y otro en contra...
y tiene que mostrar en una caja de texto los porcentajes de ambos...
Si le doy al play la macro sale bien y escribe en la caja de texto.
Si le doy a la presentacion y inicio la macro con un boton ke hay en la presentacion, ejecuta la macro, introduzco los valores, pero no escribe el resultado en la caja de texto.
¿porke?
Aqui parte del codigo (mostraria solo el contenido de la variable "votacioneencontra")
Cita:
¿porke cuanod la ejecuto desde el menu visual basic y le doy al play funciona?Sub votacion()
Dim afavor As Integer
Dim encontra As Integer
Dim resultado As Integer
afavor = InputBox("Votaciones a favor", "El Atletico SI ira a la Champions")
encontra = InputBox("Votaciones en contra", "El Atletico NO ira a la Champions")
suma = afavor + encontra
porcentajeafavor = (afavor * 100) / suma
porcentajeencontra = (encontra * 100) / suma
ActiveWindow.Selection.SlideRange.Shapes("22 CuadroTexto").Select
ActiveWindow.Selection.TextRange.Text = porcentajeencontra
End Sub
Dim afavor As Integer
Dim encontra As Integer
Dim resultado As Integer
afavor = InputBox("Votaciones a favor", "El Atletico SI ira a la Champions")
encontra = InputBox("Votaciones en contra", "El Atletico NO ira a la Champions")
suma = afavor + encontra
porcentajeafavor = (afavor * 100) / suma
porcentajeencontra = (encontra * 100) / suma
ActiveWindow.Selection.SlideRange.Shapes("22 CuadroTexto").Select
ActiveWindow.Selection.TextRange.Text = porcentajeencontra
End Sub
¿y porque durante la presentacion, parece ke funciona pero no actualiza el contenido del a caja de texto y se queda tal cual?
Mode Lineal
