Nhờ sửa code Chọn Sheet theo yêu cầu (1 người xem)

[khaothibaclieu]

Nhờ các bạn giúp mình sửa lại code ở Sheet "Main".
Yêu cầu là khi mình thay đổi dữ liệu ở ô F5 của Sheet "Main" thì sẽ chọn được ô A1 của Sheet có tên giống với ô F5 của Sheet "Main"
Ví dụ dữ liệu ở ô F5 Sheet "main là "1996" thì sẽ chọn được ô A1 của Sheet 1996, tương tự với 1997, 1998, ...
Mình đã viết code nhưng vẫn còn gà mờ nên code không chạy.
Mong các bạn giúp mình.
Cám ơn rất nhiều.

 

[giangleloi]

Chắc là vầy ah? Thì chỉ cần như vầy thôi, For Next làm gì

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Dim n As String
n = [F5].Value
If Target.Address = "$F$5" Then
    Sheets(n).Activate
End If
Application.ScreenUpdating = True
End Sub

Code trên có vấn đề trầm trọng. Có ai nhận ra điều gì không???

 

[doveandrose]

Gì vậy bạn Hiền???

tôi cũng đặt vé đợi nghe lời vàng ngọc của anh GiangLeLoi đây

 

[phulien1902]

Code trên có vấn đề trầm trọng. Có ai nhận ra điều gì không???

Là dòng này:
n = [F5].Value ?

 

[phulien1902]

Dòng này có vấn đề gì vậy bạn @phulien1902 ?

Chúng ta hãy chờ bạn giangleloi nói xem đã.
Vì chiều nay tôi đã có linh cảm có vấn đề ở chỗ này.

 

[phulien1902]

Hi. Tôi thì tin @giangleloi vào sẽ nói là: ...............Oh nãy nhậu về xỉn quá nên vào GPE Cmt đại phát vậy thôi............hahahaha chứ có vấn đề gì đâu
(Tin tôi đi........)

Bạn giangleloi là con gái, đâu phải là đàn ông mà nhậu với nhẹt, lấy đâu mà say xỉn, điều này bạn tin tôi đi.

 

[doveandrose]

Hi. Tôi thì tin @giangleloi vào sẽ nói là: ...............Oh nãy nhậu về xỉn quá nên vào GPE Cmt đại phát vậy thôi............hahahaha chứ có vấn đề gì đâu
(Tin tôi đi........)

tôi không tin bạn đâu à . Phim hay sao kết thúc zô ziêng được

 

[doatmenhhon]

Là dòng này:
n = [F5].Value ?

Nếu F5 chưa fix chọn giá trị từ 1996 đến 2015 thì cần bổ sung On Error Resume Next ^^

 

[giangleloi]

Hi. Tôi thì tin @giangleloi vào sẽ nói là: ...............Oh nãy nhậu về xỉn quá nên vào GPE Cmt đại phát vậy thôi............hahahaha chứ có vấn đề gì đâu
(Tin tôi đi........)

Đúng rồi. Hôm qua nhậu say quá. Chọc ghẹo cho vui thôi. Giờ say tập 2 mới thấy quá trời comment.

Bạn giangleloi là con gái, đâu phải là đàn ông mà nhậu với nhẹt, lấy đâu mà say xỉn, điều này bạn tin tôi đi.

Mình đính chính. Mình chuẩn men. Cái gì nhỏ có thì lớn vẫn còn "nguyễn y vân"