Hỏi về công thức mảng

[thuyyeu99]

Các anh chị nào biết công thức mảng bằng VBA cho em hỏi xíu nhé.

Em đang mò mẫm về cách viết công thức mảng, nhưng còn lăn tăng 1 chỗ là khi viết công thức mảng có nên gán hết công thức vào trong 1 vùng không hay là chỉ Gán giá trị vào vùng đó (khi nào cần up1date thì chỉ việc Enter vào ô chứa công thức thì dữ liệu sẽ cập nhật lại).

Cám ơn các anh chị quan tâm!

Supper UDF SQL version 2

Hàm Supper UDF SQL version 2.1 hihihi (Hàm Group Concat trong T_SQL)

 

[thuyyeu99]

COI DÙM Mạnh
View attachment 211651

anh sai cái đoạn code thứ 1 hay thứ 2 vậy

 

[Kiều Mạnh]

anh sai cái đoạn code thứ 1 hay thứ 2 vậy

cả 2 code

 

[thuyyeu99]

cả 2 code

ủa sao em không bị lỗi #Value
em chép vô chạy mượt mà

 

[Kiều Mạnh]

View attachment 211653
ủa sao em không bị lỗi #Value
em chép vô chạy mượt mà

THUA ... KO BIẾT SAO LUÔN

 

[thuyyeu99]

THUA ... KO BIẾT SAO LUÔN

roi phát hiện ra rồi đợi em làm chút việc đã rồi em xửa cho

Bài đã được tự động gộp: 26/1/19

THUA ... KO BIẾT SAO LUÔN

Check mail di anh

 

[Kiều Mạnh]

roi phát hiện ra rồi đợi em làm chút việc đã rồi em xửa cho

Bài đã được tự động gộp: 26/1/19

Check mail di anh

thấy có từ này ko biết chi luôn

xlA1

 

[thuyyeu99]

thấy có từ này ko biết chi luôn

xlA1

Chang qua máy cái tham số $ ấy mà
Mà chạy chưa

 

[Kiều Mạnh]

Chang qua máy cái tham số $ ấy mà
Mà chạy chưa

build nó báo lỗi cái dòng

Result

Viết ẩu quá viết lại chính xác cho cái đi
Lỗi nè

 

[thuyyeu99]

build nó báo lỗi cái dòng

Result

Viết ẩu quá viết lại chính xác cho cái đi
Lỗi nè
View attachment 211654

Anh coi anh chép vô sao do no khong co xuống dòng đâu nhé, tự chép vào mail nó tự xuống dòng ý

 

[Kiều Mạnh]

Anh coi anh chép vô sao do no khong co xuống dòng đâu nhé, tự chép vào mail nó tự xuống dòng ýView attachment 211657

thử tới lui nó vẫn báo #Value!
Gửi lại chi Mạnh vào file txt xem sao

 

[Kiều Mạnh]

Nó có vầy thui mà nhiều chuyện từ sáng tới giờ

Result:=EmptyParam;

Muốn gõ kiểu chi cũng ok đó

 

[Kiều Mạnh]

Anh coi anh chép vô sao do no khong co xuống dòng đâu nhé, tự chép vào mail nó tự xuống dòng ýView attachment 211657

Cho Mạnh hỏi chút
1/ Khi mạnh xài hàm như sau thì chạy tốt

[a1]=SupperSQL("D:\DelphiExamples\VBLibrary\Win32\Debug\Data.xlsb", "Select * from [Data_Nhap$A1:I100]","A6")

2/ Khi mạnh sử dụng hàm như hình sau thì báo lỗi ... cách xử lý nó hay thêm cái Gì ???

 

[tam888]

Cho Mạnh hỏi chút
1/ Khi mạnh xài hàm như sau thì chạy tốt

[a1]=SupperSQL("D:\DelphiExamples\VBLibrary\Win32\Debug\Data.xlsb", "Select * from [Data_Nhap$A1:I100]","A6")

2/ Khi mạnh sử dụng hàm như hình sau thì báo lỗi ... cách xử lý nó hay thêm cái Gì ???
View attachment 211669

Với 2/ thử tại A6 gõ chữ (text) "A6" vào ... chắc được.
Nếu được thì sẽ tự biết có cách đúng không?

 

[Kiều Mạnh]

Với 2/ thử tại A6 gõ chữ (text) "A6" vào ... chắc được.
Nếu được thì sẽ tự biết có cách đúng không?

Cảm ơn bạn chính xác là nó

 

[Kiều Mạnh]

Mò code diết mờ cả mắt
1/ nhờ các bạn test dùm code hàm mảng cho Mạnh với xem Office x32 hay office x64 trên các máy khác nó có chạy không
2/ Không sử dụng được cho Office 2003 To 2007
3/ Bước đầu mạnh mới viết cho nó chạy ok cái đã ... còn cái Co và Giản kia khó quá chưa mò ra .... rồi có ngày sẻ mò ra thôi ...
4/ Code trên Delphi phải nói là chạy tốc độ thật
5/ Sử dụng code

