Defaulting dates

[J Carvell]

I have set up a form that automatically defaults the date received to todays date.

I would like this to remain so if the form is accessed from the 'MainMenu' form I have created. However, if I access the form from a different form, I would like the received date to default to the same recevied date on that different form.

Is this possible?

 

[AgentSmith]

It sounds to me like you're doing a simple ".Show" approach, e.g.

UserForm1.Show

This works fine but it does lack flexibility such as you require. Instead you can go down the object-oriented route. If this means nothing to you then essentially you can use UserForm1 as a kind of template and create new copies of it to play around with, e.g.

Dim frm1 as UserForm1
Set frm1 = New UserForm1
frm1.TextBox1.Value = "new value"
frm1.Show

This create a new copy of UserForm1 (which I've called frm1) and writes "new value" in TextBox1 on that form before showing it.

Using your form this way can clog up memory, so when you're finished it's a good idea to tidy up:

Set frm1 = Nothing

So what I'd consider doing is to write a macro that shows the required form using code like that above. Give the macro 1 parameter - the date you want to display - then write it in before showing the form.

Hope this is giving you some ideas to play with!