how to permanently change the property of a field on a form

[salmonella]

can someone show with VBA how to permanently change the caption of a label so
that next time I open the database it will appear on the label.
the below don't seem to do it,
Me!name.Properties("caption") = "new caption"
or
me!name.caption = "new caption"


thanks

 

[fredg]

can someone show with VBA how to permanently change the caption of a label so
that next time I open the database it will appear on the label.
the below don't seem to do it,
Me!name.Properties("caption") = "new caption"
or
me!name.caption = "new caption"

thanks

Using VBA?
From a different form?

DoCmd.OpenForm "FormName", acDesign, , , , acHidden
Forms!FormName!LabelName.Caption = "New caption text"
DoCmd.Close acForm, "FormName", acSaveYes

From the same form?
Me!LabelName.Caption = "New Caption"
DoCmd.Close acForm, "FormName", acSaveYes

When you next open the form, the label will display the new caption.

 

[salmonella]

thanks for the reply- however, it did not work.

i have a control that changes the caption of a label, I close the form with
the commend you gave and when I open the form back up the change is gone and
original label caption is there.

I have allow design changes set to all views.

can you think of anything else?

thanks

 

[Jeanette Cunningham]

You can do this manually-->
Open the form in design view
Select the text in the label
Type the new text you want.
Save changes.

To use code to do it-->
Put this code in the load event for the form and leave it there so that
every time the form opens, it reads the caption to put in that label.

Me!LabelName.Caption = "New Caption"

Replace the obvious with your own names.



Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

 

[salmonella]

thanks for the suggestions but they have the same problem as others.

I have the form open, push a button to change the caption on a label and
then, when I close the form, I want to save the new label captions.

Thus I can't go into design view nor can I hard wire the change in the code
since the label varies depending on what user puts.

any ideas?....

 

[fredg]

thanks for the reply- however, it did not work.

i have a control that changes the caption of a label, I close the form with
the commend you gave and when I open the form back up the change is gone and
original label caption is there.

I have allow design changes set to all views.

can you think of anything else?

thanks

Is this to change the caption of a label on the same form as the code
or on a different form?
Why don't you tell us the Access version you are using and post your
exact code (by copying and pasting it), as what I suggested works
perfectly for me.

 

[salmonella]

Sorry about all this- this is what I have:

I have a form called form1
on form1 is a field called field1 with a label called label1
I also have on the form a button called button1
The idea is that the user enters a value in field1, clicks button1 and the
caption of label1 is changed to the value of field1:

the onclick event for button1 is:
If Not IsNull(Me!field1) Then
Me!label1.Caption = Me!field1
End If

This works fine and the value of field1 is now the caption of label1

There is another button on form1 that will open form2
form 2 has an on load event that closes form1 with the following code:
DoCmd.close acForm, "form1", acSaveYes

form1 closes just fine but the new label1 value is lost when I open it again

hope this is clearer

 

[Jeanette Cunningham]

Yes, much clearer.
To do what you want, store the user's entry for field1 in a table built for
that purpose.
When the form opens, you can do a dlookup to that table to get the text for
the label caption.

On the load event of the form put this code-->
Me!label1.Caption = Nz(DLookup("[FieldName]", "TableName"),"")

Replace the obvious with your own names.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

 

[salmonella]

Thanks for the suggestion Jeanette - it will work -but still not what I am
looking for (but may end up having to do it this way).

What I really need to know is whether once I change the text of a label's
caption with VBA (while in form view) can I save the form, and will the
label's new caption be saved also.
It appears that this is not possible...... is it???
Seems strange that the acsaveYES argument of the close method will not do
this.



thanks

Yes, much clearer.
To do what you want, store the user's entry for field1 in a table built for
that purpose.
When the form opens, you can do a dlookup to that table to get the text for
the label caption.

On the load event of the form put this code-->
Me!label1.Caption = Nz(DLookup("[FieldName]", "TableName"),"")

Replace the obvious with your own names.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

Sorry about all this- this is what I have:

I have a form called form1
on form1 is a field called field1 with a label called label1
I also have on the form a button called button1
The idea is that the user enters a value in field1, clicks button1 and the
caption of label1 is changed to the value of field1:

the onclick event for button1 is:
If Not IsNull(Me!field1) Then
Me!label1.Caption = Me!field1
End If

This works fine and the value of field1 is now the caption of label1

