OVH Cloud OVH Cloud

textbox

4 réponses
Avatar
pierre52
salut à tous et toutes ,
je ne dois pas être bien en forme aujourd'hui.
à l'ouverture de mon classeur j'ai un userform avec un textbox je
voudrai que la valeur ou le texte de la cellule A1 y apparaisse
ceci ne fonctionne pas
textbox1.text=range("A1").value
j'ai beau le tourné et le retourné rien n'y fait: erreur 424 objet requis

merci de votre aide

4 réponses

Avatar
michdenis
Bonjour Pierre52,

Dans la feuille module de ton formulaire (userform)

Tu adaptes le nom de la feuille "Feuil1" pour le nom de ta feuille où est la donnée.
Attention au nom du Textbox... utilise le nom de celui de ton application et pas nécessairement le mien.
Son nom se retrouve dans la section "propriétés "Name" de l'objet Textbox lorsque ce dernier est sélectionné.

'--------------------
Private Sub UserForm_Initialize()

With Worksheets("Feuil1")
Me.TextBox1.Value = .Range("A1").Value
End With

End Sub
'--------------------


Salutations!



"pierre52" a écrit dans le message de news:
salut à tous et toutes ,
je ne dois pas être bien en forme aujourd'hui.
à l'ouverture de mon classeur j'ai un userform avec un textbox je
voudrai que la valeur ou le texte de la cellule A1 y apparaisse
ceci ne fonctionne pas
textbox1.text=range("A1").value
j'ai beau le tourné et le retourné rien n'y fait: erreur 424 objet requis

merci de votre aide
Avatar
pierre52
merci beaucoup
je pensai que l'on pouvais le faire dans le wokbook open
encore merci

Bonjour Pierre52,

Dans la feuille module de ton formulaire (userform)

Tu adaptes le nom de la feuille "Feuil1" pour le nom de ta feuille où est la donnée.
Attention au nom du Textbox... utilise le nom de celui de ton application et pas nécessairement le mien.
Son nom se retrouve dans la section "propriétés "Name" de l'objet Textbox lorsque ce dernier est sélectionné.

'--------------------
Private Sub UserForm_Initialize()

With Worksheets("Feuil1")
Me.TextBox1.Value = .Range("A1").Value
End With

End Sub
'--------------------


Salutations!



"pierre52" a écrit dans le message de news:
salut à tous et toutes ,
je ne dois pas être bien en forme aujourd'hui.
à l'ouverture de mon classeur j'ai un userform avec un textbox je
voudrai que la valeur ou le texte de la cellule A1 y apparaisse
ceci ne fonctionne pas
textbox1.text=range("A1").value
j'ai beau le tourné et le retourné rien n'y fait: erreur 424 objet requis

merci de votre aide




Avatar
michdenis
Dans le workbook open, tu peux appeler ton formulaire

Si ton formulaire a le nom "userform"

'---------------
Private Sub Workbook_Open()
Userform1.Show
End Sub
'---------------

Et tu inscris la procédure de l'autre fil dans ton formulaire


Salutations!


"pierre52" a écrit dans le message de news:
merci beaucoup
je pensai que l'on pouvais le faire dans le wokbook open
encore merci

Bonjour Pierre52,

Dans la feuille module de ton formulaire (userform)

Tu adaptes le nom de la feuille "Feuil1" pour le nom de ta feuille où est la donnée.
Attention au nom du Textbox... utilise le nom de celui de ton application et pas nécessairement le mien.
Son nom se retrouve dans la section "propriétés "Name" de l'objet Textbox lorsque ce dernier est sélectionné.

'--------------------
Private Sub UserForm_Initialize()

With Worksheets("Feuil1")
Me.TextBox1.Value = .Range("A1").Value
End With

End Sub
'--------------------


Salutations!



"pierre52" a écrit dans le message de news:
salut à tous et toutes ,
je ne dois pas être bien en forme aujourd'hui.
à l'ouverture de mon classeur j'ai un userform avec un textbox je
voudrai que la valeur ou le texte de la cellule A1 y apparaisse
ceci ne fonctionne pas
textbox1.text=range("A1").value
j'ai beau le tourné et le retourné rien n'y fait: erreur 424 objet requis

merci de votre aide




Avatar
pierre52
encore merci

Dans le workbook open, tu peux appeler ton formulaire

Si ton formulaire a le nom "userform"

'---------------
Private Sub Workbook_Open()
Userform1.Show
End Sub
'---------------

Et tu inscris la procédure de l'autre fil dans ton formulaire


Salutations!


"pierre52" a écrit dans le message de news:
merci beaucoup
je pensai que l'on pouvais le faire dans le wokbook open
encore merci


Bonjour Pierre52,

Dans la feuille module de ton formulaire (userform)

Tu adaptes le nom de la feuille "Feuil1" pour le nom de ta feuille où est la donnée.
Attention au nom du Textbox... utilise le nom de celui de ton application et pas nécessairement le mien.
Son nom se retrouve dans la section "propriétés "Name" de l'objet Textbox lorsque ce dernier est sélectionné.

'--------------------
Private Sub UserForm_Initialize()

With Worksheets("Feuil1")
Me.TextBox1.Value = .Range("A1").Value
End With

End Sub
'--------------------


Salutations!



"pierre52" a écrit dans le message de news:
salut à tous et toutes ,
je ne dois pas être bien en forme aujourd'hui.
à l'ouverture de mon classeur j'ai un userform avec un textbox je
voudrai que la valeur ou le texte de la cellule A1 y apparaisse
ceci ne fonctionne pas
textbox1.text=range("A1").value
j'ai beau le tourné et le retourné rien n'y fait: erreur 424 objet requis

merci de votre aide