Giúp về selection!

Liên hệ QC

ThuNghi

Hãy cho rồi sẽ nhận!
Thành viên đã mất
Tham gia
16/8/06
Bài viết
3,808
Được thích
4,449
Nhờ các bạn chỉ giúp như sau, biết là trên GPE có mà tìm chưa ra.
Tôi có sub sau
Sub chon()
dim i as integer
dim j as integer
i = range("X1").value
j = range("Z1").value
????Làm sao chọn selection từ A1-> cells(i,j)
End sub
Xin cám ơn!
 
Bạn tham khảo cái này:Range(Cells(1, 1), Cells(i, j)).Select
 
Upvote 0
ThuNghi đã viết:
Nhờ các bạn chỉ giúp như sau, biết là trên GPE có mà tìm chưa ra.
Tôi có sub sau
Sub chon()
dim i as integer
dim j as integer
i = range("X1").value
j = range("Z1").value
????Làm sao chọn selection từ A1-> cells(i,j)
End sub
Xin cám ơn!

Bác này buồn cười nhỉ, bác phải hỏi là chọn selection từ cells(1,1)-> cells(i,j)
hoặc chọn selection từ (A1)-> (i, j)

Có 2 cách :
--C1 : như bác pxthanhcda đã nói
--C2 :
Mã:
[COLOR=Blue]Dim[/COLOR] i As [COLOR=Blue]String[/COLOR]
[COLOR=Blue]Dim[/COLOR] j As [COLOR=Blue]Integer[/COLOR]
i = Range("X1").Value
j = Range("Z1").Value
Range("A1:" & i & j).Select


Bác tham khảo nhé
Thân
 
Upvote 0
ThuNghi đã viết:
Nhờ các bạn chỉ giúp như sau, biết là trên GPE có mà tìm chưa ra.
Tôi có sub sau
Sub chon()
????Làm sao chọn selection từ A1-> cells(i,j)
End sub
Xin cám ơn!
Bạn phải xác định dòng, cột của A1, Z1 mới chọn được vùng từ A1 đến Z1.
Bạn viết lại như sau:
Sub chon()
Dim ri As Integer, ci As Integer
Dim rj As Integer, cj As Integer
ri = range("X1").Row
ci = range("X1").Column
rj = range("Z1").Row
cj = range("Z1").Column
Range(Cells(ri,ci),Cells(rj,cj)).Select
End sub
Bạn có thể thay X1, Z1 bằng tên (name), ví dụ A là tên vùng (A2:B5), B là tên vùng (K5:M100), khi đó vùng chọn sẽ từ ô A2:K5.
 
Lần chỉnh sửa cuối:
Upvote 0
phamduylong đã viết:
Bạn phải xác định dòng, cột của A1, Z1 mới chọn được vùng từ A1 đến Z1.
Bạn viết lại như sau:
Sub chon()
Dim ri As Integer, ci As Integer
Dim rj As Integer, cj As Integer
ri = range("X1").Row
ci = range("X1").Column
rj = range("Z1").Row
cj = range("Z1").Column
Range(Cells(ri,ci),Cells(rj,cj)).Select
End sub
Bạn có thể thay X1, Z1 bằng tên (name), ví dụ A là tên vùng (A2:B5), B là tên vùng (K5:M100), khi đó vùng chọn sẽ từ ô A2:K5.

Tức là ThuNghi muốn nhập giá trị vào ô chỉ định (X1, Z1 - VD : 1,2 hoặc A,10). Sau đó chương trình sẽ dựa vào các giá trị đó để tính toán

Thân!
 
Upvote 0
Đúng là buồn cười thật! Cứ đòi dùng đao to mà đao nặng quá nên...
Rất cám ơn các bạn!
 
Upvote 0
Web KT
Back
Top Bottom