There is another button on form1 that will open form2
form 2 has an on load event that closes form1 with the following code:
DoCmd.close acForm, "form1", acSaveYes

form1 closes just fine but the new label1 value is lost when I open it
again

hope this is clearer

 

[Jeanette Cunningham]

The acSaveYes is for saving changes to the design of the form, not for
saving changes to data. Changes to data need to be saved in a table. Each
time the form is opened it gets its data from a table.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

Thanks for the suggestion Jeanette - it will work -but still not what I am
looking for (but may end up having to do it this way).

What I really need to know is whether once I change the text of a label's
caption with VBA (while in form view) can I save the form, and will the
label's new caption be saved also.
It appears that this is not possible...... is it???
Seems strange that the acsaveYES argument of the close method will not do
this.



thanks

Yes, much clearer.
To do what you want, store the user's entry for field1 in a table built
for
that purpose.
When the form opens, you can do a dlookup to that table to get the text
for
the label caption.

On the load event of the form put this code-->
Me!label1.Caption = Nz(DLookup("[FieldName]", "TableName"),"")

Replace the obvious with your own names.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

Sorry about all this- this is what I have:

I have a form called form1
on form1 is a field called field1 with a label called label1
I also have on the form a button called button1
The idea is that the user enters a value in field1, clicks button1 and
the
caption of label1 is changed to the value of field1:

the onclick event for button1 is:
If Not IsNull(Me!field1) Then
Me!label1.Caption = Me!field1
End If

This works fine and the value of field1 is now the caption of label1

There is another button on form1 that will open form2
form 2 has an on load event that closes form1 with the following code:
DoCmd.close acForm, "form1", acSaveYes

form1 closes just fine but the new label1 value is lost when I open it
again

hope this is clearer















:

On Sat, 19 Sep 2009 11:26:01 -0700, salmonella wrote:

thanks for the reply- however, it did not work.

i have a control that changes the caption of a label, I close the
form
with
the commend you gave and when I open the form back up the change is
gone and
original label caption is there.

I have allow design changes set to all views.

can you think of anything else?

thanks

:

On Sat, 19 Sep 2009 07:53:01 -0700, salmonella wrote:

can someone show with VBA how to permanently change the caption of
a
label so
that next time I open the database it will appear on the label.
the below don't seem to do it,
Me!name.Properties("caption") = "new caption"
or
me!name.caption = "new caption"

thanks

Using VBA?
From a different form?

DoCmd.OpenForm "FormName", acDesign, , , , acHidden
Forms!FormName!LabelName.Caption = "New caption text"
DoCmd.Close acForm, "FormName", acSaveYes

From the same form?
Me!LabelName.Caption = "New Caption"
DoCmd.Close acForm, "FormName", acSaveYes

When you next open the form, the label will display the new
caption.

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail


Is this to change the caption of a label on the same form as the code
or on a different form?
Why don't you tell us the Access version you are using and post your
exact code (by copying and pasting it), as what I suggested works
perfectly for me.

 

[salmonella]

We are still not on the same page

Please forget about tables or making changes in design view. my question is
if i make a change with VBA to the property of a form, while the form is in
formview, what can i do so that that change is saved with the from.

I can make the changes to the forms property, they look great and then i
close the forms with DoCmd.close acForm, "formname", acSaveYes and it does
not save a thing- all the properties default to the original ones. Surely
there must be a simple answer to this.

thanks....

The acSaveYes is for saving changes to the design of the form, not for
saving changes to data. Changes to data need to be saved in a table. Each
time the form is opened it gets its data from a table.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

Thanks for the suggestion Jeanette - it will work -but still not what I am
looking for (but may end up having to do it this way).

What I really need to know is whether once I change the text of a label's
caption with VBA (while in form view) can I save the form, and will the
label's new caption be saved also.
It appears that this is not possible...... is it???
Seems strange that the acsaveYES argument of the close method will not do
this.



thanks

Yes, much clearer.
To do what you want, store the user's entry for field1 in a table built
for
that purpose.
When the form opens, you can do a dlookup to that table to get the text
for
the label caption.

On the load event of the form put this code-->
Me!label1.Caption = Nz(DLookup("[FieldName]", "TableName"),"")

Replace the obvious with your own names.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia



Sorry about all this- this is what I have:

I have a form called form1
on form1 is a field called field1 with a label called label1
I also have on the form a button called button1
The idea is that the user enters a value in field1, clicks button1 and
the
caption of label1 is changed to the value of field1:

the onclick event for button1 is:
If Not IsNull(Me!field1) Then
Me!label1.Caption = Me!field1
End If

This works fine and the value of field1 is now the caption of label1

There is another button on form1 that will open form2
form 2 has an on load event that closes form1 with the following code:
DoCmd.close acForm, "form1", acSaveYes

form1 closes just fine but the new label1 value is lost when I open it
again

hope this is clearer















:

On Sat, 19 Sep 2009 11:26:01 -0700, salmonella wrote:

thanks for the reply- however, it did not work.

i have a control that changes the caption of a label, I close the
form
with
the commend you gave and when I open the form back up the change is
gone and
original label caption is there.

I have allow design changes set to all views.

can you think of anything else?

thanks

:

On Sat, 19 Sep 2009 07:53:01 -0700, salmonella wrote:

can someone show with VBA how to permanently change the caption of
a
label so
that next time I open the database it will appear on the label.
the below don't seem to do it,
Me!name.Properties("caption") = "new caption"
or
me!name.caption = "new caption"

thanks

Using VBA?
From a different form?

DoCmd.OpenForm "FormName", acDesign, , , , acHidden
Forms!FormName!LabelName.Caption = "New caption text"
DoCmd.Close acForm, "FormName", acSaveYes

From the same form?
Me!LabelName.Caption = "New Caption"
DoCmd.Close acForm, "FormName", acSaveYes

When you next open the form, the label will display the new
caption.

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail


Is this to change the caption of a label on the same form as the code
or on a different form?
Why don't you tell us the Access version you are using and post your
exact code (by copying and pasting it), as what I suggested works
perfectly for me.

 

[Jeanette Cunningham]

Use VBA to open the form in design view, make the changes and use acSaveYes.

Here is sample code to change the ribbon property of all forms in a
database.

Sub ChangeRibbonName()

Dim doc As Document
Dim db As DAO.Database

On Error Resume Next

Set db = CurrentDb()
For Each doc In db.Containers("Forms").Documents
DoCmd.OpenForm doc.Name, acDesign
Forms(doc.Name).RibbonName = "MyRibBasic"

DoCmd.Close acForm, doc.Name, acSaveYes
Next doc
Set db = Nothing
End Sub
-------------------------------------

Sample code to change properties of controls

Sub ChangeSomethingOnControls()

Dim doc As Document
Dim db As DAO.Database
Dim ctl As control

'some properties don't exist for some types of controls
On Error Resume Next

Set db = CurrentDb()

For Each doc In db.Containers("Forms").Documents
DoCmd.OpenForm doc.Name, acDesign

For Each ctl In Forms(doc.Name).Controls
If ctl.ControlTipText = "Click to sort, click again to reverse
the sort." Then
ctl.ControlTipText = "Click to toggle."
End If

If ctl.Name = "cmdRefresh" Then
ctl.ControlTipText = "Refresh screen."
End If


If ctl.Name = "cmdFirst" Then
ctl.ControlTipText = "Go to first record."
End If

For Each ctl In Forms(doc.Name).Controls
If ctl.Name Like "*date" Or ctl.Name Like "date*" Then
ctl.ShowDatePicker = 1
Else
ctl.ShowDatePicker = 0
'Debug.Print ctl.ShowDatePicker 1 = on, 0 = off
End If


For Each ctl In Forms(doc.Name).Controls
If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox
Then
If ctl.SpecialEffect = 2 Then
ctl.SpecialEffect = 0

End If
End If
Next ctl
DoCmd.Close acForm, doc.Name, acSaveYes

Next doc
Set db = Nothing
Set ctl = Nothing
End Sub

-----------------------------

Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

We are still not on the same page

Please forget about tables or making changes in design view. my question
is
if i make a change with VBA to the property of a form, while the form is
in
formview, what can i do so that that change is saved with the from.

I can make the changes to the forms property, they look great and then i
close the forms with DoCmd.close acForm, "formname", acSaveYes and it does
not save a thing- all the properties default to the original ones. Surely
there must be a simple answer to this.

thanks....

The acSaveYes is for saving changes to the design of the form, not for
saving changes to data. Changes to data need to be saved in a table. Each
time the form is opened it gets its data from a table.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

Thanks for the suggestion Jeanette - it will work -but still not what I
am
looking for (but may end up having to do it this way).

