austenr
08-19-2010, 09:47 AM
I have a bunch of these:
If Sheets("Input + Wksheet").Range("G6").Value >= 65 And Sheets("Input + Wksheet").Range("G7").Value >= 65 _
And Sheets("Input + Wksheet").CheckBoxes("Check Box 85").Value = xlOn Then
With Sheets("Direct Bill Only")
.Range("I12").Value = "X"
.Range("E25").Formula = "=vlookup(YearsofService, Indemnity, 14, False)/12"
.Range("F25").Formula = "=(Indemnity!o42/12)-e25"
.Range("J25").Formula = "=(VLOOKUP(YearsOfService,Indemnity,14,FALSE) + VLOOKUP(YearsOfService,Indemnity,15,FALSE))/12"
.Range("K25").Formula = "=(indemnity!O42 + indemnity!P42)/12 - J25"
End With
With Sheets("Direct Bill with RIA")
.Range("I11").Value = "X"
.Range("E20").Formula = "=vlookup(YearsofService, Indemnity, 14, False)/12"
.Range("F20").Formula = "=(Indemnity!o42/12)-e20"
.Range("J20").Formula = "=(VLOOKUP(YearsOfService,Indemnity,14,FALSE) + VLOOKUP(YearsOfService,Indemnity,15,FALSE))/12"
.Range("K20").Formula = "=(indemnity!O42 + indemnity!P42)/12 - J20"
End With
End If
in a sub. Is there a way to somehow put them in a menu and select them?
If Sheets("Input + Wksheet").Range("G6").Value >= 65 And Sheets("Input + Wksheet").Range("G7").Value >= 65 _
And Sheets("Input + Wksheet").CheckBoxes("Check Box 85").Value = xlOn Then
With Sheets("Direct Bill Only")
.Range("I12").Value = "X"
.Range("E25").Formula = "=vlookup(YearsofService, Indemnity, 14, False)/12"
.Range("F25").Formula = "=(Indemnity!o42/12)-e25"
.Range("J25").Formula = "=(VLOOKUP(YearsOfService,Indemnity,14,FALSE) + VLOOKUP(YearsOfService,Indemnity,15,FALSE))/12"
.Range("K25").Formula = "=(indemnity!O42 + indemnity!P42)/12 - J25"
End With
With Sheets("Direct Bill with RIA")
.Range("I11").Value = "X"
.Range("E20").Formula = "=vlookup(YearsofService, Indemnity, 14, False)/12"
.Range("F20").Formula = "=(Indemnity!o42/12)-e20"
.Range("J20").Formula = "=(VLOOKUP(YearsOfService,Indemnity,14,FALSE) + VLOOKUP(YearsOfService,Indemnity,15,FALSE))/12"
.Range("K20").Formula = "=(indemnity!O42 + indemnity!P42)/12 - J20"
End With
End If
in a sub. Is there a way to somehow put them in a menu and select them?