Hi,
I know that there are a few examples on how to do this but trial and error and proved to frustrating on this one.
I need to enter data into specific cells and when the macro is run, it copies this data and pastes into the next available(empty) row in my database sheet.
I copied the codebelow code from another thread, however i can't seem to be able to incorporate it into my specific example.
[Range("B3").End(xlDown).Offset(1,0)
Please see below complete code i'm working with, the action needs to be completed twice for different data and then pasted into the emply cell Range for columns B and H:
updatedatabase Macro
'
'
Range("B23:E23").Select
Selection.Copy
Sheets("Database").Select
Range("B175").Select
Selection.End(xlDown).Select
ActiveWindow.SmallScroll Down:=6
Range("B3").End(xlDown).Offset(1,0)
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Top Line Checker").Select
Range("H23:K23").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Database").Select
Range("H3").End(xlDown).Offset(1,0)
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("L186").Select
Sheets("Top Line Checker").Select
Range("I25").Select
End Sub
Any help is greatly appreciated.
Bookmarks