What I really need to know is whether once I change the text of a
label's
caption with VBA (while in form view) can I save the form, and will the
label's new caption be saved also.
It appears that this is not possible...... is it???
Seems strange that the acsaveYES argument of the close method will not
do
this.



thanks







:

Yes, much clearer.
To do what you want, store the user's entry for field1 in a table
built
for
that purpose.
When the form opens, you can do a dlookup to that table to get the
text
for
the label caption.

On the load event of the form put this code-->
Me!label1.Caption = Nz(DLookup("[FieldName]", "TableName"),"")

Replace the obvious with your own names.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia



Sorry about all this- this is what I have:

I have a form called form1
on form1 is a field called field1 with a label called label1
I also have on the form a button called button1
The idea is that the user enters a value in field1, clicks button1
and
the
caption of label1 is changed to the value of field1:

the onclick event for button1 is:
If Not IsNull(Me!field1) Then
Me!label1.Caption = Me!field1
End If

This works fine and the value of field1 is now the caption of label1

There is another button on form1 that will open form2
form 2 has an on load event that closes form1 with the following
code:
DoCmd.close acForm, "form1", acSaveYes

form1 closes just fine but the new label1 value is lost when I open
it
again

hope this is clearer















:

On Sat, 19 Sep 2009 11:26:01 -0700, salmonella wrote:

thanks for the reply- however, it did not work.

i have a control that changes the caption of a label, I close the
form
with
the commend you gave and when I open the form back up the change
is
gone and
original label caption is there.

I have allow design changes set to all views.

can you think of anything else?

thanks

:

On Sat, 19 Sep 2009 07:53:01 -0700, salmonella wrote:

can someone show with VBA how to permanently change the caption
of
a
label so
that next time I open the database it will appear on the label.
the below don't seem to do it,
Me!name.Properties("caption") = "new caption"
or
me!name.caption = "new caption"

thanks

Using VBA?
From a different form?

DoCmd.OpenForm "FormName", acDesign, , , , acHidden
Forms!FormName!LabelName.Caption = "New caption text"
DoCmd.Close acForm, "FormName", acSaveYes

From the same form?
Me!LabelName.Caption = "New Caption"
DoCmd.Close acForm, "FormName", acSaveYes

When you next open the form, the label will display the new
caption.

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail


Is this to change the caption of a label on the same form as the
code
or on a different form?
Why don't you tell us the Access version you are using and post
your
exact code (by copying and pasting it), as what I suggested works
perfectly for me.

 

[salmonella]

thanks- worked perfectly!

Use VBA to open the form in design view, make the changes and use acSaveYes.

Here is sample code to change the ribbon property of all forms in a
database.

Sub ChangeRibbonName()

Dim doc As Document
Dim db As DAO.Database

On Error Resume Next

Set db = CurrentDb()
For Each doc In db.Containers("Forms").Documents
DoCmd.OpenForm doc.Name, acDesign
Forms(doc.Name).RibbonName = "MyRibBasic"

DoCmd.Close acForm, doc.Name, acSaveYes
Next doc
Set db = Nothing
End Sub
-------------------------------------

Sample code to change properties of controls

Sub ChangeSomethingOnControls()

Dim doc As Document
Dim db As DAO.Database
Dim ctl As control

'some properties don't exist for some types of controls
On Error Resume Next

Set db = CurrentDb()

For Each doc In db.Containers("Forms").Documents
DoCmd.OpenForm doc.Name, acDesign

For Each ctl In Forms(doc.Name).Controls
If ctl.ControlTipText = "Click to sort, click again to reverse
the sort." Then
ctl.ControlTipText = "Click to toggle."
End If

If ctl.Name = "cmdRefresh" Then
ctl.ControlTipText = "Refresh screen."
End If


If ctl.Name = "cmdFirst" Then
ctl.ControlTipText = "Go to first record."
End If

For Each ctl In Forms(doc.Name).Controls
If ctl.Name Like "*date" Or ctl.Name Like "date*" Then
ctl.ShowDatePicker = 1
Else
ctl.ShowDatePicker = 0
'Debug.Print ctl.ShowDatePicker 1 = on, 0 = off
End If


For Each ctl In Forms(doc.Name).Controls
If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox
Then
If ctl.SpecialEffect = 2 Then
ctl.SpecialEffect = 0

