Change column references K -> N

master
Dan Howe 6 years ago
parent 63125e7a83
commit 18c80a9391

@ -144,7 +144,7 @@ Sub copytemp()
:=False, Transpose:=False :=False, Transpose:=False
'Copy subcontractor prices 'Copy subcontractor prices
Sheets("Project Information").Select Sheets("Project Information").Select
Range("K71:K75").Select Range("N71:N75").Select
Selection.Copy Selection.Copy
Sheets(projectname).Select Sheets(projectname).Select
Range("C29").Select Range("C29").Select
@ -181,7 +181,7 @@ Sub copytemp()
'Copy expense prices 'Copy expense prices
Sheets("Project Information").Select Sheets("Project Information").Select
Range("K78:K92").Select Range("N78:N92").Select
Selection.Copy Selection.Copy
Sheets(projectname).Select Sheets(projectname).Select
Range("D37").Select Range("D37").Select

@ -4,7 +4,7 @@ Sub Copy_Projectinfo()
' Sheets("Project Information").Select ' Sheets("Project Information").Select
Sheets("Copy_Projectinfo").Visible = True Sheets("Copy_Projectinfo").Visible = True
Sheets("Project Information").Select Sheets("Project Information").Select
Range("B11:K85").Select Range("B11:N85").Select
Selection.Copy Selection.Copy
Sheets("Copy_Projectinfo").Select Sheets("Copy_Projectinfo").Select
Range("A1").Select Range("A1").Select

Loading…
Cancel
Save