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

Microsoft 365 Récupérer la valeur d'une cellule dans un userform

FCMLE44

XLDnaute Impliqué
Supporter XLD
Bonjour

Dans un userform Montants, je souhaite dans une textbox (texbox13) y insérer la valeur de la cellule I2 de la feuille 2

J'ai donc fait cela
VB:
Private Sub TextBox13_Change()
Sheets("Feuil2").Range("I2") = Montants.TexBox13
End Sub

Private Sub UserForm_Initialize()
    Me.TexBox13 = Sheets("Feuil2").Range("I2")
    ComboBox2.List = Worksheets("Feuil2").Range("I2:I10").Value
End Sub

Le code bloque au niveau de cette partie
Code:
    Me.TexBox13 = Sheets("Feuil2").Range("I2")

Quelqu'un aurait il une idée ? Merci
 

soan

XLDnaute Barbatruc
Inactif
@FCMLE44

réponse à ton post #35

exact, mais si tu l'utilises, ce sera différent :

voici l'explication : le bouton nommé "Bouton 1" affiche le UserForm
seulement si la cellule active est sur une ligne où il y a marqué
"SOMMES BRUTES" en cellule B (fusion B: D) ; pourquoi ; pour que
les données du UserForm soient écrites dans les bonnes cellules
de destination.

et j'ai fait c'qu'il faut pour les libellés et les montants.

si besoin, tu peux m'demander une adaptation.
alors ? ton avis ?


soan
 
Dernière édition:

FCMLE44

XLDnaute Impliqué
Supporter XLD
Ce système fonctionne trés bien et je te remercie d'avoir passé tout ce temps
Néanmoins, pour plus de praticité paour les équipes, je souhaiterais que ce userform se déclenche à partir de ce bouton dans l'autre userform


Et que les données qui s'affichent en B83 s'affiche en B141 etc..... de manière automatique style copié collé
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…