copy dynamic range to another sheet

**barkarlo** · 02-07-2009, 10:04 AM

I make this code:
Sub macro4()
Dim mymonth As String
mymonth = Application.Worksheets("drivers").Range("b1")
Application.ScreenUpdating = False
Select Case mymonth
Case "1"
Sheets("drivers").Select
Range("d5:d36").Copy
Sheets("overtime").Select
Range("v2:v36").Select
Selection.PasteSpecial Paste:=xlPasteValues, operation:=xlNone, skipblanks:=False, Transpose:=False
Application.CutCopyMode = False
Case "2"
Sheets("drivers").Select
Range("d5:d36").Copy
Sheets("overtime").Select
Range("w2:w36").Select
Selection.PasteSpecial Paste:=xlPasteValues, operation:=xlNone, skipblanks:=False, Transpose:=False
Application.CutCopyMode = False
End Select
End Sub
In this code I must condition who will compare range of employees in the sheets "overtime"(column P2:P40) and range of employees in the sheets "drivers"(column A2:a36).Afterwards when I run code value of working hours will be put in adequate cells.
E.C. if employee "John" is in second row in the sheets "driver" and in fourth
row in the sheets "overtime" value of working hours must be in fourth row

**mewingkitty** · 02-07-2009, 01:06 PM

if employee "John" is in second row in the sheets "driver" and in fourth
row in the sheets "overtime" value of working hours must be in fourth row

value of working hours will be put in adequate cells

A sample workbook would be extremely helpful.

Also, please wrap your code with the

Please Login or Register  to view this content.

button, it's the one that looks like a number sign. This is a forum rule.

**VBA Noob** · 02-07-2009, 01:08 PM

Thanks mewingkitty,

barkarlo, Please read the below and then edit you're post to include code tags

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here

Many thanks

VBA Noob

copy dynamic range to another sheet

LinkBack

Thread Tools

Display

copy dynamic range to another sheet

Re: copy dynamic range to another sheet

Re: copy dynamic range to another sheet

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions