Làm Sao để Excel Biết 1 Số Chia Hết Cho 1 Số (không Có Dư)

Giải Pháp Excel
  • Trang chủ Có gì mới Hoạt động gần nhất Tác giả
  • Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
  • Video New Video về Excel Video về tin học khác Tin tức về tin học chung
  • Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
  • Tài nguyên Đánh giá mới nhất Tìm tài nguyên
  • Facebook
  • Đóng góp
Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

Tìm kiếm

Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Bởi: Tìm kiếm Tìm nâng cao…
  • Tìm bài viết mới
  • Tìm theo chuyên mục
Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

Follow along with the video below to see how to install our site as a web app on your home screen.

Note: This feature may not be available in some browsers.

  • Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc
  • Trang chủ
  • Diễn đàn
  • Giải thích, gỡ rối, xử lý lỗi công thức
You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Làm sao để Excel biết 1 số chia hết cho 1 số (không có dư) (1 người xem)
  • Thread starter Thread starter hieunguyenhr2010
  • Ngày gửi Ngày gửi 29/1/13
Liên hệ QC

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

Đang trực tuyến: 2 (Thành viên: 0, Khách: 2) H

hieunguyenhr2010

Thành viên mới
Tham gia 19/11/10 Bài viết 9 Được thích 1 Hi cả nhà, Bạn nào biết hổ trợ mình nhé, mình đang cần lập 1 công thức như sau, mình nói chi tiết nhé: Nếu A1 chia hết cho 8 thì ghi là "đúng", ngược lại ghi là "sai", chỉ đơn giản vậy thôi nhưng mình không tìm ra cách. Cám ơn cả nhà SA_DQ

SA_DQ

