Code VBA xóa các ô có giá trị là 0

Liên hệ QC
Tôi tuân thủ nội quy khi đăng bài
Có
V

Văn Toàn 1996

Thành viên hoạt động
Tham gia
5/6/23
Bài viết
102
Được thích
22
Chào các bạn GPE. Mình cần đoạn code VBA để xóa đi các ô có giá trị là 0 ( như hình mô tả ). Nhờ các bạn hỗ trợ. Xin chân thành cảm ơn

1693375485924.png
 
Giải pháp
Tình nghĩa giang hồ
Bạn thử code VBA sau
Viết bình thường:
Mã: 
Sub XoaDuLieu0()
       Dim rng As Range
    
  Range("F3:H1000").Value = Range("B3:D1000").Value
    Set rng = Range("F3:H1000")
    
  
    For Each cell In rng
        If cell.Value = 0 Then
            cell.ClearContents
        End If
    Next cell
End Sub
Bài đã được tự động gộp:

Viết bằng mảng:
Mã: 
Sub XoaDuLieu0()
    Dim rng As Range
    Dim data As Variant
    Dim i As Long, j As Long
    
    Range("F3:H10000").Value = Range("B3:D10000").Value
    Set rng = Range("F3:H10000")
    data = rng.Value
 
    For i = LBound(data, 1) To UBound(data, 1)
        For j = LBound(data, 2) To UBound(data, 2)
            If data(i, j) = 0 Then
                data(i, j) = Empty
            End If...
Sắp xếp theo thời gian sắp xếp theo bầu chọn
... Mình thì Test rất kỷ, Chứ cứ áp dụng thì coi như nát dữ liệu. dù sao cũng cảm ơn bạn
Nhấp chuột vào đây để mở rộng...
Hỏi thật bạn phân biệt thế nào các gía trị của cell = blank, empty, null, "", 0
 
Upvote 0
Thớt mà dùng chỉ dẫn ở bài #3 thì mọi chuyện đã xong từ lâu rồi, chẳng cần phải kót két gì.
 
Upvote 0
TongDe đã viết:
Hỏi thật bạn phân biệt thế nào các gía trị của cell = blank, empty, null, "", 0
Nhấp chuột vào đây để mở rộng...
Bạn có phân biệt thế nào là Ê-Ai hôn? Có thể đối với Ê-Ai thì mấy cái đó chúng có nghĩa khác với đầu óc người thường. :p

Maika8008 đã viết:
Thớt mà dùng chỉ dẫn ở bài #3 thì mọi chuyện đã xong từ lâu rồi, chẳng cần phải kót két gì.
Nhấp chuột vào đây để mở rộng...
Mọi chuyện xong từ lâu rồi bác ạ. Thớt chỉ làm bộ la cà để chứng tỏ trình độ thông minh của mình thôi.
 
Upvote 0
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.
Web KT

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

vova2209
  • Question
Tìm địa chỉ ô với 2đk và chuyển thành links
Trả lời
13
Đọc
208
curet
C
H
  • Question
Xóa toàn bộ các dòng giống nhau ở 1 cột
    • Cười
Trả lời
12
Đọc
72
hadoan-pap
H
pingping2288
Lỗi cứ lần mở lại file excel là font chữ và định dạng ô lại thay đổi
Trả lời
7
Đọc
17
pingping2288
pingping2288
ongke0711
  • Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba
    • Thích
    • Yêu thích
7 8 9
Trả lời
164
Đọc
8K
chstbcaolanh
C
T
Đánh Số Thứ Tự Loại Bỏ Trùng
Trả lời
1
Đọc
19
bebo021999
B
H
Có thể mở file Excel mới sẽ Zoom mặc định 150% không?
Trả lời
4
Đọc
156
VetMini
V
O
  • Question
Tìm số thứ tự của sheet trong workbook có nhiều sheets
Trả lời
11
Đọc
3K
VetMini
V
Manhhung90
Liệt kê các ngày cộng dồn mong muốn vào 1 ô. Nhờ mọi người giúp mình ạ.
2 3 4
Trả lời
62
Đọc
744
VetMini
V
C
Hàm đánh số thứ tự như không đánh dữ liệu trùng
Trả lời
7
Đọc
8K
Trang Tuyet Ngoc Nhi
T
Hai Lúa Miền Tây
  • Question
Hàm chuyển dữ liệu từ cột sang dòng (Hàm melt + wide_to_long của Python trong Excel)
    • Thích
    • Cảm ơn
    • Yêu thích
Trả lời
9
Đọc
461
tranhungdao12a3
T
GPE-Trợ Lý
Đăng ký tham dự hội thảo tại Hà Nội: Power Query - Công cụ quản lý dữ liệu
    • Thích
    • Yêu thích
    • Cảm ơn
Trả lời
4
Đọc
463
PhanTuHuong
PhanTuHuong
tvcneo
  • Question
Nhờ Anh Chị Em giúp mình cách để tạo macro giống như trong file này
Trả lời
17
Đọc
223
huuthang_bd
huuthang_bd
T
Có phải lỗi Excel?
Trả lời
8
Đọc
9K
dinhthang8709
D
T
Công thức lấy dữ liệu
Trả lời
3
Đọc
116
HUONGHCKT
H
S
  • Question
Nhờ anh chị giúp em hàm ngẫu nhiên với tổng là 1 số
Trả lời
6
Đọc
150
SA_DQ
SA_DQ
L
Tự động nhảy số tham chiếu khi sang sheet mới
Trả lời
5
Đọc
5K
Romantic92
R
TieuLong2708
Danh sách lịch cắt người trực
Trả lời
0
Đọc
37
TieuLong2708
TieuLong2708
C
  • Question
Xin giúp đỡ Code kiểm tra và copy dữ liệu từ sheet 1 sang sheet 2
2
Trả lời
21
Đọc
627
conan1
C
H
  • Question
Mong giúp code chuyển file xls sang xlsx hàng loạt và không lỗi số liệu
Trả lời
16
Đọc
370
Hoàng Tuấn 868
H
jenny12345
tổng hợp dữ liệu theo tháng
Trả lời
10
Đọc
248
Hoàng Tuấn 868
H
Xem thêm…

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

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

Back
Top Bottom