Gitiho contest
Cùng gitiho contest chinh phục kiến thức, khẳng định bản thân với hệ thống bài test phong phú, đầy đủ các chủ đề để bạn khám phá.
Gitiho for leading business
Tối ưu và đơn giản hóa hoạt động đào tạo tại doanh nghiệp. Sẵn sàng nền tảng, nội dung đào tạo cho tất cả các vị trí, bộ phận. Ứng dụng MIỄN PHÍ ngay vào doanh nghiệp chỉ với MỘT click.
Đã được tin tưởng sử dụng bởi các doanh nghiệp
Sub col_bangtinh() Dim i n As Double Dim j As Integer n = 2020 2018 For j = 0 To
Sub col_bangtinh()
Dim i, n As Double
Dim j As Integer
n = 2020 - 2018
For j = 0 To n
For i = 0 To n
Sheet1.Cells(1, 1 + i * 3).Value = 2018 + j
Next i
Next j
End Sub
Thầy ơi, em muốn dùng For viết theo thứ tự từ năm 2018 đến 2020 và mỗi năm cách nhau 2 ô nhưng kết quả lại ra 3 ô đều là 2020. Em sai chỗ nào ạ?
3 câu trả lời
222 lượt xem
vỗ tay
Chào bạn bạn thử xem đúng không nhé:
Sub ghidulieu()
Dim i As Long, j As Long
i = 2018
For j = 1 To 5 Step 2
Sheet1.Cells(1, j).Value = i
i = i + 1
Next j
End Sub
vỗ tay
dạ, e muốn để biến n tùy chọn (n là số năm = năm kết thúc - năm bắt đầu) nên code này em không áp dụng được.
vỗ tay
chào bạn bạn thử thay phần 5 bằng n = năm kết thúc - năm bắt đầu
vỗ tay
Câu hỏi liên quan
Top
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông