Giúp ghép biến VBA trong Excel lần 2 (1 người xem)

[congnguyen88]

sub chon()
Dim i as long
i = range("a1")
Range("B"&i:F500").Select
endsub

Ví dụ ô A1 = 5 thì Range("B5:F500").select
Tôi không biết ghép làm sao cho Code trên chạy. mong mọi người giúp đở

 

[vu_tuan_manh_linh]

Code thế này: Range("B"&i&":F500").Select

 

[chuot0106]

sub chon()
Dim i as long
i = range("a1")
Range("B"&i:F500").Select
endsub

Ví dụ ô A1 = 5 thì Range("B5:F500").select
Tôi không biết ghép làm sao cho Code trên chạy. mong mọi người giúp đở

Thử thế này xem sao:

[COLOR=#000000]sub chon()[/COLOR]
[COLOR=#000000] Dim i as long[/COLOR]
[COLOR=#000000] i = range("a1")[/COLOR]
[COLOR=#000000] Range("B"&i,"F500").Select[/COLOR]
[COLOR=#000000]endsub[/COLOR]

 

[congnguyen88]

Code thế này: Range("B"&i&":F500").Select

Code này không chạy được anh ơi. Có bạn giúp mình chạy được rồi Code đây nek anh trai
Range("B"&i,"F500").Select

 

[chuot0106]

Code này không chạy được anh ơi. Có bạn giúp mình chạy được rồi Code đây nek anh trai
Range("B"&i,"F500").Select

Không phải code này không chạy mà người dùng không biết cách sử dụng thôi:
Chạy lại xem:

[COLOR=#000000][I]Range("B" & i &":F500").Select[/I][/COLOR]

 

[congnguyen88]

Thử thế này xem sao:

[COLOR=#000000]sub chon()[/COLOR]
[COLOR=#000000] Dim i as long[/COLOR]
[COLOR=#000000] i = range("a1")[/COLOR]
[COLOR=#000000] Range("B"&i,"F500").Select[/COLOR]
[COLOR=#000000]endsub[/COLOR]

rất cảm ơn bạn nhiệt tình đã giúp đở. Thiệt tình mình cũng không hiểu nữa, sao mình làm như vầy không chãy được Range("B"&i:F500).select có gi khác với Range("B2:F500").select

Bạn có tài liệu nào ghép biến như thế này không cho mình học với, mình làm được nhưng mình hiểu mới để tức bạn ak, cố gắng gửi tài liệu giúp mình

 

[Quang_Hải]

rất cảm ơn bạn nhiệt tình đã giúp đở. Thiệt tình mình cũng không hiểu nữa, sao mình làm như vầy không chãy được Range("B"&i:F500).select có gi khác với Range("B2:F500").select

Bạn có tài liệu nào ghép biến như thế này không cho mình học với, mình làm được nhưng mình hiểu mới để tức bạn ak, cố gắng gửi tài liệu giúp mình

Đoán chắc bạn có đeo kính, mà kính lại không phù hợp với nhãn lực rồi. Code nó vậy đó, sai 1 nét là nó không nghe lời đâu.
Xem kỹ từng ký tự đi nhé.

 

[nghiaphuc]

Code này không chạy được anh ơi. Có bạn giúp mình chạy được rồi Code đây nek anh trai
Range("B"&i,"F500").Select

Bạn gõ thêm dấu cách vào phía trước và phía sau mỗi dấu & là được.

 

[hungpecc1]

rất cảm ơn bạn nhiệt tình đã giúp đở. Thiệt tình mình cũng không hiểu nữa, sao mình làm như vầy không chãy được Range("B"&i:F500).select có gi khác với Range("B2:F500").select

Bạn có tài liệu nào ghép biến như thế này không cho mình học với, mình làm được nhưng mình hiểu mới để tức bạn ak, cố gắng gửi tài liệu giúp mình

Hiểu nôm na thế này :
* dấu & dùng để nối các ký tự với nhau
* Trong vba : những cái gì chỉ có bạn hiểu và VBA không hiểu thì phải thêm dấu " " , để VBA biết đấy là giá trị của bạn
Do đó nếu bạn viết :

"B" & i [COLOR=#b22222][B]:F500[/B][/COLOR]

, vậy :F500 là gì ? nó không phải là biến , từ khóa , cú pháp đã được khai báo trong VBA -> không có kết quả trả về
Ngược lại nếu viết

"B" & i & ":F500"

, i là biến số, và lúc này nếu i = 5 thì kết quả của phép nối sẽ là "B5:F500"

 

[congnguyen88]

Hiểu nôm na thế này :
* dấu & dùng để nối các ký tự với nhau
* Trong vba : những cái gì chỉ có bạn hiểu và VBA không hiểu thì phải thêm dấu " " , để VBA biết đấy là giá trị của bạn
Do đó nếu bạn viết :

"B" & i [COLOR=#b22222][B]:F500[/B][/COLOR]

, vậy :F500 là gì ? nó không phải là biến , từ khóa , cú pháp đã được khai báo trong VBA -> không có kết quả trả về
Ngược lại nếu viết

"B" & i & ":F500"

, i là biến số, và lúc này nếu i = 5 thì kết quả của phép nối sẽ là "B5:F500"

Rất cảm ơn anh đã giúp đỡ. tại vì mình mới bắt đầu học VBA nên chưa hiễu được.