Copy data question

B

brentm

I have a workbook where each tab is a specific week with labor data and
another master tab that generates the invoice for the time over a given week.
Is there a way, from the master invoice tab, to copy the needed labor data
from the appropriate tab - possibly through a prompt or entering the week
ending date in a cell on the master tab? Each weekly tab is identical in
format with the data to be copied residing in cell range C2 - F8.

Thanks.
 
J

Joel

Use an Input box like this

Sub Getweekly()

Do
Set myCell = Application.InputBox( _
prompt:="Select a Cell on a Weekly Labor Tab", _
Type:=8)

WrkSheet = myCell.Worksheet.Name

Loop While (WrkSheet = "Master Invoice")

Sheets(WrkSheet).Range("C2:F8").Copy _
Destination:=Sheets("Master Invoice").Range("C2")
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top