1. Trang chủ
  2. » Công Nghệ Thông Tin

Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013

3 1,1K 1

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 3
Dung lượng 289,25 KB

Các công cụ chuyển đổi và chỉnh sửa cho tài liệu này

Nội dung

Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013 Xóa dòng trống trắng trong excel bằng VBA marco 2007 2010 2013

Trang 1

Xóa dòng trống trắng trong Excel bằng VBA Marco 2007 2010 2013

Marco là chức năng mà không phải ai cũng biết và không phải ai cũng sử dụng được Bởi nó yêu cầu những kiến thức nâng cao về Excel và dòng lệnh Chính vì thế hầu hết người dùng đều "nhăn nhó" khi phải tiếp xúc với chức năng này của Excel

Tuy nhiên hãy tham khảo nội dung dưới đây để biết cách xóa dòng trống trắng trong Excel bằng VBA Marco 2007 2010 2013 Thực chất tất cả các thao tác đều tự động, bạn chỉ cần áp dụng theo các bước dưới đây là thành công

XÓA DÒNG TRỐNG TRẮNG TRONG EXCEL BẰNG VBA MARCO 2007

2010 2013

Tải Excel 2013

Bước 1: Đầu tiên bạn sử dụng tổ hợp phím Alt-F11 để khởi chạy Microsoft Visual basic for application

Trang 2

Bước 2: Tiếp đến bạn copy đoạn mã Marco dưới đây

Sub DeleteBlankRows1()

Dim i As Long

With Application

.Calculation = xlCalculationManual

.ScreenUpdating = False

For i = Selection.Rows.Count To 1 Step -1

If WorksheetFunction.CountA(Selection.Rows(i)) = 0 Then

Selection.Rows(i).EntireRow.Delete

End If

Trang 3

Next i

.Calculation = xlCalculationAutomatic

.ScreenUpdating = True

End With

End Sub

Bước 3: Sau cùng hãy dán đoạn mã vào VBA Marco rồi bấm nút Run để chạy

Ngày đăng: 06/01/2017, 12:04

TỪ KHÓA LIÊN QUAN

TÀI LIỆU CÙNG NGƯỜI DÙNG

TÀI LIỆU LIÊN QUAN

🧩 Sản phẩm bạn có thể quan tâm

w