Combo box with a Yes or No drop but how do you make the Y a default always entered

[Kurt]

Hello Alll,

How do you make a Yes No combo box always have the default answer as Yes appearing on a user form but still allow the user to change it to NO?

Thanks in advance for all ideas and suggestions.

Kurt

 

[crimson_b1ade]

in your initialize statement, set the value of the combo box to the value that you want:

Private Sub UserForm_Initialize()
 
ComboBox1.Value = "Yes"

End Sub

 

[Kurt]

Thanks crimson_blade that is what I thought it was, I just wanted to confirm.

It worked!!

Along the same lines if I want a cell to start always in cell Dt on a sheet named "Report", then I would have to enter the code in the initialize event of the open worksheet and then when a user form finishes where do I put the code to tell it to always point the cell pointer to cell D5 of a spreadsheet called "Report"?

Again thanks and I would love to hear the responses on this second question.

Kurt

 

[Andrew Poulsom]

Like this?

Application.Goto Worksheets("Report").Range("D5"), True

 

[Kurt]

Hello Andrew and all,

Would it be something like this for the worksheet

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.Goto Worksheets("Report").Range("D5"), True
End Sub

Thanks for your help!

Kurt

 

[Andrew Poulsom]

Do you want to prevent the user from selecting any cell other than D5 on that worksheet?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.Goto Me.Range("D5"), True
End Sub

 

[Kurt]

Yes that would be the best way to go.

 

[Kurt]

Hello Andrew and all,

That works yes, but I have a report that runs and I can't see it after it runs.

So should I put that line of code on the last line of where the report generates?

Thanks,

Kurt

 

[Kurt]

Any ideas out there.

This works but I have a macro that clears the report on that sheet called Report.

Is there something that allows the sheet to shift but still keep the cell in D5?

 

[Andrew Poulsom]

What do you mean by "Is there something that allows the sheet to shift but still keep the cell in D5?"?