Code ẩn hiện cột bị lỗi

Liên hệ QC

Bùi Thúy Thúy

Thành viên thường trực
Tham gia
2/7/18
Bài viết
289
Được thích
38
E có chạy đoạn code thấy báo lỗi
khi Em copy mã code sang file định dạng xls nó vẫn chạy mà ở file này nó báo lỗi
Nhờ Anh Chị giúp em3231123.jpg
 

File đính kèm

  • co gi ma ngai dau em.xlsm
    1.9 MB · Đọc: 16
E có chạy đoạn code thấy báo lỗi
khi Em copy mã code sang file định dạng xls nó vẫn chạy mà ở file này nó báo lỗi
Nhờ Anh Chị giúp emView attachment 200721
Cái Code kia nó không nằm trong Module kìa
Mình viết như vầy thì nó chậy phà phà nè
Mã:
Sub Hide_Column_A()
Dim Tmp As Range
    Set Tmp = Range("A:B,F:F,H:H").EntireColumn
    Tmp.Hidden = Not Tmp.Hidden
End Sub
 
Upvote 0
Cái Code kia nó không nằm trong Module kìa
Mình viết như vầy thì nó chậy phà phà nè
Mã:
Sub Hide_Column_A()
Dim Tmp As Range
    Set Tmp = Range("A:B,F:F,H:H").EntireColumn
    Tmp.Hidden = Not Tmp.Hidden
End Sub
Em cám ơn Chị, E coppy sang file khác cho nó vào module hay sheet nào đó vẫn chạy mà chị
 
Upvote 0
Phần mềm của người ta đang hoàn tráng cỡ rứa mà 2 bà này cắm râu thêm ria vào thấy phát khiếp. Râu nó dài hơn đầu gối rồi kìa :eek::eek::eek:
Mai tác giả họ kiện vi phạm quyền tác giả đó nha :p:p:p
 
Upvote 0
Phần mềm của người ta đang hoàn tráng cỡ rứa mà 2 bà này cắm râu thêm ria vào thấy phát khiếp. Râu nó dài hơn đầu gối rồi kìa :eek::eek::eek:
Mai tác giả họ kiện vi phạm quyền tác giả đó nha :p:p:p
Không sao chị, chị Test lại giúp e xem, e đua code chị sửa đó vào mà chạy k được chị ạ! hi
 
Upvote 0
Upvote 0
Thì nó vẫn chạy nhưng khác nhau tại chỗ "gạch đít" màu đỏ
View attachment 200724
E cám ơn chị, giờ nó chạy phê phê thật!:icon_sadangel2:
Bài đã được tự động gộp:

Phần mềm của người ta đang hoàn tráng cỡ rứa mà 2 bà này cắm râu thêm ria vào thấy phát khiếp. Râu nó dài hơn đầu gối rồi kìa :eek::eek::eek:
Mai tác giả họ kiện vi phạm quyền tác giả đó nha :p:p:p
Cái đó râu cũng dài, nên lên đến gần 2MB, E cắm cho nó mấy cái cho nó phình code lên:love:
 
Upvote 0
Nó chạy phè phè nè :yahoo:
Lý do sửa:Thu hồi Video
 
Upvote 0
Phần mềm của người ta đang hoàn tráng cỡ rứa mà 2 bà này cắm râu thêm ria vào thấy phát khiếp. Râu nó dài hơn đầu gối rồi kìa :eek::eek::eek:
Mai tác giả họ kiện vi phạm quyền tác giả đó nha :p:p:p
Hoành tráng thật, máy mình mở lên treo luôn (giờ vẫn đang treo)
Tôi nghiệp con laptop già của mình, nó không chịu được sự "đả kích" lớn đến vậy. Giờ cứu nó bằng cách nào đây người đẹp?
 
Upvote 0
Hoành tráng thật, máy mình mở lên treo luôn (giờ vẫn đang treo)
Tôi nghiệp con laptop già của mình, nó không chịu được sự "đả kích" lớn đến vậy. Giờ cứu nó bằng cách nào đây người đẹp?
Máy "già quá" thì đổi máy khác. Cái nào chết thì bỏ, "mần lại" từ đầu.
Có file có vài chục Module, mỗi Module vài chục Sub, mỗi Sub của 1 người khác nhau, Xem xong "đắm đuối" luôn nhưng nó lại là một chương trình "hoành tráng", có bản quyền, có password "đờn quàng", bất khả xâm ..."".
Ẹc..
 