Sub Main_SupperSQL()
    Dim ExcelPath As Variant
    Dim SQL As Variant
    Range("A2:I1000").ClearContents
    SQL = "Select * from [Data_Nhap$A1:I]"
    ExcelPath = ThisWorkbook.Path & "\Data.xlsb"
    Rem Call SupperSQL("D:\SupperSQL\SupperSQL_Officex32\Data.xlsb", "Select * from [Data_Nhap$A1:I100]", "A9")
    Call SupperSQL(ExcelPath, "Select * from [Data_Nhap$A1:I100]", "A9")
End Sub

6/ Sử dụng hàm

cách 1
[A1]= SupperSQL("D:\SupperSQL\SupperSQL_Officex32\Data.xlsb", "Select * from [Data_Nhap$A1:I100]", "A9")
cách 2
[a1]=SupperSQL(K1,K2,"A9")

7/ Tham số A9 là nơi gán kết quả
Xin cảm ơn

 

[Kiều Mạnh]

To @thuyyeu99
Chỉ dùm Mạnh làm sao code nó nhớ được cái vùng vũng liệu gán lên sheet sau mỗi lần chạy code

1/ VD lần 1: Mạnh lấy 10 dòng
2/ VD lần 2: Mạnh lấy 100 dòng
3/ VD lần 3: Mạnh lấy 15 dòng .... xong thoát file không lưu

xong lần 3 trên mở lại file Excel đó .... vậy chỉ mạnh cách lấy số dòng hiện có trên Sheet Tính Từ Cells nó gán kết quả
.......
Nếu giúp Mạnh OK mấy cái trên kể coi như mọi cái xong hết Ròi đó he ..... đang kẹt nhất khúc này !!!!!????

Mong trợ giúp Mạnh he

 

[thuyyeu99]

To @thuyyeu99
Chỉ dùm Mạnh làm sao code nó nhớ được cái vùng vũng liệu gán lên sheet sau mỗi lần chạy code

1/ VD lần 1: Mạnh lấy 10 dòng
2/ VD lần 2: Mạnh lấy 100 dòng
3/ VD lần 3: Mạnh lấy 15 dòng .... xong thoát file không lưu

xong lần 3 trên mở lại file Excel đó .... vậy chỉ mạnh cách lấy số dòng hiện có trên Sheet Tính Từ Cells nó gán kết quả
.......
Nếu giúp Mạnh OK mấy cái trên kể coi như mọi cái xong hết Ròi đó he ..... đang kẹt nhất khúc này !!!!!????

Mong trợ giúp Mạnh he

Hihi anh hỏi đúng chỗ khó đấy.
Gợi ý cho anh nhé
Trong Excel Anh muốn ghi nhớ 1 vùng Address thì anh sẽ dùng dùng những cách nào, chắc chắn là không ghi vào Cell rồi, anh sắp ra rồi đấy .
Ví dụ: có thể add vào Dic, String, Clection, RangeName .v....v.....v.. Quan trọng anh cất ở học tủ nào giờ anh kéo học tủ đó ra mà lấy thôi.
Em up cái vi deo Vesion 2 cho anh coi hihih

 

[Kiều Mạnh]

Hihi anh hỏi đúng chỗ khó đấy.
Gợi ý cho anh nhé
Trong Excel Anh muốn ghi nhớ 1 vùng Address thì anh sẽ dùng dùng những cách nào, chắc chắn là không ghi vào Cell rồi, anh sắp ra rồi đấy .
Ví dụ: có thể add vào Dic, String, Clection, RangeName .v....v.....v.. Quan trọng anh cất ở học tủ nào giờ anh kéo học tủ đó ra mà lấy thôi.
Em up cái vi deo Vesion 2 cho anh coi hihih

Chỉ kiểu Anh cần cái cần ra sông xong thả câu xuống .... kiểu gì cũng có con cá về nhậu he

Mạnh có thể lấy cái Name của chính nó .... nhưng ko thích kiểu này .... vì nó lại phát sinh cái khác

 

[thuyyeu99]

Bài đã được tự động gộp: 28/1/19

Chỉ kiểu Anh cần cái cần ra sông xong thả câu xuống .... kiểu gì cũng có con cá về nhậu he

Mạnh có thể lấy cái Name của chính nó .... nhưng ko thích kiểu này .... vì nó lại phát sinh cái khác

trời ơi anh không biết tạo cái mới hả

 

[Kiều Mạnh]

Bài đã được tự động gộp: 28/1/19

trời ơi anh không biết tạo cái mới hả

Gửi Sư Phụ Bức Tranh ko lời ... ??!!!

Tuy nhiên Mạnh ko thích cách này lắm .... Mò tiếp tìm kiếm một giải Pháp mới