cell select

[deanl33069]

i have this code to open in full screen
Private Sub Workbook_Open()
Application.DisplayFullScreen = True
Application.CommandBars("Full Screen").Visible = False




End Sub
I also want it to open to cell C2
help plz

 

[tyija1995]

Add in to your code:
Range("C2").Select

 

[deanl33069]

if i want c2 to be cleared at exit is this a command ?

 

[Joe4]

if i want c2 to be cleared at exit is this a command ?

You would use something like this:

Range("C2").ClearContents

Inside the Workbook_Close event, though you will need to add a save statement after the lin above to save the file after you have removed the contents.
Or, just put the line above in the Workbook_Open event, so it runs when the workbook opens, rather than when it closes.

 

[deanl33069]

ty once again
I am just learning VBA

 

[Joe4]

You are welcome.
Glad we were able to help.

 

[deanl33069]

Again ty, here is another i need help with.

ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
filename:="C:\release\testpage2.pdf", _
OpenAfterPublish:=False, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
Quality:=xlQualityStandard, _
From:=1, To:=2
End Sub
instead of testpage 2 i would like it to save as "c2".pdf

 

[Joe4]

Try changing this part:

[COLOR=#333333]filename:="C:\release\testpage2.pdf", _

to this":
[/COLOR]

[COLOR=#333333]filename:="C:\release\" & Range("C2") & ".pdf", _

Note, with new questions that are not related (distinctly different) from your previous question, it is best to post them in a new thread, instead of posting them to an existing thread.
That way, they appear as new, unanswered questions in the "Zero Reply Posts" listing that many people use to look for new unanswered questions.[/COLOR]

 

[deanl33069]

Once again I am in your debt....TYVM
Dean