Vous êtes-vous déjà demandé comment automatiser la création d’une présentation PowerPoint? Dans cet article, nous allons explorer comment ChatGPT, un modèle de langage développé par OpenAI, peut être utilisé en tandem avec PowerPoint pour générer rapidement des diapositives. Vous regarderez également la vidéo sur notre page YouTube.
ChatGPT est un modèle de langage basé sur l’architecture GPT-4 d’OpenAI. Il est capable de comprendre et de générer du texte dans une multitude de langues. Avec ChatGPT, vous pouvez obtenir des réponses à vos questions, générer du contenu ou même écrire du code!
Avant d’utiliser le code généré par ChatGPT, vous devez préparer PowerPoint:
ALT + F11
pour lancer l’éditeur VBA (Visual Basic for Applications).Insert
> Module
pour ajouter un nouveau module.Posez simplement votre question à ChatGPT. Dans notre exemple, nous avons demandé comment créer une présentation PowerPoint qui détaille les étapes pour créer un site WordPress. ChatGPT nous a fourni un code VBA prêt à l’emploi.
Vous pouvez, par exemple, demander à ChatGPT de créer un code VBA sur comment créer un site web avec WordPress. Vous aurez un code semblable à ceci.
Sub CreerPresentationWordPress()
Dim pptApp As Object
Dim pptPresentation As Object
Dim pptSlide As Object
Dim pptTextBox As Object
Dim i As Integer
' Crée une nouvelle instance de PowerPoint ou utilise une instance ouverte
On Error Resume Next
Set pptApp = GetObject(, "PowerPoint.Application")
On Error GoTo 0
If pptApp Is Nothing Then
Set pptApp = CreateObject("PowerPoint.Application")
End If
' Crée une nouvelle présentation
Set pptPresentation = pptApp.Presentations.Add
pptApp.Visible = True
' Tableau des étapes pour créer un site WordPress
Dim etapes() As String
etapes = Split("Choisir un nom de domaine et un hébergeur,Installer WordPress sur votre hébergement,Choisir un thème pour votre site,Installer les plugins nécessaires,Créer les pages de base (Accueil, À propos, Contact, etc.),Ajouter du contenu à ces pages,Personnaliser votre site (couleurs, polices, etc.),Configurer les paramètres de SEO,Tester le site pour s'assurer qu'il fonctionne correctement,Publier le site", ",")
' Crée une diapositive pour chaque étape
For i = LBound(etapes) To UBound(etapes)
' Ajoute une nouvelle diapositive
Set pptSlide = pptPresentation.Slides.Add(i + 1, 1) ' 1 = ppLayoutTitle (layout avec titre et contenu)
' Définit le titre et le contenu de la diapositive
pptSlide.Shapes(1).TextFrame.TextRange.Text = "Étape " & (i + 1)
pptSlide.Shapes(2).TextFrame.TextRange.Text = etapes(i)
Next i
End Sub
Une fois que vous avez votre code:
Avec le code en place, vous pouvez maintenant exécuter la macro pour générer votre présentation:
ALT + F8
, sélectionnez votre macro (dans notre exemple, CreerPresentationWordPress
) et cliquez sur « Run ».Voilà! PowerPoint générera automatiquement une série de diapositives fondées sur le code que ChatGPT vous a fourni.
L’intégration de ChatGPT et PowerPoint propose un moyen innovant et rapide de créer des présentations. Que vous soyez un professionnel cherchant à gagner du temps ou un étudiant cherchant à impressionner, cette méthode vous offre un avantage considérable. Essayez-le la prochaine fois que vous aurez besoin de créer une présentation en un clin d’œil!