Macro as make a copy to a new sheet and rename it

[Navy36]

Hi
I looking for help with macro. I want a macro as make a knew sheet and rename it to current date and the knew sheet must make a copy of a master sheet.

Maybe my code is a good start?

Sub AddSheets_TodayDate()
Dim szTodayDate As String
szTodayDate = Format(Date, "mmm-dd-yyyy")
On Error GoTo MakeSheet
Sheets(szTodayDate).Activate
Exit Sub
MakeSheet:
Sheets.Add , Worksheets(Worksheets.Count)
ActiveSheet.Name = szTodayDate
End Sub

I need help

 

[Navy36]

Like what is the name of the sheet your copying. "Master"

And how am I suppose to know what the current date sheet is? If you run the macro on same day it will be same date
Is the current date sheet the one your copying? NO, every time should a new copy be from "Master"

I know, my english is not the best and ihope you will understand me

 

[Navy36]

So since you have a script already what is wrong with your script?

The issues about my script is that not make a new copy of a another sheet("Master")

 

[My Aswer Is This]

Did not understand you wanted my script to do exactly like your script does.
If that's the case what is wrong with your script?

The issues about my script is that not make a new copy of a another sheet("Master")

Where in your orginal script does it say "Master"

 

[Navy36]

Did not understand you wanted my script to do exactly like your script does.
If that's the case what is wrong with your script?

Where in your orginal script does it say "Master"

It doesnt.... But i want it

What i want is a first sheet with a button. and when you push on the button i will make a new sheet and rename it do current day and i will also have a form white some questions there i could fill in the form. If you push the buttom same day should only the current date sheet show up so i can read it or fill in more information in it

 

[My Aswer Is This]

Now your asking for:
and i will also have a form white some questions there i could fill in the form. If you push the buttom same day should only the current date sheet show up so i can read it or fill in more information in it

This is beyond my knowledgebase.
I will continue to monitor this thread to see what I can learn.

 

[Navy36]

Now your asking for:
and i will also have a form white some questions there i could fill in the form. If you push the buttom same day should only the current date sheet show up so i can read it or fill in more information in it

This is beyond my knowledgebase.
I will continue to monitor this thread to see what I can learn.

I thank you for your help

And hope someone else can help me

 

[Fluff]

How about

Sub Navy()
   Dim ShtName As String
   
   ShtName = Format(Date, "mmm-dd-yyyy")
   If Evaluate("isref('" & ShtName & "'!A1)") Then
      Sheets(ShtName).Activate
   Else
      Sheets("Master").Copy , Sheets(Sheets.Count)
      ActiveSheet.Name = ShtName
   End If
End Sub

 

[Navy36]

How about

Sub Navy()
   Dim ShtName As String
  
   ShtName = Format(Date, "mmm-dd-yyyy")
   If Evaluate("isref('" & ShtName & "'!A1)") Then
      Sheets(ShtName).Activate
   Else
      Sheets("Master").Copy , Sheets(Sheets.Count)
      ActiveSheet.Name = ShtName
   End If
End Sub

I think you solved my problem, but i need try it a couple of days.
Thank you

 

[Fluff]

Glad we could help & thanks for the feedback.

 

[Navy36]

Glad we could help & thanks for the feedback.

It works great, Big THANKS