Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. lidcimc

    Basic VBA to copy a range if today()

    Getting closer - 1 row copied but the result is 5 duplicate rows pasted - not just the one. Is there something in this line of code that can be tweaked? Range(.[A3], .[A3].End(xlDown)).Offset(1).PasteSpecial xlPasteAll
  2. lidcimc

    Basic VBA to copy a range if today()

    This is what I have so far - I get a "400" error after the copy. Sub CopyRow() Dim Rng As Range Dim i As Range Set Rng = Range("A15", Range("A" & Rows.Count).End(xlUp)) For Each i In Rng If i = Date Then i.EntireRow.Copy Sheets("History...
  3. lidcimc

    Basic VBA to copy a range if today()

    I need to copy a range (col B:col F) if date in col A is today's date. Then I need to paste that data into col B:col F on another worksheet if col A is today's date. My goal is maintain a history file in a hidden sheet. Thoughts?

Part and Inventory Search

Back
Top