Sau khi chạy 1 macro thì chuyển ActiveCell đến 1 vị trí kế tiếp. (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

tricaominh

Thành viên mới
Tham gia
6/11/09
Bài viết
2
Được thích
0
Mong các bạn giúp!

Mình có 1 macro "đánh số thứ tự " như sau:

Sub danhstt()
'
' danhstt Macro
ActiveCell.FormulaR1C1 = "1"
Selection.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _
Step:=1, Stop:=10, Trend:=False
Selection.End(xlDown).Select
End Sub

Khi chạy xong, thì cell được chọn (ActiveCell) là vị trí thứ 10. Nay mình muốn sau khi chạy xong cell bên cạnh (bên phải cell stt 10) xuất cữ A, sau đó ActiveCell chuyển đến vị trí dưới Cell stt 10 để bắt đầu cho lần đánh stt mới.
 
Web KT

Bài viết mới nhất

Back
Top Bottom