Actualisation Textbox

atot

XLDnaute Nouveau
Bonjour,


Je cherche une commande pour actualiser une textbox toutes les minutes.
En fait ma textbox prends une valeur dans une cellule la cellule change de valeur mais pas la textbox

Merci
 

Pierrot93

XLDnaute Barbatruc
Re : Actualisation Textbox

Bonjour Atot

essaye peut être le code ci-dessous, pour une "textbox" placée sur la feuille de calcul, code à positionner dans le module de la feuille concernée :

Code:
Option Explicit
Private Sub Worksheet_Calculate()
Feuil1.TextBox1.Value = Range("A1").Value
End Sub

A voir si ce code réagira à la modification de ta cellule, dépend de l'alimentation, sinon essayer peut être l'événement "change" :

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Feuil1.TextBox1.Value = Range("A1").Value
End Sub

bon après midi
@+
 

atot

XLDnaute Nouveau
Re : Actualisation Textbox

Merci de ta reponse Pierrot93

En fait ma textbox est située dans un usf . Au demarrage tout fonctionne normalement mais quand ma cellule change de données la textbox ne suit pas.
J'ai mis ma textbox en change et si je supprime le contenu de la textbox les données se mettent à jour.Moi je le veux en automatique comme un textbox.refresh mais je ne trouve pas de solution.
 

Pierrot93

XLDnaute Barbatruc
Re : Actualisation Textbox

Re

essaye en modifiant :
Code:
Feuil1.TextBox1.Value = Range("A1").Value

Par :
Code:
NomUserForm.TextBox1.Value = Range("A1").Value

tujours dans le module de la feuille de calcul.

à vérifier, mais il me semble que l'USF doit être en non modal pour que cela fonctionne....
 

atot

XLDnaute Nouveau
Re : Actualisation Textbox

Salut Pierrot93

C'est bon je m'en suit sorti par contre si je veux l'appeler (TextBox2_Change) en automatique y a t'il autre chose que le call car ça ne fonctionne pas
Lebut est de le lancer depuis le Workbook_Open


Bye
 

Discussions similaires

Réponses
2
Affichages
178

Statistiques des forums

Discussions
312 069
Messages
2 085 042
Membres
102 765
dernier inscrit
richdi