VBA Function: Populating a Range
(AutomateExcel) The following code will populate a given range with a random number between 0 and 1000:
Sub Randomise_Range(Cell_Range As Range)
' Will randomise each cell in Range
Dim Cell
'Turn off screen alerts
Application.ScreenUpdating = False
For Each Cell In
Update update feed set failed_fetches=0, fetched=current_timestamp() where feed_id = 3651 failed: 1142 [UPDATE command denied to user '334187_hdlns_ms5'@'10.187.248.89' for table 'feed'] in [update feed set failed_fetches=0, fetched=current_timestamp() where feed_id = 3651]
updated 3651 (Automate Excel), inserted 0, updated 0, at 2012-05-31 00:58:00
