Autres Récupérer une date (sans formule) dans une Textbox

chaelie2015 · 24 Décembre 2020

Bonsoir Forum
je souhaite récupérer une date dans cellule vers TextBox, selon ce code ça marche pas.
.tbx_DateMESRéelle = Application.WorksheetFunction.VLookup(CLng(Me.cmbx_NuméroRéf), Sheets("BdD Projets").Range("source"), 10, 0)
NB: dans cette cellule (cellule dans la colonne 10 dans un tableau nommé source) il y a une formule.
MERCI par avance

Staple1600 · 24 Décembre 2020

Bonsoir

OK chez moi

VB:

Private Sub UserForm_Initialize()
ComboBox1.List = Array(1600, 1601, 1602, 1603)
End Sub
Private Sub ComboBox1_Change()
TextBox1 = CDate(Application.VLookup(ComboBox1.Value * 1, [Staple], 10, 0))
End Sub

chaelie2015 · 25 Décembre 2020

Bonsoir plutôt Bonjour
merci JM pour la réponse.
souci résolu
a+

Autres Récupérer une date (sans formule) dans une Textbox

chaelie2015

XLDnaute Accro

Staple1600

XLDnaute Barbatruc

chaelie2015

XLDnaute Accro

Discussions similaires