Hi excel guru's,
Question, Im trying to create a button in sheet Realtime.
When I click the button a macro should run and copy and past the data to the first empty row in sheet Timestamps.
Every row that was copied should get the date from today behind it so we can manage the data per momentum per date.
Any help everyone? No idea on how to do this.
Timestamps.xlsx
Re: Create copies of data and timestamp them
Hi,
no such a good idea, what you will do when your worksheet will be entirely filled - VBA procedure crashing -
or according to its size the opening will become slower & slower ?
To be honest Marc, I need this solution....and I have no idea how.
The timestamps will be 8 times the amount of rows per time.
So not many records
Try this !
According to your attachment a beginner starter VBA procedure :
PHP Code:Sub timestamp()
Dim Rg(1) As Range
Set Rg(0) = [A1].CurrentRegion.Rows("2:" & [A1].CurrentRegion.Rows.Count)
Set Rg(1) = Sheets("Timesttamps").Cells(Rows.Count, 1).End(xlUp)(2)
Rg(0).Copy Rg(1)
Rg(1)(1, Rg(0).Columns.Count + 1).Resize(Rg(0).Count) = Date
Erase Rg
End Sub
► Do you like it ? ► ► So thanks to click on bottom left star icon « ★ Add Reputation » ! ◄ ◄
Last edited by Marc L; 02-09-2023 at 09:14 AM. Reason: optimization ...
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks