Hàm tìm kiếm đến file khác dựa vào giá trị của ô

[hungvn]

Tôi đang làm 1 hàm tìm kiếm đến nhiều file khác dựa vào giá trị của ô.
Ví dụ ô A1 có giá trị 01, tại ô A2 sẽ hiện lên giá trị của ô B5 trong file DS01.xls. Tương tự, ô A1 có giá trị 02, tại ô A2 sẽ hiện lên giá trị của ô B5 trong file DS02.xls.
Các bác giúp hộ. Thank!!!

Tôi muốn tìm khi file đang đóng. Bạn các có cách nào không?

 

[hoangminhtien]

các file nguồn đã mở, thì bạn có thể dùng cônng thức sau
=INDIRECT("[DS"&A1&"]Sheet1!B5")
khi đó bạn sẽ tham chiếu tới ô B5 trong Sheet1 của file DS01 hoặc DS02 tương ứng với A1=01 hoặc A1=02

 

[tedaynui]

Nếu bạn dùng VBA thì có thể dùng hàm sau

Function CheckWorkbookIsExist(ByVal FileName As String) As Boolean     
    On Error Resume Next
    CheckWorkbookIsExist = (Len(Dir$(FileName)) > 0)  
End Function

Nếu File tồn tại thì kết quả trả về TRUE

TDN

 

[anhtuan1066]

Tôi đang làm 1 hàm tìm kiếm đến nhiều file khác dựa vào giá trị của ô.
Ví dụ ô A1 có giá trị 01, tại ô A2 sẽ hiện lên giá trị của ô B5 trong file DS01.xls. Tương tự, ô A1 có giá trị 02, tại ô A2 sẽ hiện lên giá trị của ô B5 trong file DS02.xls.
Các bác giúp hộ. Thank!!!

Tôi muốn tìm khi file đang đóng. Bạn các có cách nào không?

Quan trọng là hàm phải có khả năng lấy dc dử liệu ngay cả khi file đang đóng!
Tôi đã hướng dẩn tại đây:
http://www.giaiphapexcel.com/forum/showpost.php?p=124830&postcount=758
Ko lẽ bạn chưa xem?

 

[hungvn]

Bác có cách nào dùng công thức không vì nếu phải cài add-in trên nhiều máy thì hơi bất tiện (file này tôi để mọi người sử dụng trong mạng Lan).Có cách nào dùng hàm VLOOKUP không bác?

Quan trọng là hàm phải có khả năng lấy dc dử liệu ngay cả khi file đang đóng!
Tôi đã hướng dẩn tại đây:
http://www.giaiphapexcel.com/forum/showpost.php?p=124830&postcount=758
Ko lẽ bạn chưa xem?

Bác ơi , có cách nào dùng công thức không?

 

[anhtuan1066]

Bác ơi , có cách nào dùng công thức không?

Cho đến nay theo như tôi biết thì không có cách. Vì yêu cầu của bạn bắt buộc Excel phải biến chuổi bạn gõ thành 1 đường dẩn (để dò ra nơi chứa file)... Vậy thế nào cũng đụng đến INDIRECT... Mà hàm này như bạn biết đấy, nó đâu có ra kết quả khi file nguồn đang đóng
Vậy nếu bạn ko muốn cài Add-in thì còn mỗi cách viết code vào file luôn thôi
Thử xem 3 file này thế nào nhé

 

[hungvn]

Tôi muốn lấy dữ liệu theo chiều ngang thì sửa code nhu the nào hả bác:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Long
If Target.Address = "$D$1" Then
[A1].CurrentRegion.Offset(1).ClearContents
For i = 1 To 20
Cells(i + 1, 1) = GetValue(Evaluate("refText"), Cells(i + 1, 1).Address)
Next i
End If
End Sub

Tôi thấy code của bác cũng rất hay, chạy nhanh nhưng để áp dụng vào trường hợp của tôi thì phải sửa nhiều. Cái này các bác khác mà có nhu cầu lấy dữ liệu khi file đang đóng cũng rất tốt.
Bác cho hỏi nếu tôi muốn địa chỉ A1 trong code được lấy từ ô $E$1 trong file Main thì phải sửa thế nào.