How to vote directly in PowerPoint?
Many presenters speaking to PowerPoint presentations come up with the idea that it would be nice to ask their listeners a specific question, to conduct a survey or even a survey. In this case, it is desirable that the results would be an organic part of the presentation.
For these purposes, we decided to modify our SMS-voting service .
We made a simple html request with which you can get the text of the question of the required vote and, in tabular form, the results of this vote:
|How do you think prices for apple products will change?||Vote|
|Will remain unchanged||49|
|I do not know...||25|
This html table can serve as a data source for Excel. Connection is made using Web Data Connection. Then, using standard Excel tools, a graph is built that can be imported (pasted as a link) into any program that supports linking with Excel graphs, for example, in PowerPoint. This reference Excel document is already set up for test voting.
But one problem turned out. By default, Excel allows you to update data from a source no more than 1 time per minute. Using the VBA macro, this limitation was circumvented.
Public dTime As Date Private Sub auto_open() Run "RefreshIt" End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) On Error Resume Next If Cancel = False Then Application.OnTime dTime, "RefreshIt", , False On Error GoTo 0 End Sub Sub RefreshIt() i = Int(Sheets(1).Range("H25").Value) If i > 0 Then On Error Resume Next Sheets(1).Range("A1").QueryTable.Refresh If i < 5 Then i = 5 If i < 10 Then dt = "00:00:0" & i Else dt = "00:00:" & i End If dTime = Time + TimeValue(dt) Application.OnTime dTime, "RefreshIt" End If End Sub
The result is a graph with the voting results, which is updated as votes become available in almost real time.
An example of a “live” chart in PowerPoint:
PS The cost of voting is the standard tariff for an SMS message to a long number to another subscriber (from free to 2 rubles, depending on the tariff plan).
Only registered users can participate in the survey. Please come in.
SMS voting in PowerPoint
- 40% May be helpful 64
- 63.1% Unlikely to come in handy 101