Debug code

In the second sub, there is a line that is exactly the same as the one in the first sub and it starts with "if PW..."

Should I erase it ?

Originally Posted by gmr4evr1

It shouldn't ask for the password twice. If someone enters the wrong password, it will exit the sub and not call the second sub. Try this

Option Explicit

Sub Refresh()

Dim X As Variant
Dim PW As String

PW = InputBox("Please enter password below", "Password", "")

If PW <> "SALARY" Then
        MsgBox "Incorrect Password"
        Exit Sub
Else

Application.ScreenUpdating = False
Sheets("Finess-Actuals").Visible = True

Sheets("Finess-Actuals").Select
Range("A2:AL290").Select

Sheets("Refresh & Upload").Select

Sheets("Finess-Actuals").Visible = xlSheetVeryHidden
Application.ScreenUpdating = True

Call secondSub '<----- Your second sub name

MsgBox "Your Budget Refresh is Complete!"

End If

End Sub