erreur 13 lancement userform

P

pilou76

XLDnaute Occasionnel

• 9 Janvier 2016

• #2

Re : erreur 13 lancement userform

Bonjour,
Sauf erreur je n'ai pas trouve textbox8 a l'ouverture de l'userform1
Private Sub UserForm_Initialize()
Me.TextBox7.Value = Me.TextBox8.Value + 1
End Sub

 

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 9 Janvier 2016

• #3

Re : erreur 13 lancement userform

bonjour,

remplace : Me.TextBox7.Value = Me.TextBox8.Value + 1
par
Me.TextBox7.Value = Val(Me.TextBox8.Value) + 1

a+

 

Vote positif 0 Vote négatif

T

thierry440

XLDnaute Junior

• 9 Janvier 2016

• #4

Re : erreur 13 lancement userform

merci , cela fonctionne par contre , je voudrai avoir dans textbox8 la valeur du dernier numero de fiche dans BD_R

 

Vote positif 0 Vote négatif