I have a worksheet set up as a data entry page to allow customers to select
features in a product. This data then generates a part number to capture that
particular set of features.

However, this leaves me with the Data Input form populated with the last
customer's selections. How can I write my macro to Reset the form to the
'blank' starting position? I envision having a 'Reset' box in the worksheet
to cue the Macro.

Thanks.

Mike

Write the start of your macro first on a module sheet. You can write the
whole thing or start with one line and add additional lines later.

Sub Resetform()
Range("A1").ClearContents
......
(add cells as needed)
End Sub

Using ClearContents will leave formatting and validations intact

Make the reset box a Form Control command button and link it to this macro.
--
If this helps, please remember to click yes.


"MichaelRobert" wrote:

I have a worksheet set up as a data entry page to allow customers to select
features in a product. This data then generates a part number to capture that
particular set of features.

However, this leaves me with the Data Input form populated with the last
customer's selections. How can I write my macro to Reset the form to the
'blank' starting position? I envision having a 'Reset' box in the worksheet
to cue the Macro.

Thanks.

Mike

Many thanks, Paul C.

Mike

"Paul C" wrote:

Write the start of your macro first on a module sheet. You can write the
whole thing or start with one line and add additional lines later.

Sub Resetform()
Range("A1").ClearContents
.....
(add cells as needed)
End Sub

Using ClearContents will leave formatting and validations intact

Make the reset box a Form Control command button and link it to this macro.
--
If this helps, please remember to click yes.


"MichaelRobert" wrote:

I have a worksheet set up as a data entry page to allow customers to select
features in a product. This data then generates a part number to capture that
particular set of features.

However, this leaves me with the Data Input form populated with the last
customer's selections. How can I write my macro to Reset the form to the
'blank' starting position? I envision having a 'Reset' box in the worksheet
to cue the Macro.

Thanks.

Mike

The ClearContents command works fine in clearing the form. But ideally the
result of the 'Reset' will be to populate each of the cleared cells (Range
b9:c15) with the word 'Empty'.

Is their a command to specify the content of cells?

Thanks.

Mike

"MichaelRobert" wrote:

Many thanks, Paul C.

Mike

"Paul C" wrote:

Write the start of your macro first on a module sheet. You can write the
whole thing or start with one line and add additional lines later.

Sub Resetform()
Range("A1").ClearContents
.....
(add cells as needed)
End Sub

Using ClearContents will leave formatting and validations intact

Make the reset box a Form Control command button and link it to this macro.
--
If this helps, please remember to click yes.


"MichaelRobert" wrote:

I have a worksheet set up as a data entry page to allow customers to select
features in a product. This data then generates a part number to capture that
particular set of features.

However, this leaves me with the Data Input form populated with the last
customer's selections. How can I write my macro to Reset the form to the
'blank' starting position? I envision having a 'Reset' box in the worksheet
to cue the Macro.

Thanks.

Mike

Maybe...

worksheets("Sheet99999").range("b9:c15").value = "Empty"



MichaelRobert wrote:

The ClearContents command works fine in clearing the form. But ideally the
result of the 'Reset' will be to populate each of the cleared cells (Range
b9:c15) with the word 'Empty'.

Is their a command to specify the content of cells?

Thanks.

Mike

"MichaelRobert" wrote:

Many thanks, Paul C.

Mike

"Paul C" wrote:

Write the start of your macro first on a module sheet. You can write the
whole thing or start with one line and add additional lines later.

Sub Resetform()
Range("A1").ClearContents
.....
(add cells as needed)
End Sub

Using ClearContents will leave formatting and validations intact

Make the reset box a Form Control command button and link it to this macro.
--
If this helps, please remember to click yes.


"MichaelRobert" wrote:

I have a worksheet set up as a data entry page to allow customers to select
features in a product. This data then generates a part number to capture that
particular set of features.

However, this leaves me with the Data Input form populated with the last
customer's selections. How can I write my macro to Reset the form to the
'blank' starting position? I envision having a 'Reset' box in the worksheet
to cue the Macro.

Thanks.

Mike


--

Dave Peterson

Thanks, Dave. Works like a charm!

Mike
"Dave Peterson" wrote:

Maybe...

worksheets("Sheet99999").range("b9:c15").value = "Empty"



MichaelRobert wrote:

The ClearContents command works fine in clearing the form. But ideally the
result of the 'Reset' will be to populate each of the cleared cells (Range
b9:c15) with the word 'Empty'.

Is their a command to specify the content of cells?

Thanks.

Mike

"MichaelRobert" wrote:

Many thanks, Paul C.

Mike

"Paul C" wrote:

Write the start of your macro first on a module sheet. You can write the
whole thing or start with one line and add additional lines later.

Sub Resetform()
Range("A1").ClearContents
.....
(add cells as needed)
End Sub

Using ClearContents will leave formatting and validations intact

Make the reset box a Form Control command button and link it to this macro.
--
If this helps, please remember to click yes.


"MichaelRobert" wrote:

I have a worksheet set up as a data entry page to allow customers to select
features in a product. This data then generates a part number to capture that
particular set of features.

However, this leaves me with the Data Input form populated with the last
customer's selections. How can I write my macro to Reset the form to the
'blank' starting position? I envision having a 'Reset' box in the worksheet
to cue the Macro.

Thanks.

Mike


--

Dave Peterson