gán công thức vào vba

Liên hệ QC

babygirl_8990

Thành viên mới
Tham gia
16/10/18
Bài viết
42
Được thích
0
Chào mọi người, em muốn gán 1 công thức cố định như: =ROUND(VLOOKUP(IF(C21=0,D21&"T"&" x "&E21&"W"&" x "&F21&"L",C21&"φ"&" x "&D21&"T"&" x "&F21&"L"),DATA!$B$238:$V$461,21,0),2) vào 1 ô cố định, rồi filldown xuống dong cuối làm như thế nào ạ, em cũng có làm :range("l21").FormulaArray="=ROUND(VLOOKUP(IF(C21=0,D21&"T"&" x "&E21&"W"&" x "&F21&"L",C21&"?"&" x "&D21&"T"&" x "&F21&"L"),DATA!$B$238:$V$461,21,0),2)" mà báo lỗi . Nhờ anh chị giúp đỡ ạ
 
Chào mọi người, em muốn gán 1 công thức cố định như: =ROUND(VLOOKUP(IF(C21=0,D21&"T"&" x "&E21&"W"&" x "&F21&"L",C21&"φ"&" x "&D21&"T"&" x "&F21&"L"),DATA!$B$238:$V$461,21,0),2) vào 1 ô cố định, rồi filldown xuống dong cuối làm như thế nào ạ, em cũng có làm :range("l21").FormulaArray="=ROUND(VLOOKUP(IF(C21=0,D21&"T"&" x "&E21&"W"&" x "&F21&"L",C21&"?"&" x "&D21&"T"&" x "&F21&"L"),DATA!$B$238:$V$461,21,0),2)" mà báo lỗi . Nhờ anh chị giúp đỡ ạ
Sao bạn chỉ nhờ gán công thức đó mà không nhờ có cách nào khác không? Đã là VBA rồi thì chạy code tìm kiếm và gán luôn chứ sao lại đi gán công thức đó
 
Sao bạn chỉ nhờ gán công thức đó mà không nhờ có cách nào khác không? Đã là VBA rồi thì chạy code tìm kiếm và gán luôn chứ sao lại đi gán công thức đó
Vì em có rất nhiều sheet phải tính toán y như vậy nên muốn nhờ gán công thức sẵn để mỗi lần có sheet khác thì chỉ cần chạy code là ok ạ
 
Vì em có rất nhiều sheet phải tính toán y như vậy nên muốn nhờ gán công thức sẵn để mỗi lần có sheet khác thì chỉ cần chạy code là ok ạ
Tùy bạn thôi, bạn nên cung cấp file lên nhé
chú ý: nếu file nặng thì cách của bạn có thể chậm hơn nhiều so với chạy code trong vba dò tìm theo array
 
Tùy bạn thôi, bạn nên cung cấp file lên nhé
chú ý: nếu file nặng thì cách của bạn có thể chậm hơn nhiều so với chạy code trong vba dò tìm theo array
Em gửi file ạ, anh có cách nào hay thì bày giúp em với, vì e muốn thêm sheet mói chỉ cần ấn mã thì sẽ chạy công thưc, khỏi mắc công làm công thức lại ạ
 

File đính kèm

  • test.xlsm
    75.9 KB · Đọc: 7
Em gửi file ạ, anh có cách nào hay thì bày giúp em với, vì e muốn thêm sheet mói chỉ cần ấn mã thì sẽ chạy công thưc, khỏi mắc công làm công thức lại ạ
Up file thực lên (xóa bớt dữ liệu hoặc dữ liệu giả cũng được); yêu cầu kết quả mong muốn..., các anh chị trên diễn đàn sẽ chia sẻ nhiều kinh nghiệm tạo file đơn giản nhưng rất hiệu quả...
 
Up file thực lên (xóa bớt dữ liệu hoặc dữ liệu giả cũng được); yêu cầu kết quả mong muốn..., các anh chị trên diễn đàn sẽ chia sẻ nhiều kinh nghiệm tạo file đơn giản nhưng rất hiệu quả...
File đây ạ, yêu cầu mình có note lại á
 

File đính kèm

  • test.xlsm
    75.9 KB · Đọc: 8
Có cách nào hiệu quả hơn không bạn
Theo mình bạn tạo 1 Sheet nhập liệu (Nhập dữ liệu từ Form) rồi lưu dữ liệu vào Sheet nào đó. Cần đến em nào thi lấy em đó ra. Vậy File của bạn chỉ có khoảng 4 Sheet là cùng (Thông tin khách hàng, chủng loại + đơn giá, Phiếu xuất, Nhật ký)
Bạn có thử tham khảo file mình đang quản lý công nợ
 

File đính kèm

  • PHIEU XUAT.xlsm
    193.1 KB · Đọc: 18
Lần chỉnh sửa cuối:
Theo mình bạn tạo 1 Sheet nhập liệu (Nhập dữ liệu từ Form) rồi lưu dữ liệu vào Sheet nào đó. Cần đến em nào thi lấy em đó ra. Vậy File của bạn chỉ có khoảng 4 Sheet là cùng (Thông tin khách hàng, chủng loại + đơn giá, Phiếu xuất, Nhật ký)
Vì đơn giá mỗi tháng mỗi thay đổi và mỗi đơn hàng
Theo mình bạn tạo 1 Sheet nhập liệu (Nhập dữ liệu từ Form) rồi lưu dữ liệu vào Sheet nào đó. Cần đến em nào thi lấy em đó ra. Vậy File của bạn chỉ có khoảng 4 Sheet là cùng (Thông tin khách hàng, chủng loại + đơn giá, Phiếu xuất, Nhật ký)
Bạn có thử tham khảo file mình đang quản lý công nợ
không phức tạp vậy đâu bạn, mục đích mình chỉ muốn biết mỗi đơn hàng là bao nhiêu tiền thôi, vì mình đang tính giá vốn, mỗi tháng khác nhau, chỉ cần thêm đơn hàng mới thì tự tính đơn giá và thành tiền. Tóm lại mình chỉ cần code cho hàm ở cột đơn giá và tahnhf tiền thôi ạ.
 
Vì đơn giá mỗi tháng mỗi thay đổi và mỗi đơn hàng

không phức tạp vậy đâu bạn, mục đích mình chỉ muốn biết mỗi đơn hàng là bao nhiêu tiền thôi, vì mình đang tính giá vốn, mỗi tháng khác nhau, chỉ cần thêm đơn hàng mới thì tự tính đơn giá và thành tiền. Tóm lại mình chỉ cần code cho hàm ở cột đơn giá và tahnhf tiền thôi ạ.
Thích thì chiều... nhưng không khuyến khích theo em đâu nha !
File của Nhất Chi Lan khá hay, theo em nghĩ chị nên nghiên cứu file này...
Mã:
Sub Xoa()
    Range("L21:M26").ClearContents
End Sub
Sub FillDown()

Range("L21:L26").FormulaR1C1 = "=VLOOKUP(IF(RC[-9]=0,RC[-8]&RC[-7]&RC[-6],RC[-9]&RC[-8]&RC[-6]),BangDonGia,3,0)"
Range("M21:M26").FormulaR1C1 = "=ROUND(RC[-1]*RC[-6],2)"

End Sub
 

File đính kèm

  • test 2.xlsm
    79.3 KB · Đọc: 7
Web KT
Back
Top Bottom