OVH Cloud OVH Cloud

données sur bouton

3 réponses
Avatar
DENIS
Bonjour =E0 tous,

Comment faire pour que le texte d'un bouton se trouvant=20
sur un userform affiche automatiquement les donn=E9es de la=20
cellule A1 sur la feuil1 du classeur ?
pour info : la cellule A1 est une date : .NumberFormat=20
=3D "dddd dd mmmm yyyy"

Merci=20
Denis

3 réponses

Avatar
bourby
DENIS wrote:
Bonjour à tous,

Comment faire pour que le texte d'un bouton se trouvant
sur un userform affiche automatiquement les données de la
cellule A1 sur la feuil1 du classeur ?
pour info : la cellule A1 est une date : .NumberFormat
= "dddd dd mmmm yyyy"

Merci
Denis
bonjour,

dans le code lié à l'userform (accessible par clic droit sur le nom de
l'UF dans la fenêtre VBA Project:
Dans la liste déroulante en haut à gauche sélectionner l' Userform,
et dans la liste à droite, sélectionner Initialize; il affiche:
Private Sub UserForm_Initialize()

end sub
Entre ces 2 lignes, placer le code suivant:
monBouton.caption=worksheets("Feuil1").range("A1").value

Pour vérifier, On peut faire F5 pour exécuter la macro,.

Cordialement

Bourby

Avatar
Ellimac
Bonjour,

Pour compléter la réponse de Denis :
CommandButton1.Caption = Format(Range("a1").Value, "dddd
dd mmmm yyyy"

Camille

-----Message d'origine-----
Bonjour à tous,

Comment faire pour que le texte d'un bouton se trouvant
sur un userform affiche automatiquement les données de la
cellule A1 sur la feuil1 du classeur ?
pour info : la cellule A1 est une date : .NumberFormat
= "dddd dd mmmm yyyy"

Merci
Denis
.



Avatar
ru-th
Variante

CommandButton1.Caption = [a1].Text

a+
rural thierry
"DENIS" a écrit dans le message de
news: 14ea01c5045a$140bc2d0$
Bonjour à tous,

Comment faire pour que le texte d'un bouton se trouvant
sur un userform affiche automatiquement les données de la
cellule A1 sur la feuil1 du classeur ?
pour info : la cellule A1 est une date : .NumberFormat
= "dddd dd mmmm yyyy"

Merci
Denis