Need to Hide the Active sheet

[Vipullade]

HI

I am using the below mentioned code to call a dataform, I do not want the datasheet to be shown when this is done, please help.

Private Sub CommandButton5_Click()

Worksheets("Main Data Sheet").Activate
ActiveCell.Activate
Worksheets("Main Data Sheet").Range("A2").Select
ActiveCell.CurrentRegion.Name = "Database"

ActiveSheet.ShowDataForm

End Sub

 

[YasserKhalil]

Try this code

Private Sub CommandButton5_Click()
    Application.Goto Worksheets("Main Data Sheet").Range("A2")
    ActiveCell.Value = "Database"
    ActiveSheet.ShowDataForm
End Sub

 

[Belleke]

Is this what you mean?
See attached.
Further you should learn to have a good look at the code you are using.
For example you have ActiveCell.Activate
What does ActiveCell means, yes it is active, so there in no need to activate.
Second, you should avoid Select and Activate, it slows down code big time and it is almost never necessary.

 

[Vipullade]

Try this code

Private Sub CommandButton5_Click()
    Application.Goto Worksheets("Main Data Sheet").Range("A2")
    ActiveCell.Value = "Database"
    ActiveSheet.ShowDataForm
End Sub

unfortunately this code give an error 438

 

[Vipullade]

Is this what you mean?
See attached.
Further you should learn to have a good look at the code you are using.
For example you have ActiveCell.Activate
What does ActiveCell means, yes it is active, so there in no need to activate.
Second, you should avoid Select and Activate, it slows down code big time and it is almost never necessary.

Belleke - Thanks, that's what I needed, I wanted to hide the "Main data Sheet", which I tested on your sheet and it works well

Again thanks, i got carried away with the code....

 

[Belleke]

i got carried away with the code....

Happens to all of us.