VBA - date

Bonjour, je cherche à développer du VBA pour la première fois

Cependant, ayant cherché sur de nombreux forums, je cherche à créer une variable qui va contenir la date du jour sous le format

22 Juillet 2017

Mais je n'ai pas réussi à trouver une fonction qui fait cela ..; ou peut-etre ai-je mal cherché

Merci pour votre aide !

Bonjour

Une date est un nombre.

22 Juillet 2017 est un format

En général en VBA on ne se préoccupe du format que pour afficher la ,dans une cellule ou un userform par exemple, pas pour manipuler la variable.

Il faudrait donc être plus précis sur ton contexte et ton objectif.

Bonjour,

Merci pour les explications !

Je cherche à créer un PPT dans lequel j'aurais besoin d'écrire la date sous ce format là dans plusieurs TextBox

Je met ci-joint mon code VBA :

Sub PPT()

Dim PptApp As PowerPoint.Application
Dim PptDoc As PowerPoint.Presentation
Dim Diapo As PowerPoint.Slide
Dim Sh As PowerPoint.Shape

Set PptApp = CreateObject("Powerpoint.Application")
Set PptDoc = PptApp.Presentations.Add

With PptDoc

    .Slides.Add Index:=1, Layout:=ppLayoutBlank
    Set Sh = .Slides(1).Shapes.AddLabel(Orientation:=msoTextOrientationHorizontal, _
        Left:=10, Top:=10, Width:=150, Height:=60)
    Sh.TextFrame.TextRange.Text = "Météo du "

Re

Alors

Sh.TextFrame.TextRange.Text = "Météo du " & Format(date, "d mmmm yyyy")

Merci, ça marche !

Au fait, Sais-tu renommer un fichier PPT lors de la création ?

En effet, au lieu de s'appeler "Présentation1", j'aimerais lui donner un nom précis

Set PptApp = CreateObject("Powerpoint.Application")
Set PptDoc = PptApp.Presentations.Add
With PptDoc
   .Name = "Meteo"
End With

Mais cette méthode m'affiche : impossible d'affecter à une propriété en lecture seule