Collegamento Powerpoint e accesso con VBA?

Question

Ho una diapositiva di PowerPoint che contiene le caselle di testo. Vorrei collegare queste caselle di testo con una visualizzazione filtrata di una tabella di dati in Access.

Per ex, se avessi un'applicazione TaskList in Access che ha visualizzato attività con diverse priorità e affettazioni; c'è un modo per aprire il file, selezionare questo punto di vista, e filtrare in base ad un VBA (o altro) onclick evento pulsante attivato dalla mia presentazione Powerpoint?

Answer 1

E 'certamente possibile ottenere i dati di accesso da PowerPoint.

È necessario assicurarsi di avere i riferimenti corretti impostati al Microsoft DAO Object Library nel progetto VBA.

Poi, per popolare il vostro testo nella presentazione di PowerPoint, è possibile chiamare qualcosa come la seguente funzione, per esempio, per restituire una stringa contenente un elenco di attività corrispondenti alla data TaskPriority.

Function GetTaskListFromAccess(taskPriority as Integer) as String
  Dim db As DAO.Database
  Dim rs As DAO.Recordset
  Dim listOfTasks as String

  Set db = DBEngine.OpenDatabase(“C:\my_database.accdb”)

  Set rs = db.OpenRecordset("SELECT * FROM TaskTable WHERE TaskPriority=" & _
                            taskPriority, dbOpenSnapshot)
  If not rs is nothing then
    If rs.RecordCount > 0 then
      With rs
        While Not .EOF
          if listOfTask = "" then 
            listOfTasks = !TaskName
           Else 
            listOfTasks = listOfTasks & vbCrLf & !TaskName
          End If
          .MoveNext
        Loop
      .Close
      End With
    End If
    Set rs = nothing
  End If
  Set db = nothing

  GetTaskListFromAccess = listOfTasks
End Function