End If
End If
Next ctl
DoCmd.Close acForm, doc.Name, acSaveYes

Next doc
Set db = Nothing
Set ctl = Nothing
End Sub

-----------------------------

Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

We are still not on the same page

Please forget about tables or making changes in design view. my question
is
if i make a change with VBA to the property of a form, while the form is
in
formview, what can i do so that that change is saved with the from.

I can make the changes to the forms property, they look great and then i
close the forms with DoCmd.close acForm, "formname", acSaveYes and it does
not save a thing- all the properties default to the original ones. Surely
there must be a simple answer to this.

thanks....

The acSaveYes is for saving changes to the design of the form, not for
saving changes to data. Changes to data need to be saved in a table. Each
time the form is opened it gets its data from a table.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

Thanks for the suggestion Jeanette - it will work -but still not what I
am
looking for (but may end up having to do it this way).

What I really need to know is whether once I change the text of a
label's
caption with VBA (while in form view) can I save the form, and will the
label's new caption be saved also.
It appears that this is not possible...... is it???
Seems strange that the acsaveYES argument of the close method will not
do
this.



thanks







:

Yes, much clearer.
To do what you want, store the user's entry for field1 in a table
built
for
that purpose.
When the form opens, you can do a dlookup to that table to get the
text
for
the label caption.

On the load event of the form put this code-->
Me!label1.Caption = Nz(DLookup("[FieldName]", "TableName"),"")

Replace the obvious with your own names.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia



Sorry about all this- this is what I have:

I have a form called form1
on form1 is a field called field1 with a label called label1
I also have on the form a button called button1
The idea is that the user enters a value in field1, clicks button1
and
the
caption of label1 is changed to the value of field1:

the onclick event for button1 is:
If Not IsNull(Me!field1) Then
Me!label1.Caption = Me!field1
End If

This works fine and the value of field1 is now the caption of label1

There is another button on form1 that will open form2
form 2 has an on load event that closes form1 with the following
code:
DoCmd.close acForm, "form1", acSaveYes

form1 closes just fine but the new label1 value is lost when I open
it
again

hope this is clearer















:

On Sat, 19 Sep 2009 11:26:01 -0700, salmonella wrote:

thanks for the reply- however, it did not work.

i have a control that changes the caption of a label, I close the
form
with
the commend you gave and when I open the form back up the change
is
gone and
original label caption is there.

I have allow design changes set to all views.

can you think of anything else?

thanks

:

On Sat, 19 Sep 2009 07:53:01 -0700, salmonella wrote:

can someone show with VBA how to permanently change the caption
of
a
label so
that next time I open the database it will appear on the label.
the below don't seem to do it,
Me!name.Properties("caption") = "new caption"
or
me!name.caption = "new caption"

thanks

Using VBA?
From a different form?

DoCmd.OpenForm "FormName", acDesign, , , , acHidden
Forms!FormName!LabelName.Caption = "New caption text"
DoCmd.Close acForm, "FormName", acSaveYes

From the same form?
Me!LabelName.Caption = "New Caption"
DoCmd.Close acForm, "FormName", acSaveYes

When you next open the form, the label will display the new
caption.

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail


Is this to change the caption of a label on the same form as the
code
or on a different form?
Why don't you tell us the Access version you are using and post
your
exact code (by copying and pasting it), as what I suggested works
perfectly for me.

 

[Jeanette Cunningham]

You're welcome.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

thanks- worked perfectly!

Use VBA to open the form in design view, make the changes and use
acSaveYes.

Here is sample code to change the ribbon property of all forms in a
database.

Sub ChangeRibbonName()

Dim doc As Document
Dim db As DAO.Database

On Error Resume Next

Set db = CurrentDb()
For Each doc In db.Containers("Forms").Documents
DoCmd.OpenForm doc.Name, acDesign
Forms(doc.Name).RibbonName = "MyRibBasic"

DoCmd.Close acForm, doc.Name, acSaveYes
Next doc
Set db = Nothing
End Sub
-------------------------------------

Sample code to change properties of controls

Sub ChangeSomethingOnControls()

Dim doc As Document
Dim db As DAO.Database
Dim ctl As control

'some properties don't exist for some types of controls
On Error Resume Next

Set db = CurrentDb()

For Each doc In db.Containers("Forms").Documents
DoCmd.OpenForm doc.Name, acDesign

