Problème codage VBA Textbox

gustwo · 14 Janvier 2012

Bonjour à tous,

J'espère qu'une âme charitable pourra m'aider.

Je suis débutant en Vba cependant je possède quand même quelques notions, je suis en ce moment même sur la création d'un fichier pour la gestion d'un portefeuille d'actions et je fais face à quelques problèmes.

J'essaie de renvoyer la valeur de ma textbox dans une cellule mais je n'y arrive pas je ne comprends pas je pense que mon code est correct mais il y a un problème.

Private Sub UserForm_Click()
TBoxNomActions.Clear

ThisWorkbook.Worksheets("Valeurs").Activate
ActiveSheet.Range("B6").Activate

ActiveCell.Value = TBoxNomActions.Value

End Sub

Merci d'avance

Ps vous pouvez trouver le fichier ci joint

Guest · 14 Janvier 2012

Re : Problème codage VBA Textbox

Bonjour,

La méthode .clear n'existe pas pour les textbox.
ton code est placé dans UserForm_Click() au lieu CbOk_Click.

Tu peux mettre ce code en remplacement de tout le reste:

Code:

Private Sub CbOk_Click()
'Vérifier si le textbox contient quelquechose
    If Trim(TBoxNomActions) <> "" Then
          'si oui, mettre le contenu dans la prochaine cellule libre de la colonne B
        ThisWorkbook.Worksheets("Valeurs").Cells(Rows.Count, 2).End(xlUp)(2) = TBoxNomActions
        TBoxNomActions = "" 'Vider le textbox
    End If
    Unload Me 'décharger le userform
End Sub

A+

gustwo · 14 Janvier 2012

Re : Problème codage VBA Textbox

Merci beaucoup pour ton aide

Problème codage VBA Textbox

gustwo

Guest

Pièces jointes

Guest

Guest

gustwo

Guest

Discussions similaires

Problème codage VBA Textbox

gustwo

Guest

Pièces jointes

Guest

Guest

gustwo

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency