|
|
@ -127,7 +127,7 @@ Sub copytemp()
|
|
|
|
Range("G2").Select
|
|
|
|
Range("G2").Select
|
|
|
|
Selection.Copy
|
|
|
|
Selection.Copy
|
|
|
|
Sheets(projectname).Select
|
|
|
|
Sheets(projectname).Select
|
|
|
|
Range("S29").Select
|
|
|
|
Range("S35").Select
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
:=False, Transpose:=False
|
|
|
|
:=False, Transpose:=False
|
|
|
|
Range("S37").Select
|
|
|
|
Range("S37").Select
|
|
|
@ -139,7 +139,7 @@ Sub copytemp()
|
|
|
|
Range("C71:C75").Select
|
|
|
|
Range("C71:C75").Select
|
|
|
|
Selection.Copy
|
|
|
|
Selection.Copy
|
|
|
|
Sheets(projectname).Select
|
|
|
|
Sheets(projectname).Select
|
|
|
|
Range("A29").Select
|
|
|
|
Range("A35").Select
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
:=False, Transpose:=False
|
|
|
|
:=False, Transpose:=False
|
|
|
|
'Copy subcontractor prices
|
|
|
|
'Copy subcontractor prices
|
|
|
@ -147,10 +147,10 @@ Sub copytemp()
|
|
|
|
Range("N71:N75").Select
|
|
|
|
Range("N71:N75").Select
|
|
|
|
Selection.Copy
|
|
|
|
Selection.Copy
|
|
|
|
Sheets(projectname).Select
|
|
|
|
Sheets(projectname).Select
|
|
|
|
Range("C29").Select
|
|
|
|
Range("C35").Select
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
:=False, Transpose:=False
|
|
|
|
:=False, Transpose:=False
|
|
|
|
Range("F29").Select
|
|
|
|
Range("F35").Select
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
:=False, Transpose:=False
|
|
|
|
:=False, Transpose:=False
|
|
|
|
'Copy subcontractor markups
|
|
|
|
'Copy subcontractor markups
|
|
|
@ -158,7 +158,7 @@ Sub copytemp()
|
|
|
|
Range("M71:M75").Select
|
|
|
|
Range("M71:M75").Select
|
|
|
|
Selection.Copy
|
|
|
|
Selection.Copy
|
|
|
|
Sheets(projectname).Select
|
|
|
|
Sheets(projectname).Select
|
|
|
|
Range("G29").Select
|
|
|
|
Range("G35").Select
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
|
|
|
|
:=False, Transpose:=False
|
|
|
|
:=False, Transpose:=False
|
|
|
|
|
|
|
|
|
|
|
|