For Each ctl In Forms(doc.Name).Controls
If ctl.ControlTipText = "Click to sort, click again to
reverse
the sort." Then
ctl.ControlTipText = "Click to toggle."
End If

If ctl.Name = "cmdRefresh" Then
ctl.ControlTipText = "Refresh screen."
End If


If ctl.Name = "cmdFirst" Then
ctl.ControlTipText = "Go to first record."
End If

For Each ctl In Forms(doc.Name).Controls
If ctl.Name Like "*date" Or ctl.Name Like "date*" Then
ctl.ShowDatePicker = 1
Else
ctl.ShowDatePicker = 0
'Debug.Print ctl.ShowDatePicker 1 = on, 0 = off
End If


For Each ctl In Forms(doc.Name).Controls
If ctl.ControlType = acTextBox Or ctl.ControlType =
acComboBox
Then
If ctl.SpecialEffect = 2 Then
ctl.SpecialEffect = 0

End If
End If
Next ctl
DoCmd.Close acForm, doc.Name, acSaveYes

Next doc
Set db = Nothing
Set ctl = Nothing
End Sub

-----------------------------

Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

We are still not on the same page

Please forget about tables or making changes in design view. my
question
is
if i make a change with VBA to the property of a form, while the form
is
in
formview, what can i do so that that change is saved with the from.

I can make the changes to the forms property, they look great and then
i
close the forms with DoCmd.close acForm, "formname", acSaveYes and it
does
not save a thing- all the properties default to the original ones.
Surely
there must be a simple answer to this.

thanks....















:

The acSaveYes is for saving changes to the design of the form, not for
saving changes to data. Changes to data need to be saved in a table.
Each
time the form is opened it gets its data from a table.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia

Thanks for the suggestion Jeanette - it will work -but still not
what I
am
looking for (but may end up having to do it this way).

What I really need to know is whether once I change the text of a
label's
caption with VBA (while in form view) can I save the form, and will
the
label's new caption be saved also.
It appears that this is not possible...... is it???
Seems strange that the acsaveYES argument of the close method will
not
do
this.



thanks







:

Yes, much clearer.
To do what you want, store the user's entry for field1 in a table
built
for
that purpose.
When the form opens, you can do a dlookup to that table to get the
text
for
the label caption.

On the load event of the form put this code-->
Me!label1.Caption = Nz(DLookup("[FieldName]", "TableName"),"")

Replace the obvious with your own names.


Jeanette Cunningham MS Access MVP -- Melbourne Victoria Australia



Sorry about all this- this is what I have:

I have a form called form1
on form1 is a field called field1 with a label called label1
I also have on the form a button called button1
The idea is that the user enters a value in field1, clicks
button1
and
the
caption of label1 is changed to the value of field1:

the onclick event for button1 is:
If Not IsNull(Me!field1) Then
Me!label1.Caption = Me!field1
End If

This works fine and the value of field1 is now the caption of
label1

There is another button on form1 that will open form2
form 2 has an on load event that closes form1 with the following
code:
DoCmd.close acForm, "form1", acSaveYes

form1 closes just fine but the new label1 value is lost when I
open
it
again

hope this is clearer















:

On Sat, 19 Sep 2009 11:26:01 -0700, salmonella wrote:

thanks for the reply- however, it did not work.

i have a control that changes the caption of a label, I close
the
form
with
the commend you gave and when I open the form back up the
change
is
gone and
original label caption is there.

I have allow design changes set to all views.

can you think of anything else?

thanks

:

On Sat, 19 Sep 2009 07:53:01 -0700, salmonella wrote:

can someone show with VBA how to permanently change the
caption
of
a
label so
that next time I open the database it will appear on the
label.
the below don't seem to do it,
Me!name.Properties("caption") = "new caption"
or
me!name.caption = "new caption"

thanks

Using VBA?
From a different form?

DoCmd.OpenForm "FormName", acDesign, , , , acHidden
Forms!FormName!LabelName.Caption = "New caption text"
DoCmd.Close acForm, "FormName", acSaveYes

From the same form?
Me!LabelName.Caption = "New Caption"
DoCmd.Close acForm, "FormName", acSaveYes

When you next open the form, the label will display the new
caption.

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail


Is this to change the caption of a label on the same form as the
code
or on a different form?
Why don't you tell us the Access version you are using and post
your
exact code (by copying and pasting it), as what I suggested
works
perfectly for me.