Upvote 0
Máy "già quá" thì đổi máy khác. Cái nào chết thì bỏ, "mần lại" từ đầu.
Ẹc..
Đang mở 1 chương trình khác và đang viết code anh ơi. Vậy là phải "giết" luôn thằng em mình à anh. Chết cái cmn rồi, 4 trang code giờ viết lại là yếu luôn 2 môn đó anh
 
Upvote 0
Đang mở 1 chương trình khác và đang viết code anh ơi. Vậy là phải "giết" luôn thằng em mình à anh. Chết cái cmn rồi, 4 trang code giờ viết lại là yếu luôn 2 môn đó anh
Sau này xài 2 máy, 1 máy viết code, 1 máy tải và xem file "hoành tráng".
Hết đụng hàng. Ẹc..
 
Upvote 0
Đang mở 1 chương trình khác và đang viết code anh ơi. Vậy là phải "giết" luôn thằng em mình à anh. Chết cái cmn rồi, 4 trang code giờ viết lại là yếu luôn 2 môn đó anh
Vậy thì thành thật chia buồn với Thầy :eek::eek::eek:
Em cũng một số lần bị quay quay. Thế là en dí chuột xuống Taskbar bấm vào nút "x" thế là được
 
Upvote 0
Hoành tráng thật, máy mình mở lên treo luôn (giờ vẫn đang treo)
Tôi nghiệp con laptop già của mình, nó không chịu được sự "đả kích" lớn đến vậy. Giờ cứu nó bằng cách nào đây người đẹp?
Tại file của e nó nặng Thầy ạ! giờ làm thế nào để nó giảm bớt dung lượng file vậy ạ!
Bài đã được tự động gộp:

Thì nó vẫn chạy nhưng khác nhau tại chỗ "gạch đít" màu đỏ
View attachment 200724
Chị ơi giúp E ý tường này chút: cũng ở file trên nhờ Chị:
Trong vùng chọn từ Cột R đến Cột AD:
Tạo nút "điều khiển biểu mẫu"
Nhấn vào nút "điều khiển biểu mẫu" sẽ ẩn hết các cột trog vùng từ R:AD chỉ hiện cột T, Cột W, cột AD
Nhấn lần nữa sẽ tác dụng ngược lại (trong vùng từ R:AD, sẽ hiện tất cả, chỉ ẩn cột cột T, Cột W, cột AD)
Bài đã được tự động gộp:

Cái Code kia nó không nằm trong Module kìa
Mình viết như vầy thì nó chậy phà phà nè
Mã:
Sub Hide_Column_A()
Dim Tmp As Range
    Set Tmp = Range("A:B,F:F,H:H").EntireColumn
    Tmp.Hidden = Not Tmp.Hidden
End Sub
Chị xinh gái v
Nó chạy phè phè nè :yahoo:
Lý do sửa:Thu hồi Video
Chị ơi vào tham mưu giúp E bài #14 nhé!hi
 
Lần chỉnh sửa cuối:
Upvote 0
Tại file của e nó nặng Thầy ạ! giờ làm thế nào để nó giảm bớt dung lượng file vậy ạ!
Bài đã được tự động gộp:


Chị ơi giúp E ý tường này chút: cũng ở file trên nhờ Chị:
Trong vùng chọn từ Cột R đến Cột AD:
Tạo nút "điều khiển biểu mẫu"
Nhấn vào nút "điều khiển biểu mẫu" sẽ ẩn hết các cột trog vùng từ R:AD chỉ hiện cột T, Cột W, cột AD
Nhấn lần nữa sẽ tác dụng ngược lại (trong vùng từ R:AD, sẽ hiện tất cả, chỉ ẩn cột cột T, Cột W, cột AD)
Bài đã được tự động gộp:


Chị xinh gái v

Chị ơi vào tham mưu giúp E bài #14 nhé!hi
Em không tơi kiểu dương củ cà rốt nữa đâu. Chán rùi ... Mà cái này đã thấy ử Topic bên kia rồi mà (Ẩn giờ, ẩn mẫu BB đó)
 
Upvote 0
Web KT
Back
Top Bottom