Small amendment needed in code

[Ironman]

Hi

The below code (which I didn't write) includes a data validation entry.

Right now, the data validation applies to whichever sheet I run the macro in.

What I'm after is for the data validation code to only run in sheet1.

Sub Fillcell(Worksheet As Integer, color As Integer, cValue As String)

Application.EnableEvents = False
If Worksheet = 2 Or 14 Then
With Selection
.Font.Name = "Wingdings"
.Font.Size = 12
.Font.ColorIndex = 1
.Value = cValue
With Selection.Validation
        .Delete
        .Add Type:=xlValidateInputOnly, AlertStyle:=xlValidAlertStop, Operator _
        :=xlBetween
        .IgnoreBlank = True
        .InCellDropdown = False
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = "Double click for lifetime mileage total up to this date"
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
End With
End If

With Selection.Interior
.ColorIndex = color
.Pattern = xlSolid
End With

Application.EnableEvents = True
End Sub

Many thanks!

 

[Rick Rothstein]

Hi Rick, it's actually Training Log

Then change this line of code from the code I posted in Message #5 ...

If ActiveSheet.Name = "Sheet1" Then

to this...

If ActiveSheet.Name = "Training Log" Then

 

[Ironman]

Perfect, it works brilliantly now - thank you ever so much Rick.

I thought Sheet1 would be recognised, clearly not!

I clicked on your mini blog earlier and OMG your depth of knowledge is astounding, I feel so inferior!

 

[Rick Rothstein]

I clicked on your mini blog earlier and OMG your depth of knowledge is astounding,

Thank you, that is very kind of you to say. Just so you know, there are other volunteers here who know more than I do... I am just happy I am able to be of assistance to some of those who come here for answers to questions they have.

I feel so inferior!

Don't... if you can get the code you want to work, then that is all that really matters. As for what I know programming-wise... I have been programming since 1981 and have literally written code every day since. After 35+ years, you kind learn a thing or two as well as develop your own programming techniques in the process.

 

[Ironman]

Thanks again Rick - this forum is certainly full of amazing (and patient!) folk.

Best regards