Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

pb UserForm_Initialize

  • Initiateur de la discussion nanor
  • Date de début
N

nanor

Guest
Salut le forum, bonne journée à tous!

J'ai un ptit souci dans mon code vba, lorsque je mets le "y" dans le TextBox.Value, j'ai une erreur "incompatibilité de type".

Private Sub UserForm_Initialize()
Dim x As Integer
x = Format(Now, "mm")
y = x - 1
' This gives a name to textBox1 with the full path
TextBox1.Value = Worksheets("data").Cells(11, 1).Value + y + Format(Now, " yyyy") + ".xls"
End Sub

Est-ce que vous voyez mon erreur?

Merci d'avance

nanor
 
C

Cathy

Guest
Salut nanor,

le problème que je vois n'est pas sur y, si tu enlèves + ".xls" ça marche.
Tes autres données sont numériques et tu rajoutes du texte à la fin.

@+

 
E

eric

Guest
Bonjour,

Si tu veux mettre ".xls", n'utilise pas "+", mais "&".

Comme le dit cathy, le signe + ajoute une donnée numérique à une donnée alphabétique, d'où une erreur.

Normalement, ça marche.
 

Discussions similaires

  • Résolu(e)
Microsoft 365 userform
Réponses
4
Affichages
412
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…