Hỏi về ghi ký tự " trong công thức VBA

Liên hệ QC

NguyenNgocSon

KEEP WALKING
Tham gia
4/4/08
Bài viết
280
Được thích
832
Nghề nghiệp
Ths. Cầu hầm
Chào các bác em đang làm ghi công thức hàm SUMIF bằng VBA nhưng đang bị lỗi sau
PHP:
Sub Auto_Sum()
Dim cotghi As Stringcotghi = Application.InputBox("Nhap ten cot theo thu tu sau: Tenshets-CotDK-DK-Cotsum", "Nguyen Ngoc Son")
Dim tach As Varianttach = Split(cotghi, ",")
ActiveCell.Formula = "=Sumif(" & "'" & tach(0) & "'" & "!" & tach(1) & ":" & tach(1) & "," & tach(2) & "," & "'" & tach(0) & "'" & "!" & tach(3) & ":" & tach(3) & ")"
End Sub
Vơi ô chọn cột ghi có giá trị:
Mo,V,bt,N
Kết quả trả về là: =SUMIF(Mo!V:V,bt,Mo!N:N)
Như vậy excel không tính đúng mà đúng phải là:
Kết quả trả về là: =SUMIF(Mo!V:V,"bt",Mo!N:N)
Nhu vay em muon hoi ghi cai ky tu " giua bt bang VBA
Cám ơn !
 
Trường hợp như vậy, mình sẽ mở bộ thu macro lên xem nó ghi làm sao?
 
Upvote 0
Chào các bác em đang làm ghi công thức hàm SUMIF bằng VBA nhưng đang bị lỗi sau
PHP:
Sub Auto_Sum()
Dim cotghi As Stringcotghi = Application.InputBox("Nhap ten cot theo thu tu sau: Tenshets-CotDK-DK-Cotsum", "Nguyen Ngoc Son")
Dim tach As Varianttach = Split(cotghi, ",")
ActiveCell.Formula = "=Sumif(" & "'" & tach(0) & "'" & "!" & tach(1) & ":" & tach(1) & "," & tach(2) & "," & "'" & tach(0) & "'" & "!" & tach(3) & ":" & tach(3) & ")"
End Sub
Vơi ô chọn cột ghi có giá trị:
Mo,V,bt,N
Kết quả trả về là: =SUMIF(Mo!V:V,bt,Mo!N:N)
Như vậy excel không tính đúng mà đúng phải là:
Kết quả trả về là: =SUMIF(Mo!V:V,"bt",Mo!N:N)
Nhu vay em muon hoi ghi cai ky tu " giua bt bang VBA
Cám ơn !
Trường hợp này bạn dùng hàm Chr(34) để trả về ký tự " trong hàm excel nhé!
 
Upvote 0
Gấp đôi cái ký tự ấy lên

... & ",""" & tach(2) & """," & ...
 
Upvote 0
Web KT
Back
Top Bottom