Witam na kursie VBA
Hello world
1 2 3 4 5 6 7 8 9 10 |
Sub HelloWorld()
Cells(1, 1) = "Hello A1" Range("B1") = "Hello B1"
Worksheets("Arkusz1").Cells(2, 1) = "Hello A2" Worksheets("Arkusz1").Range("B2") = "Hello B2"
End Sub |
1 2 3 4 5 6 7 8 9 10 |
Sub CopyCells()
Cells(1, 1).Copy Cells(4, 1)
Range("A1:B2").Copy Range("B4")
End Sub
|