Xuất code trong VBA

[nguyenvuhuy1411480]

E đã mất rất nhiều thời gian trong việc đọc hiểu file excel này. E chỉ thấy 1 số code trong module ở macro ( VBAproject module 1,2,3,4).
Trong sheet đầu tiên tại S505 trong công thức những chỗ đã F4 lại thì nó vẫn chạy trên số trong bảng 16 số có D311.
E có thể làm từ từ ra những con số ở cột S505...bằng cách lấy máy tính tay bấm ra con số đó vì e hiểu nguyên lý làm việc của những con số đó.
Công thức thì đúng nhưng ở S505, S506...thì có các code ở module 1.2.3.4 sủ dụng cùng hàng ngang ( A3,B3,C3,D3 ) và cả bảng 16 số cũng có code đó tại D311, nhưng code đó chạy ở 2 chỗ nêu trên với 2 ẩn khác nhau. code ở hàng S505 ẩn là D505 là 0 thì bảng 16 số chạy ẩn ngược lại là (D588-D505=13.7-0)
E rất mong được mấy a chị quý thầy cô giúp đỡ. E rất cảm ơn !

 

[huuthang_bd]

E đã mất rất nhiều thời gian trong việc đọc hiểu file excel này. E chỉ thấy 1 số code trong module ở macro ( VBAproject module 1,2,3,4).
Trong sheet đầu tiên tại S505 trong công thức những chỗ đã F4 lại thì nó vẫn chạy trên số trong bảng 16 số có D311.
E có thể làm từ từ ra những con số ở cột S505...bằng cách lấy máy tính tay bấm ra con số đó vì e hiểu nguyên lý làm việc của những con số đó.
Công thức thì đúng nhưng ở S505, S506...thì có các code ở module 1.2.3.4 sủ dụng cùng hàng ngang ( A3,B3,C3,D3 ) và cả bảng 16 số cũng có code đó tại D311, nhưng code đó chạy ở 2 chỗ nêu trên với 2 ẩn khác nhau. code ở hàng S505 ẩn là D505 là 0 thì bảng 16 số chạy ẩn ngược lại là (D588-D505=13.7-0)
E rất mong được mấy a chị quý thầy cô giúp đỡ. E rất cảm ơn !

Bạn nói rất nhiều nhưng sao không nói bạn muốn cái gì?

 

[nguyenvuhuy1411480]

Bạn nói rất nhiều nhưng sao không nói bạn muốn cái gì?

dạ e cũng mong lung lắm. e muốn lập lại 1 excel tương tự. e làm theo file đó. code e cũng copy ra. nhưng tới S505,S506...thì không hiểu nữa. và cả lớp e hông ai hiểu vì sao chổ cột S505 nó lại chạy như v. e lập công thức giống nó mà hông ra giống nó. nên e hông hiểu trong đó còn có cái gì nữa hông ?

 

[befaint]

Tới chủ thớt:
Bạn diễn giải bài toàn: cho abc, cần tính zyx với yêu cầu lmk gì đó. Hiện đã làm được gì, sai ở đâu, cần chỉnh gì?
Chứ đọc 2 bài trên không hiểu bạn muốn gì..

***
Tên folder, file, sheet... không nên viết chữ có dấu.
File Excel kia dùng với Office tiếng Việt nên nó sinh ra mấy các worksheets có code name là tiếng Việt...?

Xem lại cách khai báo các biến trong code

Dim i, j, k As Integer, suma1, gt, giaithua, a As Double'

' khai báo vậy thì chỉ có biến k và a mới được khai báo cụ thể kiểu dữ liệu
' các biến còn lại đều là Empty. Không tin thì thử khúc dưới

Sub Vidu()
    Dim i, j As Long
    MsgBox "TypeName(i): " & TypeName(i) & vbNewLine & _
            "TypeName(j): " & TypeName(j)
End Sub

 

[tam888]

Tới chủ thớt:
Bạn diễn giải bài toàn: cho abc, cần tính zyx với yêu cầu lmk gì đó. Hiện đã làm được gì, sai ở đâu, cần chỉnh gì?
Chứ đọc 2 bài trên không hiểu bạn muốn gì..

***
Tên folder, file, sheet... không nên viết chữ có dấu.
File Excel kia dùng với Office tiếng Việt nên nó sinh ra mấy các worksheets có code name là tiếng Việt...?

Xem lại cách khai báo các biến trong code

Dim i, j, k As Integer, suma1, gt, giaithua, a As Double'

' khai báo vậy thì chỉ có biến k và a mới được khai báo cụ thể kiểu dữ liệu
' các biến còn lại đều là Empty. Không tin thì thử khúc dưới

Sub Vidu()
    Dim i, j As Long
    MsgBox "TypeName(i): " & TypeName(i) & vbNewLine & _
            "TypeName(j): " & TypeName(j)
End Sub

Chính xác,
Các biến không có As cụ thể đằng sau (Empty) thì có kiểu là Variant

 

[VetMini]

Tới chủ thớt:
Bạn diễn giải bài toàn: cho abc, cần tính zyx với yêu cầu lmk gì đó. Hiện đã làm được gì, sai ở đâu, cần chỉnh gì?
Chứ đọc 2 bài trên không hiểu bạn muốn gì..
...

Đã diễn tả khó hiểu còn viết tắt tùm lum nữa.
Đầu tiên hết, cần hỏi thớt "có biết code trên làm cái gì không?". Nếu không thì quên đi, tìm hiểu làm chi cho mệt.

(ít nhất tôi cũng phải biết nó làm cái gì thì những chỗ tác giả viết sai tôi còn hiểu vì sao)

 

[nguyenvuhuy1411480]

Chính xác,
Các biến không có As cụ thể đằng sau (Empty) thì có kiểu là Variant

Do em không rành viết code. Nhưng em nhập bằng công thức excel lại thì code này đúng. Trong cột S505 vì sao 16 giá trị D311 lại thay đổi. Em nghĩ 16 giá trị đó không đổi. Vì J497 cũng như 1 số giá trị trong công thức S505 đã bị F4 lại.

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

Đã diễn tả khó hiểu còn viết tắt tùm lum nữa.
Đầu tiên hết, cần hỏi thớt "có biết code trên làm cái gì không?". Nếu không thì quên đi, tìm hiểu làm chi cho mệt.

(ít nhất tôi cũng phải biết nó làm cái gì thì những chỗ tác giả viết sai tôi còn hiểu vì sao)

Dạ anh. Code đó dùng để tính công thức thức thôi. Trong đó có 16 code tương tự nhau và được tính lập thôi. Và đều em muốn lúc này là S505 em lập công thức giống nhưng ra số thì không giống. Cũng công thức đó mà 16 số ở D311 thì chạy . Còn 16 số ở D311 của e thì không chạy. Giúp em em cảm ơn nhiều lắm. Vì cả lớp em ai cũng bí chỗ này. 0394041139. Sdt của em ạ.