Code thay đổi select cell trong sheet khác (1 người xem)

  • Thread starter Thread starter NQ_AT
  • Ngày gửi Ngày gửi

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

NQ_AT

Thành viên chính thức
Tham gia
9/12/14
Bài viết
68
Được thích
9
Xin chào các anh GPE,

Em có vấn đề thế này mà viết code hoài không chạy được.

Trên sheet2 đang select tại ô B3, bây giờ em sang Sheet1 chạy code thì trên Sheet2, ô B3 sẽ chuyển sang B10 ( hoặc ô nào đó do mình chỉ định

>> Mục đích là em đang muốn sử dụng chế độ Worksheet_selection Change của sheet2 (vì sheet2 em để chế độ ẩn).
PHP:
sub changeselectcell()
dim i
with Sheet2
i = .[C2].Value
.Cells(2,i).Select
End With
End sub

Em có tham khảo nhiều code, nhưng toàn phải Active sheet trước rồi sao đó select cell.

Nhờ các anh giúp đỡ.
 
Xin chào các anh GPE,
Trên sheet2 đang select tại ô B3, bây giờ em sang Sheet1 chạy code thì trên Sheet2, ô B3 sẽ chuyển sang B10 ( hoặc ô nào đó do mình chỉ định

>> Mục đích là em đang muốn sử dụng chế độ Worksheet_selection Change của sheet2 (vì sheet2 em để chế độ ẩn).
Em có tham khảo nhiều code, nhưng toàn phải Active sheet trước rồi sao đó select cell.
Nhờ các anh giúp đỡ.
Bạn khai báo thủ tục Worksheet_SelectionChange là Public. Khi nào muốn gọi thủ tục này thì bạn chỉ cần gọi sheet2.Worksheet_SelectionChange r, trong đó r là biến Range cần truyền cho thủ tục.
 
Upvote 0
Bạn khai báo thủ tục Worksheet_SelectionChange là Public. Khi nào muốn gọi thủ tục này thì bạn chỉ cần gọi sheet2.Worksheet_SelectionChange r, trong đó r là biến Range cần truyền cho thủ tục.

Cảm ơn anh, nhưng chưa rõ lắm, anh cho ví dụ thêm nha.
Vậy với Worksheet_Change thì mình cũng dùng cách này được ko anh? Vì dùng code copy thì Worksheet_change vô tác dụng
 
Upvote 0
Trong sheet2, bạn khai báo Public Sub Worksheet_SelectionChange(Byval Target As Range)
Trong sheet1 nếu có các lệnh
Mã:
sheet2.visible=-1
sheet2.activate
range("B10").activate
sheet1.activate
sheet2.visible=2
Các lệnh này nếu chỉ nhằm mục đích gọi thủ tục selectionchange thì bạn thay nhóm lệnh đó bằng lệnh
sheet2.worksheet_selectionchange sheet2.range("B10")
Với worksheet_change khi copy có lẽ không cần vì event tự kích hoạt.
 
Upvote 0

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

Back
Top Bottom