/(hông là gì!
Thành viên danh dự Tham gia 8/6/06 Bài viết 14,799 Được thích 23,268 Nghề nghiệp U80 Nếu A1 chia hết cho 8 thì số dư fép chia = 0 Nếu không chia hết thì số dư > 0 Bạn tiếp tục theo hướng này xem sao? ndu96081631

ndu96081631

Huyền thoại GPE
Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,982
hieunguyenhr2010 đã viết: Hi cả nhà, Bạn nào biết hổ trợ mình nhé, mình đang cần lập 1 công thức như sau, mình nói chi tiết nhé: Nếu A1 chia hết cho 8 thì ghi là "đúng", ngược lại ghi là "sai", chỉ đơn giản vậy thôi nhưng mình không tìm ra cách. Cám ơn cả nhà Nhấp chuột vào đây để mở rộng...
Dùng hàm MOD để lấy số dư Ví dụ =MOD(A1, 8) là để lấy số dư trong phép chia A1 với 8. Vậy nếu kết quả của công thức =0 thì nghĩa là chia hết =IF(MOD(A1, 8), "Sai", "Đúng") ---> Chính là cái bạn cần T

trinhoa

Thành viên mới
Tham gia 27/11/11 Bài viết 1 Được thích 0
ndu96081631 đã viết: Dùng hàm MOD để lấy số dư Ví dụ =MOD(A1, 8) là để lấy số Nhấp chuột vào đây để mở rộng...
ndu96081631 đã viết: /-*+/, thanks bạn nhé, dù đang tìm hiểu về conditional formatting ko liên quan toi thắc mắc của hieunguyenhr2010 nhưng câu trả lời của bạn đã giúp mình! Nhấp chuột vào đây để mở rộng...
N

nonsense

Thành viên mới
Tham gia 22/9/11 Bài viết 15 Được thích 1 minh muon lap cong thuc tim mot so N khi biet N chia a du d1; N chia b du d2; N chia c du d3 voi d1 khac d2 khac d3. vi du: trong tap hop Z co N, khi: N - 1 chia het cho 3 N - 2 chia het cho 5 N - 4 chia het cho 7 tim N ? theo cach giai cua minh thi: so 11 chia 7 se du 4, de no chia cho 3 du 1 va chia 5 du 2 ta chi can cong dan 11 voi 7 cho den khi thỏa mãn điều kiện trên. Các bạn giúp mình với V

VetMini

Đang đi tìm hòn đá
Tham gia 21/12/12 Bài viết 17,867 Được thích 24,792 Nghề nghiệp Thầy bói bài ta Viết tiếng Việt không có dấu là vừa bất lịch sự vừa phạm quy diễn đàn nhé! Sub TimSo() For n7 = 0 to 999999999999999 Step 7 ' trên số này là hết chính xác N = n7 + 4 If (N-2) Mod 5 = 0 Then If (N-1) Mod 3 = 0 Then Exit For End If End If Next n7 MsgBox IIF(N = n7 + 4, N, "khong co") End Sub (Đáp số là 67) SA_DQ

SA_DQ

/(hông là gì!
Thành viên danh dự Tham gia 8/6/06 Bài viết 14,799 Được thích 23,268 Nghề nghiệp U80 Hỏi anh M. Bing & được trả lời: Đoạn mã VBA trên có chức năng tìm và hiển thị ra màn hình 9 số thoả mãn các điều kiện sau: Số đó chia hết cho 7. Số đó cộng 4 chia 5 dư 2. Số đó cộng 4 chia 3 dư 1. Đoạn mã này sử dụng vòng lặp For...Next để duyệt qua các số từ 0 đến 999999999999999, với bước nhảy là 7. Trong mỗi lần lặp, số N được gán giá trị bằng N7 + 4. Sau đó, điều kiện If kiểm tra xem N - 2 có chia hết cho 5 không và N - 1 có chia hết cho 3 không. Nếu cả hai điều kiện này đúng, biến W tăng lên 1 và chuỗi StrC được cập nhật bằng giá trị của Str(N). Khi W đạt giá trị là 9, một hộp thoại thông báo hiển thị chuỗi StrC và quá trình tìm kiếm kết thúc. Đoạn mã này có thể giúp bạn tìm ra các số thoả mãn các điều kiện nêu trên trong phạm vi từ 0 đến 999999999999999. Tuy nhiên, nếu bạn muốn tìm các số thoả mãn các điều kiện khác hoặc trong phạm vi khác, bạn có thể chỉnh sửa mã nguồn tương ứng. Nếu bạn muốn xem các công cụ phân tích mã VBA khác để cải thiện mã của mình, bạn có thể tham khảo các công cụ sau:
  • FMS’s Microsoft Access VBA Coding Tools: Công cụ phân tích mã VBA của FMS được đánh giá cao và được sử dụng rộng rãi1.
  • Aivosto’s VBA Code Review Tools: Công cụ phân tích mã VBA của Aivosto rất toàn diện và chi tiết1.
Hy vọng thông tin này hữu ích với bạn! Nếu bạn có bất kỳ câu hỏi hoặc yêu cầu nào khác, xin vui lòng cho tôi biết. V

Văn Toàn 1996

Thành viên bị đình chỉ hoạt động
Thành viên bị đình chỉ hoạt động Tham gia 5/6/23 Bài viết 106 Được thích 19
hieunguyenhr2010 đã viết: Hi cả nhà, Bạn nào biết hổ trợ mình nhé, mình đang cần lập 1 công thức như sau, mình nói chi tiết nhé: Nếu A1 chia hết cho 8 thì ghi là "đúng", ngược lại ghi là "sai", chỉ đơn giản vậy thôi nhưng mình không tìm ra cách. Cám ơn cả nhà Nhấp chuột vào đây để mở rộng...
1. Ví dụ, giả sử bạn muốn kiểm tra xem số A có chia hết cho số B hay không. 2. Trong một ô trống, nhập công thức "=MOD(A, B)". Ví dụ: "=MOD(10, 5)" sẽ trả về giá trị 0, vì 10 chia hết cho 5. 3. Nếu kết quả trả về là 0, tức là số A chia hết cho số B mà không có phần dư. Nếu không, có phần dư tức là không chia hết. H

HieuCD

Chuyên gia GPE
Tham gia 14/9/10 Bài viết 9,953 Được thích 23,930
nonsense đã viết: minh muon lap cong thuc tim mot so N khi biet N chia a du d1; N chia b du d2; N chia c du d3 voi d1 khac d2 khac d3. vi du: trong tap hop Z co N, khi: N - 1 chia het cho 3 N - 2 chia het cho 5 N - 4 chia het cho 7 tim N ? theo cach giai cua minh thi: so 11 chia 7 se du 4, de no chia cho 3 du 1 va chia 5 du 2 ta chi can cong dan 11 voi 7 cho den khi thỏa mãn điều kiện trên. Các bạn giúp mình với Nhấp chuột vào đây để mở rộng...
Chỉ tìm trong giới hạn từ 1 tới 1000000 Mã: Sao chép. =AGGREGATE(15,6,ROW(1:1000000)/(MOD(ROW(1:1000000),7)=4)/(MOD(ROW(1:1000000),5)=2)/(MOD(ROW(1:1000000),3)=1),1) Lần chỉnh sửa cuối: 30/9/23 SA_DQ

SA_DQ

/(hông là gì!
Thành viên danh dự Tham gia 8/6/06 Bài viết 14,799 Được thích 23,268 Nghề nghiệp U80 Từ macro của bác VietMini sửa lại, ta có kết quả macro sau hơi đặc biệt PHP: Sao chép. Sub TimSoNum() Dim Num As LongLong, W As Integer Dim StrC As String For Num = 21 To 99999999999999# Step 17 If (Num - 1) Mod 11 = 0 And (Num - 2) Mod 13 = 0 Then W = W + 1: StrC = StrC & Str(Num) If W > 9 Then MsgBox StrC: Exit Sub End If End If Next Num MsgBox "Không Tìm Thây Sô Num Thoa Mãn." End Sub Điều thích thú là hàng đơn vị của các số được tìm thấy! N

nonsense

Thành viên mới
Tham gia 22/9/11 Bài viết 15 Được thích 1
SA_DQ đã viết: Hỏi anh M. Bing & được trả lời: Đoạn mã VBA trên có chức năng tìm và hiển thị ra màn hình 9 số thoả mãn các điều kiện sau: Số đó chia hết cho 7. Số đó cộng 4 chia 5 dư 2. Số đó cộng 4 chia 3 dư 1. Đoạn mã này sử dụng vòng lặp For...Next để duyệt qua các số từ 0 đến 999999999999999, với bước nhảy là 7. Trong mỗi lần lặp, số N được gán giá trị bằng N7 + 4. Sau đó, điều kiện If kiểm tra xem N - 2 có chia hết cho 5 không và N - 1 có chia hết cho 3 không. Nếu cả hai điều kiện này đúng, biến W tăng lên 1 và chuỗi StrC được cập nhật bằng giá trị của Str(N). Khi W đạt giá trị là 9, một hộp thoại thông báo hiển thị chuỗi StrC và quá trình tìm kiếm kết thúc. Đoạn mã này có thể giúp bạn tìm ra các số thoả mãn các điều kiện nêu trên trong phạm vi từ 0 đến 999999999999999. Tuy nhiên, nếu bạn muốn tìm các số thoả mãn các điều kiện khác hoặc trong phạm vi khác, bạn có thể chỉnh sửa mã nguồn tương ứng. Nếu bạn muốn xem các công cụ phân tích mã VBA khác để cải thiện mã của mình, bạn có thể tham khảo các công cụ sau:
  • FMS’s Microsoft Access VBA Coding Tools: Công cụ phân tích mã VBA của FMS được đánh giá cao và được sử dụng rộng rãi1.
  • Aivosto’s VBA Code Review Tools: Công cụ phân tích mã VBA của Aivosto rất toàn diện và chi tiết1.
Hy vọng thông tin này hữu ích với bạn! Nếu bạn có bất kỳ câu hỏi hoặc yêu cầu nào khác, xin vui lòng cho tôi biết. Nhấp chuột vào đây để mở rộng...
cũng bài toán trên, liệu co thể thực hiện trên worksheet được không ạ, cách lâp công thức bằng hàm gì, có thể lâp giúp mình bằng 1 hàm tổng quát???? N

nonsense

Thành viên mới
Tham gia 22/9/11 Bài viết 15 Được thích 1 các ban xem giup đoạn code cua minh bị sai chỗ nào mà nó không thực hiện đươc: Sub timA() Dim ranger(3, 3), ranger(5, 4) As Integer For ncells(5, 3) = 0 To 999999 Step Cells(5, 3) N = ncells(5, 3) + Cells(5, 4) If (N - Cells(3, 4)) Mod Cells(3, 4) = 0 Then If (N - Cells(4, 4)) Mod Cells(4, 4) = 0 Then Exit For End If End If Next ncells(5, 3) timA = N Cells(7, 5) = N(N = ncells(5, 3) + Cells(5, 4), N) End Sub

File đính kèm

  • timso.xls timso.xls 40.5 KB · Đọc: 2
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

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

M Bảo mật code VBA autocad!
  • Michael Bit
  • 9/2/26
  • Hỏi đáp những vấn đề khác
Trả lời 15 Đọc 459 Hôm qua, lúc 21:55 YêuCN Y SA_DQ Copilot bình luận các ván cờ vua từng ngày.
    • Thích
  • SA_DQ
  • 3/11/25
  • Chia sẻ
Trả lời 72 Đọc 2K Hôm qua, lúc 20:23 SA_DQ SA_DQ T Sử dụng Google Sheets để tạo webapp nhận báo giá online
  • thuctien
  • Chủ nhật lúc 11:47
  • Google Sheets
Trả lời 0 Đọc 76 Chủ nhật lúc 11:47 thuctien T A
  • Question Question
Đã cách dòng, nhưng có Mã trùng lặp thì báo trùng
  • AnhThu-1976
  • 9/1/26
  • Lập Trình với Excel
Trả lời 14 Đọc 624 Thứ bảy lúc 21:53 ptm0412 ptm0412 phuongnam366377 VNFastSearch – DLL tìm kiếm tiếng Việt tốc độ cao cho Excel VBA
  • phuongnam366377
  • 31/1/26
  • Excel và các ngôn ngữ lập trình khác
Trả lời 2 Đọc 330 Thứ bảy lúc 12:39 Maika8008 Maika8008 SA_DQ Các bạn hãy giúp mình tính tổng số ngày mà Bác Hồ sống trên nhân gian trên trang tính Excel
    • Thích
  • SA_DQ
  • Thứ sáu lúc 04:54
  • Làm việc với ngày tháng và thời gian
Trả lời 3 Đọc 165 Thứ sáu lúc 11:37 SA_DQ SA_DQ SA_DQ Có thể tô màu tiêu đề bài viết để làm nổi bật giữa những tiêu đề các bài đăng khác được chăng?
    • Yêu thích
  • SA_DQ
  • Thứ năm lúc 04:27
  • Những góp ý với diễn đàn
Trả lời 1 Đọc 125 Thứ năm lúc 08:02 Hai Lúa Miền Tây Hai Lúa Miền Tây H Lọc giá trị duy nhất theo cụm
  • hoaiantrinh
  • 10/2/26
  • Hàm và công thức Excel
Trả lời 7 Đọc 281 11/2/26 87kilua 87kilua ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba
    • Thích
    • Yêu thích
    • Cảm ơn
  • ongke0711
  • 6/10/24
  • Lập Trình với Excel
5 6 7 Trả lời 624 Đọc 93K 11/2/26 tombongtep T N Tạo COM Add-In bằng Visual C++
    • Thích
  • nguyendang95
  • 6/7/25
  • Excel và các ngôn ngữ lập trình khác
Trả lời 18 Đọc 2K 10/2/26 nguyendang95 N GPE-Trợ Lý
  • Dán lên cao
  • Suggestion Suggestion
CHÚC MỪNG NĂM MỚI BÍNH NGỌ 2026
    • Thích
    • Yêu thích
    • Cảm ơn
  • GPE-Trợ Lý
  • 10/2/26
  • Bài viết nổi bật và thông báo
Trả lời 0 Đọc 226 10/2/26 GPE-Trợ Lý GPE-Trợ Lý L Thu Chi Gia Đình
    • Cười
  • lehang0812
  • 5/2/26
  • TPHCM
Trả lời 5 Đọc 301 10/2/26 nguoiconxunui N HeSanbi
  • Đã giải quyết
FitRowXL v1.3 - Giãn dòng tự động và bổ trợ in ấn Excel (*01/2026 mới)
    • Thích
    • Yêu thích
  • HeSanbi
  • 18/4/21
  • Lập Trình với Excel
Trả lời 77 Đọc 31K 9/2/26 chothadiem chothadiem HeSanbi
  • Đã giải quyết
LocalizeXL v1.73 - Làm nổi bật ô đang chọn và cuộn trang tự động (phiên bản 2026)
    • Thích
    • Yêu thích
    • Cảm ơn
  • HeSanbi
  • 5/3/21
  • Lập Trình với Excel
Trả lời 85 Đọc 18K 8/2/26 chothadiem chothadiem Nguyễn Duy Tuân
  • Dán lên cao
Phiên bản mới Add-in A-Tools AI v10 (2024)
    • Thích
  • Nguyễn Duy Tuân
  • 13/9/24
  • BLUESOFTS: A-Excel, A-Tools
Trả lời 62 Đọc 13K 7/2/26 Nguyễn Duy Tuân Nguyễn Duy Tuân E Giúp Đặt tên lại (Rename) cho hàng loạt các file PDF theo cùng 1 quy tắc
  • Excel my love_1
  • 15/4/23
  • Tin học mở rộng
Trả lời 4 Đọc 4K 6/2/26 luongha.ktqd L Quang_Hải
  • Question Question
Chia sẻ một thuật toán đơn giản để trộn cells
    • Thích
    • Yêu thích
  • Quang_Hải
  • 4/2/26
  • Lập Trình với Excel
Trả lời 12 Đọc 454 5/2/26 Quang_Hải Quang_Hải HeSanbi TaxCode v4.33 - Tra cứu mã số thuế từ tổng cục thuế, masothue và thuvienphapluat
    • Thích
    • Yêu thích
  • HeSanbi
  • 27/11/25
  • Các Add-ins cho excel
Trả lời 19 Đọc 3K 5/2/26 HeSanbi HeSanbi HeSanbi
  • Question Question
Tạo Add-in, tệp Excel, Word, Access tự động cập nhật phiên bản mới từ Cloud cho chính nó
    • Thích
    • Yêu thích
  • HeSanbi
  • 2/2/26
  • Lập Trình với Excel
Trả lời 1 Đọc 307 4/2/26 HeSanbi HeSanbi TranThanhPhong Hàm EXACT (1 người xem)
    • Thích
  • TranThanhPhong
  • 30/4/14
  • Dự án: Công thức & Hàm 97-2019
Trả lời 3 Đọc 9K 3/2/26 ptm0412 ptm0412 Xem thêm… Chia sẻ: Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

Thành viên có số lượng bài viết cao nhất tháng

  • HeSanbi 14
  • chothadiem 11
  • Michael Bit 7
  • YêuCN 6
  • Gà Công Nghệ 5
  • HieuCD 5
  • DeTong 4
  • Officexinh 4
  • vietdang170 4
  • pycckuu410 3
  • chiendich 3
  • hoanglocphat 3
  • ptm0412 3
  • SA_DQ 3
  • LOGANWover 2
  • VietHoangPhan 2
  • Gà Con yêu VBA 2
  • Quang_Hải 2
  • hoaiantrinh 2
  • thuctien 1

Thành viên có điểm tương tác cao nhất tháng

  • HeSanbi 19
  • GPE-Trợ Lý 11
  • Quang_Hải 7
  • SA_DQ 7
  • HieuCD 6
  • DeTong 5
  • vietdang170 5
  • Gà Con yêu VBA 4
  • LOGANWover 3
  • pycckuu410 3
  • chiendich 3
  • Phuocam 3
  • Hai Lúa Miền Tây 3
  • hungvinh1402 2
  • HUONGHCKT 2
  • huhumalu 2
  • Officexinh 2
  • ptm0412 2
  • Michael Bit 2
  • YêuCN 2

Thời gian đếm ngược.

000 Ngày 00 Giờ 00 phút 00 giây Thân mời tham dự sự kiện sinh nhật GPE 2025
  • Trang chủ
  • Diễn đàn
  • Giải thích, gỡ rối, xử lý lỗi công thức
  • Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…
Back Top Bottom

Từ khóa » Dấu Chia Hết Trong Excel