T
teartear
Guest
- 16/1/16
- 3
- 0
- 1
- 36
Mình không biết làm macros thế nào, vì thế có thể làm hướng dẫn dùm mình được không. cảm ơnchọn đến cell chứa số cần insert, sau đó chạy code này:
Sub test()
s = ActiveCell.Value
For i = 1 To s
ActiveCell.Offset(1).EntireRow.Insert
Next i
End Sub
Với lệnh này thì nó chỉ mới chạy dòng đầu tiên mình chọn thôi chứ không tự động chạy tất cả các dòng khác.mà ở đây mình đang muốn chạy đồng thời tất cả các dòng có số cần insert, Có thể giúp mình viết thêm lệnh để hoàn chỉnh phần này hơn không?chọn đến cell chứa số cần insert, sau đó chạy code này:
Sub test()
s = ActiveCell.Value
For i = 1 To s
ActiveCell.Offset(1).EntireRow.Insert
Next i
End Sub