Message d'erreur

Bonjour

j'ai un message d’erreur lorsque je sélectionne mon champ date :

Private Sub UserForm_Initialize()
Dim i As Integer
Dim m As String
    'remplit la liste des mois
    For i = 1 To 12
        m = Format(DateSerial(2015, i, 1), "mmmm")
        Mois.AddItem UCase(Left(m, 1)) & Right(m, Len(m) - 1)
    Next i
    'remplit la liste des années
    For i = 1900 To 2100
        Annee.AddItem i
    Next i
    Jour.Value = Now
End Sub

cela me met :

erreur de compilation - Projet ou bibliothèque introuvable.

Et me surligne le

Format

Bonjour,

Vous devez avoir un problème avec le référencement de la bibliothèque : Visual Basic For application.

Consulter dans l'éditeur VB, outils --> références

En tout cas , préfixer Format résoudra le problème :

VBA.Format 

merci ca a l'air de fonctionner.

Mais pourquoi cela fonctionné sans préfixé de VBA. ???

quattro a écrit :

Mais pourquoi cela fonctionné sans préfixé de VBA

Les fonctions VBA n'ont pas besoin normalement d'être préfixées.

Ce problème se produit a priori quand des références de bibliothèque sont manquantes.

Encore une fois, vérifiez vos références dans l'éditeur VB.