Cần pro chỉ giao hàm Range VBA trong Excel! (1 người xem)

[gameonly308]

Hiện nay em đang có vấn đề về hàm Range như sau:
Có 2 sheet là: Sheet1 và Sheet2
có Code Command Button tại Sheet1
Private Sub CommandButton1_Click()
Sheets("Sheet2").Select
Range("A1:H25").Select
End Sub
Nhưng khi chạy thì báo lỗi.
Mục đích là muốn khi Click vào Button ở Sheet1 thì sẽ hiện ra vùng dữ liệu chọn tại Shee2 là A1:H25
Xin pro nào chỉ giáo code trên sai ở đâu!

 

[nhanvvGPE]

Hiện nay em đang có vấn đề về hàm Range như sau:
Có 2 sheet là: Sheet1 và Sheet2
có Code Command Button tại Sheet1
Private Sub CommandButton1_Click()
Sheets("Sheet2").Select
Range("A1:H25").Select
End Sub
Nhưng khi chạy thì báo lỗi.
Mục đích là muốn khi Click vào Button ở Sheet1 thì sẽ hiện ra vùng dữ liệu chọn tại Shee2 là A1:H25
Xin pro nào chỉ giáo code trên sai ở đâu!

Chào bạn,

Mình chạy thử trong excel 2007 thì không có lỗi, bạn có thể đăng lỗi báo như thế nào không?

Thân!

 

[Kiều Mạnh]

Chào bạn,

Mình chạy thử trong excel 2007 thì không có lỗi, bạn có thể đăng lỗi báo như thế nào không?

Thân!

SỬA LẠI thành vậy đi xem thế nào

Sheets("Sheet2").Select
Sheets("Sheet2").Range("A1:H25").Select

 

[dhn46]

Tôi đoán bạn dùng Code trên tại cửa sổ code của sheet1.

Nếu tại sheet1 bạn gọi như trên là không ổn bởi đứng tại sheet 2 (select) gọi Range("A1:H25").Select tức là gọi vùng A1:H25 sheet1 sẽ bị lỗi, nếu bạn đặt Code tại Module thì sẽ không vấn đề gì.

Đó chính là 1 trong những sự khác biệt khi dùng Code tại sheet và tại module.

 

[Quang_Hải]

SỬA LẠI thành vậy đi xem thế nào

Sheets("Sheet2").Select
Sheets("Sheet2").Range("A1:H25").Select

Viết thế này nha KieuManh. Càng gọn nội công càng mau lên.

Private Sub CommandButton1_Click()
Application.Goto Sheet2.[A1:H25]
End Sub

 

[Kiều Mạnh]

Viết thế này nha KieuManh. Càng gọn nội công càng mau lên.

Private Sub CommandButton1_Click()
Application.Goto Sheet2.[A1:H25]
End Sub

vụ này hôm ở thớt khác anh có nói mà

 

[gameonly308]

Cảm ơn các anh, em sẽ làm cụ thể và phản hồi lại nếu gặp vấn đề ạ

 

[gameonly308]

SỬA LẠI thành vậy đi xem thế nào

Sheets("Sheet2").Select
Sheets("Sheet2").Range("A1:H25").Select

Cái này bị lỗi "Run-time error '9' Subscrip out of range" anh ơi

 

[gameonly308]

Viết thế này nha KieuManh. Càng gọn nội công càng mau lên.

Private Sub CommandButton1_Click()
Application.Goto Sheet2.[A1:H25]
End Sub

Em muốn là cái phần A1:H25 tại Sheet2 nó sẽ hiện thị tại Sheet1 chứ không phải là đi đến Sheet2 anh ạ, anh xem lại giúp em với !

 

[Kiều Mạnh]

Cái này bị lỗi "Run-time error '9' Subscrip out of range" anh ơi

Úp file lên muốn như thế nào mình làm cho,,, nhiều trình bày kiểu này thực tế lại mần kiểu khác chí có chúa mới hiểu

 

[gameonly308]

đây em gửi theo file đính kèm, nội dung đơn giản thôi, a thử xem giúp em

 

[Kiều Mạnh]

đây em gửi theo file đính kèm, nội dung đơn giản thôi, a thử xem giúp em

Ý LÀ VẦY phải không

Sub ABC()
    Sheet2.Range("A1:H25").Copy Sheet1.Range("A15")
End Sub

Nếu không thích kiểu trên thì Ta đổi kiểu dưới xem thế nào nha

Sub ABC2()
    Sheet2.Range("A1").CurrentRegion.Copy Sheet1.Range("A15")
End Sub

 

[n0thing1988]

Hiện nay em đang có vấn đề về hàm Range như sau:
Có 2 sheet là: Sheet1 và Sheet2
có Code Command Button tại Sheet1
Private Sub CommandButton1_Click()
Sheets("Sheet2").Select
Range("A1:H25").Select
End Sub
Nhưng khi chạy thì báo lỗi.
Mục đích là muốn khi Click vào Button ở Sheet1 thì sẽ hiện ra vùng dữ liệu chọn tại Shee2 là A1:H25
Xin pro nào chỉ giáo code trên sai ở đâu!

he he. Tập sự VBA giống mình.

 

[gameonly308]

Ý LÀ VẦY phải không

Sub ABC()
    Sheet2.Range("A1:H25").Copy Sheet1.Range("A15")
End Sub

Nếu không thích kiểu trên thì Ta đổi kiểu dưới xem thế nào nha

Sub ABC2()
    Sheet2.Range("A1").CurrentRegion.Copy Sheet1.Range("A15")
End Sub

Em không muốn copy anh ạ, e chỉ muốn chọn vùng A1:H25 hiện thị bên sheet1 thôi, nội dung ở sheet1 chỉ mang tính hiện thị, khi chỉnh sửa ở nội dung của sheet1 thì nó vẫn lưu bên sheet2 anh ạ. A xem giúp em làm thế nào cho hợp lý với!

 

[Kiều Mạnh]

Em không muốn copy anh ạ, e chỉ muốn chọn vùng A1:H25 hiện thị bên sheet1 thôi, nội dung ở sheet1 chỉ mang tính hiện thị, khi chỉnh sửa ở nội dung của sheet1 thì nó vẫn lưu bên sheet2 anh ạ. A xem giúp em làm thế nào cho hợp lý với!

Ngại ghê mấy bài trước keo link sheet chon vùng làm cho ok xong.. nói kiểu copy làm cho xong...lại đổi kiểu...
ý là muốn nhấn nút một phát nó hiện lên hình vùng A1:H25 như trong phim hành động xong rồi biến luôn chứ gì

 

[gameonly308]

vụ này hôm ở thớt khác anh có nói mà

Anh ơi khi lick vào nó không sang Sheet2 anh ạ