Wednesday, March 15, 2017

For Loop to print 1 to 10

Sub Print1to10()

Dim i As Integer
    For i = 1 To 10
        Range("A" & i).Value = i
    Next
 
End Sub
at
Labels:

No comments:

Post a Comment

Subscribe to: Post Comments (Atom)

*INTERVIEW QUESTIONS

* Ques 01. What is the difference between ByVal and ByRef and which is default ? Ans-  ByRef : If you pass an argument by reference when...

  • Text File
    ''TextStream Object ' 'Description ' 'Facilitates sequential access to file. ' 'Syntax ' 'T...
  • Miscellaneous Exercise 2
    'Check filter is applied on the sheet or not if not apply filter on it Sub autofilteron() Sheet3.Activate If Not ActiveSheet.AutoFi...
  • WorkSheet
    'Worksheet Object 'Represents a worksheet. 'Remarks ' ' 'The Worksheet object is a member of the Worksheets co...