hi,
replace the msgbox with
it will write the values into sheet1, row2, A:C.![]()
With ThisWorkbook.Worksheets("Sheet1") .Range(.Cells(2, 1), .Cells(2, 3)).Value2 = Array(count, avg, min) End With
Regards
hi,
replace the msgbox with
it will write the values into sheet1, row2, A:C.![]()
With ThisWorkbook.Worksheets("Sheet1") .Range(.Cells(2, 1), .Cells(2, 3)).Value2 = Array(count, avg, min) End With
Regards
Please use [CODE]-TAGS
When your problem is solved mark the thread SOLVED
If an answer has helped you please clickto give reputation
Read the FORUM RULES
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks