We can copy paste using timer for graph visualizations and data visualizations. Let’s take an example of a line graph defined by the equation: y =mx +c where x and y define the two points of the line, m defines the slope (how steep the line is) and c defines the y intercept i. e. where the line crosses the y-axis. By making changes in the m value with time we can visualize how the straight-line graph step by step.
Watch the training video below and then look at the detailed VBA code:
This learning video is also available on YouTube.
Public nextRow, Lrow
Sub copypasteUsingTimer()
Dim LastRow
LastRow = Range(“A” & Rows.Count).End(xlUp).Row
Lrow = LastRow
Range(“A” & nextRow + 1).Copy Destination:=Range(“b2”)
myTimer
End Sub
Sub myTimer()
If nextRow + 1 = Lrow Then
nextRow = 1
Exit Sub
Else
nextRow = nextRow + 1
Application.OnTime Now + TimeValue(“00:00:02”), “copypasteUsingTimer”
End If
End Sub
Further reference: