Jawed
Legend
Nice. Before long you'll be doing 3D graphics:
http://forum.beyond3d.com/showthread.php?t=47168
Jawed
http://forum.beyond3d.com/showthread.php?t=47168
Jawed
Truly LOL!Nice. Before long you'll be doing 3D graphics:
http://forum.beyond3d.com/showthread.php?t=47168
Jawed
WS_output.Cells(y, 2) = Application.Average(WS_output.Range("B2:B101"))
range(cells(2, 2), cells(y-1, 2)) should work.
Jawed
MS said:Run-time error '1004':
Method 'Range' of object '_Worksheet' failed
Application.Average(Range(WS_output.Cells(2, 2), WS_output.Cells(y-1, 2)))
Sub Random()
Dim myRange As Range
Set myRange = Worksheets("Sheet1").Range("A1:D5")
myRange.Formula = "=RAND()"
myRange.Font.Bold = True
End Sub
Reference Meaning
Range("A1") Cell A1
Range("A1:B5") Cells A1 through B5
Range("C5:D9,G9:H16") A multiple-area selection
Range("A:A") Column A
Range("1:1") Row 1
Range("A:C") Columns A through C
Range("1:5") Rows 1 through 5
Range("1:1,3:3,8:8") Rows 1, 3, and 8
Range("A:A,C:C,F:F") Columns A, C, and F
If WS_input is Nothing Then
end sub
end if