ENTER vẫn thêm hàng mới mặc dù đã ẩn đến cuối dong của Excel

Liên hệ QC

phuyen89

Thành viên tích cực
Tham gia
20/11/08
Bài viết
875
Được thích
341
Nghề nghiệp
Student
Chào anh em GPE.Cho mình hỏi vấn đề này, để giới hạn thanh cuộn,em thường dùng chức năng là ẩn dòng và cột.Nhưng mà khi đụng đến dòng cuối,khoảng dòng 20 thôi.Thì em ENTER nó lại không thêm dòng mới được.Phải mở hàng ẩn ra.
- Như thế thì có cách nào để ENTER vấn thêm một hàng mới, mà không cần phải mở chức năng ẩn không?
 
Chào anh em GPE.Cho mình hỏi vấn đề này, để giới hạn thanh cuộn,em thường dùng chức năng là ẩn dòng và cột.Nhưng mà khi đụng đến dòng cuối,khoảng dòng 20 thôi.Thì em ENTER nó lại không thêm dòng mới được.Phải mở hàng ẩn ra.
- Như thế thì có cách nào để ENTER vấn thêm một hàng mới, mà không cần phải mở chức năng ẩn không?
-Theo cách diễn tả của bạn chắc là phải dùng đến VBA, dùng hàm đếm số dòng + 1 để cho nó ẩn cũng như hiện thêm dòng mới.
-Nếu không muốn dùng VBA thì bạn có thể dùng List cho trường hợp này. List có ưu điểm là hổ trợ thêm dòng tính toán dưới cùng của List.
Mình tin là bạn làm được. Bạn thử nhé.
 
Mình nêu trường hợp thế này, từ đó cũng là 1 hướng giải quyết:-Tại dòng cuối cùng bạn Insert 1 dòng xem sao
Và từ ý tưởng này bạn test thử code sau xem sao

Mã:
Sub them()
Dim rg As Range
Set rg = Sheet1.Range("a1").SpecialCells(xlCellTypeVisible)
Rows(rg.Rows.Count + 1).Insert
End Sub
Kèm theo là 1 ví dụ, nhưng mình dùng phím F5 . Con trỏ tự động về đầu dòng mới
 

File đính kèm

Lần chỉnh sửa cuối:
Mình nêu trường hợp thế này, từ đó cũng là 1 hướng giải quyết:-Tại dòng cuối cùng bạn Insert 1 dòng xem sao
Và từ ý tưởng này bạn test thử code sau xem sao

Mã:
Sub them()
Dim rg As Range
Set rg = Sheet1.Range("a1").SpecialCells(xlCellTypeVisible)
Rows(rg.Rows.Count + 1)[B][COLOR=Blue].Insert[/COLOR][/B]
End Sub
Kèm theo là 1 ví dụ, nhưng mình dùng phím F5

Theo em thì nên thay thêm dòng thành bỏ ẩn dòng.
Mã:
Rows(rg.Rows.Count + 1).EntireRow.Hidden = False
 
Chào anh em GPE.Cho mình hỏi vấn đề này, để giới hạn thanh cuộn,em thường dùng chức năng là ẩn dòng và cột.Nhưng mà khi đụng đến dòng cuối,khoảng dòng 20 thôi.Thì em ENTER nó lại không thêm dòng mới được.Phải mở hàng ẩn ra.
- Như thế thì có cách nào để ENTER vấn thêm một hàng mới, mà không cần phải mở chức năng ẩn không?
Yêu cầu chẳng phải là không thực hiện được, có điều tôi thấy nó khá buồn cười! Này nhé:
- Ta giới hạn dòng, cột đến đâu là việc ta phải tính trước
- Vì chưa biết cần giới hạn đến đâu mà cứ ẩn đại dòng cột, đến khi cần lại phải "lôi cổ" ra
Đúng là tự gây rắc rối cho mình
Vậy cứ nhập bình thường đi, đến lúc kết thúc ta sẽ ẩn dòng cột 1 lần là xong!
 
A Dom ơi, ngoài ẩn dòng bạn ấy còn ẩn cột nữa. Dom dùng entirerow e không ổn. Việc chèn thêm nó cũng có cái hay là nó chép cả định dạng dòng trên xuống trong khi dòng ẩn không được cập nhật do người dùng thay đổi.
 
A Dom ơi, ngoài ẩn dòng bạn ấy còn ẩn cột nữa. Dom dùng entirerow e không ổn. Việc chèn thêm nó cũng có cái hay là nó chép cả định dạng dòng trên xuống trong khi dòng ẩn không được cập nhật do người dùng thay đổi.
Dạ là em làm trên sổ kế toán,số cột nó cố địn làm bao nhiêu,chỉ có số dong là hơi nhiều thôi
 
Web KT

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

Back
Top Bottom