Liệt kê các số tự nhiên có 3 và 4 chữ số (1 người xem)

[maiyeuem113]

Chào anh chị, em mới học về Excel nên còn rất mơ hồ về code. Nay lại nhận được đề tài "Liệt kê tất cả các số tự nhiên có 3 và có 4 chữ số dùng công cụ excel" Mong được mấy anh chị giúp đỡ ạ. Em mò từ sáng giờ trên mạng mà như bơi trong biển nên mới đăng bài hỏi. Mong mọi người giúp, em xin cảm ơn ạ.

 

[vu_tuan_manh_linh]

Nghe vui tai quá! Tôi nghĩ là tại ô A1 đặt số 100, tại ô A2 đặt công thức =A1+1. Sau đó file đến dòng 9899, dòng này sẽ là số 9999. Đấy là cách dùng công thức. Trong lời đề nghị của bạn có nhắc đến CODE, nhưng chưa hiểu có thật sự bạn muốn về code không.

 

[HungQuoc49]

Chào anh chị, em mới học về Excel nên còn rất mơ hồ về code. Nay lại nhận được đề tài "Liệt kê tất cả các số tự nhiên có 3 và có 4 chữ số dùng công cụ excel" Mong được mấy anh chị giúp đỡ ạ. Em mò từ sáng giờ trên mạng mà như bơi trong biển nên mới đăng bài hỏi. Mong mọi người giúp, em xin cảm ơn ạ.

Public Sub LietKe()
Dim i, Kq()
i = 9999 - 100 + 1
ReDim Kq(1 To i, 1 To 1)
For i = 1 To UBound(Kq)
Kq(i, 1) = 100 + i - 1
Next i

With Sheet1
.UsedRange.Clear
.Range("A1").Resize(UBound(Kq), 1) = Kq
End With
End Sub

 

[HieuCD]

nếu bạn thích công thức
3 chữ số

=MID("0123456789",INT((ROWS($1:1)-1)/10^2)+2,1)&MID("0123456789",MOD(INT((ROWS($1:1)-1)/10),10)+1,1)&MID("0123456789",MOD(ROWS($1:1)-1,10)+1,1)

4 chữ số

=MID("0123456789",INT((ROWS($1:1)-1)/10^3)+2,1)&MID("0123456789",MOD(INT((ROWS($1:1)-1)/10^2),10)+1,1)&MID("0123456789",MOD(INT((ROWS($1:1)-1)/10),10)+1,1)&MID("0123456789",MOD(ROWS($1:1)-1,10)+1,1)

copy xuống vừa đủ

 

[befaint]

Chào anh chị, em mới học về Excel nên còn rất mơ hồ về code. Nay lại nhận được đề tài "Liệt kê tất cả các số tự nhiên có 3 và có 4 chữ số dùng công cụ excel" Mong được mấy anh chị giúp đỡ ạ. Em mò từ sáng giờ trên mạng mà như bơi trong biển nên mới đăng bài hỏi. Mong mọi người giúp, em xin cảm ơn ạ.

Gì mà nhì nhằng vậy chời! Vấn đề là liệt kê như nào? Đầu vào được phép nhập vào cái gì?
Công cụ Excel thì giới hạn chức năng gì không? Mở bảng tính lên rồi gõ thôi.
Hỏi kiểu này cũng hay ghê!

 

[VetMini]

Lắm lúc mình cũng phân vân khong hiểu người GV ra đề bài muốn kiểm tra toán số hay khả năng bảng tính trải rộng.

 

[Ba Tê]

Chào anh chị, em mới học về Excel nên còn rất mơ hồ về code. Nay lại nhận được đề tài "Liệt kê tất cả các số tự nhiên có 3 và có 4 chữ số dùng công cụ excel" Mong được mấy anh chị giúp đỡ ạ. Em mò từ sáng giờ trên mạng mà như bơi trong biển nên mới đăng bài hỏi. Mong mọi người giúp, em xin cảm ơn ạ.

Nếu phải dùng công cụ Excel thì bạn làm thế này:
- A1 nhập số 100 (số nhỏ nhất có 3 chữ số)- Đặt vị trí chọn tại ô A1
- Dùng công cụ Fill - Chọn Series (Hình 1)
(Nếu Excel 2003 thì Edit - Fill - Series)
- Làm như hình 2 - OK