Incompatibilité type

Bonjour à tous, j'espère que vous allez bien. J'ai un petit souci, étant novice sur Excel VBA, j'ai un problème à résoudre, sur mon userform, je dois alimenter un fichier excel contenant des cellules au format date, parmi ces cellules aux formats date, j'ai besoin de mettre une écriture genre : prévu 05/22, avant de le mettre vraiment la vraie date lorsque la date est venu, aussi certains cellules devraient rester vide, mon code est

if textbox12.value="" then

cells(modif, 14) = ""

else

cells(modif, 14) = Cdate(textbox12.value)

seulement il me renvoie erreur d'exécution car je sais pas quel condition utiliser lorsque j'écris la date de RDV dans le textbox mais non pas une vraie date.

Merci

Bonjour Razluc,

Pourrait-on avoir un fichier pour savoir de quoi il en retourne?

Bonjour,

Essayez :

        If IsDate(TextBox12.Value) Then
           Cells(modif, 14) = CDate(TextBox12.Value)
        Else
           Cells(modif, 14) = ""
        End If

J'ai essayé la proposition de Éric Kergresse, et le problème est résolu, grand merci à tous

Rechercher des sujets similaires à "incompatibilite type"