Sửa Lỗi Khi Record Macro Có Nội Dung 1 Hàm Dài Xuống Dòng Bị Lỗi

Giải Pháp Excel
  • Trang chủ Có gì mới Hoạt động gần nhất Tác giả
  • Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
  • Video New Video về Excel Video về tin học khác Tin tức về tin học chung
  • Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
  • Tài nguyên Đánh giá mới nhất Tìm tài nguyên
  • Facebook
  • Đóng góp
Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

Tìm kiếm

Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Bởi: Tìm kiếm Tìm nâng cao…
  • Tìm bài viết mới
  • Tìm theo chuyên mục
Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

Follow along with the video below to see how to install our site as a web app on your home screen.

Note: This feature may not be available in some browsers.

  • Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc
  • Trang chủ
  • Diễn đàn
  • Lập Trình với Excel
  • Lập Trình với Excel
You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Sửa lỗi khi Record macro có nội dung 1 hàm dài xuống dòng bị lỗi
  • Thread starter Thread starter tranhthurac
  • Ngày gửi Ngày gửi 9/4/20
Liên hệ QC T

tranhthurac

Thành viên mới
Tham gia 6/10/16 Bài viết 35 Được thích 3 Mã code từ record Mã:Sao chép. Sub record() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000" & _ "olieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Mã code phải sửa lại Mã:Sao chép. Sub sualai() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000,INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Chỗ xuống dòng bị thiếu ,INDEX(s Bác nào biết chỉ giúp. Tks
  • 1
  • 2
Tiếp 1 of 2

Go to page

Tiếp tục Tiếp Last Sắp xếp theo thời gian sắp xếp theo bầu chọn B

Bluestar092011

Thành viên hoạt động
Tham gia 17/8/15 Bài viết 129 Được thích 147 Giới tính Nam
tranhthurac đã viết: Mã code từ record Mã:Sao chép. Sub record() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000" & _ "olieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Mã code phải sửa lại Mã:Sao chép. Sub sualai() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000,INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Chỗ xuống dòng bị thiếu ,INDEX(s Bác nào biết chỉ giúp. Tks Nhấp chuột vào đây để mở rộng...
Là sao vậy bạn? Ý bạn muốn là gì? Upvote 0 T

tranhthurac

Thành viên mới
Tham gia 6/10/16 Bài viết 35 Được thích 3
Bluestar092011 đã viết: Là sao vậy bạn? Ý bạn muốn là gì? Nhấp chuột vào đây để mở rộng...
Không hiểu tại sao khi record macro, nó cho ra đoạn mã code như cái đầu, không có chạy được, do việc gắt xuống dòng bị lỗi. Như đoạn code trên vừa thừa vừa thiếu: Dòng trên thì thứa ký tự " &, còn dòng dưới thì thiếu ,INDEX(s Bạn hướng dẫn giúp cách record macro mà không bị lỗi khi đoạn code có xuống dòng. Cách mình đang làm thủ công hiện tại là ngắt biểu thức làm 2, rồi record 2 lần, sau đó ghép nối code lại, cách này mất nhiều thời gian và hay bị lỗi do nhầm lẫn. Upvote 0 B

Bluestar092011

Thành viên hoạt động
Tham gia 17/8/15 Bài viết 129 Được thích 147 Giới tính Nam
tranhthurac đã viết: Không hiểu tại sao khi record macro, nó cho ra đoạn mã code như cái đầu, không có chạy được, do việc gắt xuống dòng bị lỗi. Như đoạn code trên vừa thừa vừa thiếu: Dòng trên thì thứa ký tự " &, còn dòng dưới thì thiếu ,INDEX(s Bạn hướng dẫn giúp cách record macro mà không bị lỗi khi đoạn code có xuống dòng. Cách mình đang làm thủ công hiện tại là ngắt biểu thức làm 2, rồi record 2 lần, sau đó ghép nối code lại, cách này mất nhiều thời gian và hay bị lỗi do nhầm lẫn. Nhấp chuột vào đây để mở rộng...
Bạn nói thế nào chứ tôi record vẫn bình thường mà, có cắt thiếu miếng gì đâu. Upvote 0 T

tranhthurac

Thành viên mới
Tham gia 6/10/16 Bài viết 35 Được thích 3
Bluestar092011 đã viết: Bạn nói thế nào chứ tôi record vẫn bình thường mà, có cắt thiếu miếng gì đâu. Nhấp chuột vào đây để mở rộng...
Video quay lại quá trình làm Bạn xem video mình làm không biết có sai gì không bạn à. Upvote 0 B

Bluestar092011

Thành viên hoạt động
Tham gia 17/8/15 Bài viết 129 Được thích 147 Giới tính Nam
tranhthurac đã viết: Video quay lại quá trình làm Bạn xem video mình làm không biết có sai gì không bạn à. Nhấp chuột vào đây để mở rộng...
Cái này thì không biết rồi, chứ mày tôi nhập công thức vẫn ghi lại code chạy bình thường. Upvote 0 T

tranhthurac

Thành viên mới
Tham gia 6/10/16 Bài viết 35 Được thích 3
Bluestar092011 đã viết: Cái này thì không biết rồi, chứ mày tôi nhập công thức vẫn ghi lại code chạy bình thường. Nhấp chuột vào đây để mở rộng...
Cảm ơn bạn. Có khi nào bị lỗi excel không ta? Upvote 0 SA_DQ

SA_DQ

/(hông là gì!
Thành viên danh dự Tham gia 8/6/06 Bài viết 14,566 Được thích 22,872 Nghề nghiệp U80 Có thể bạn đưa file giả lập lên không (?) }}}}} :D }}}}} Upvote 0 H

HieuCD

Chuyên gia GPE
Tham gia 14/9/10 Bài viết 9,850 Được thích 23,484
tranhthurac đã viết: Video quay lại quá trình làm Bạn xem video mình làm không biết có sai gì không bạn à. Nhấp chuột vào đây để mở rộng...
Có thể trong công thức Excel có các khoảng trắng, xóa hết các khoảng trắng rồi thu macro lại Upvote 0 V

VetMini

Ăn cùng góc phố
Tham gia 21/12/12 Bài viết 17,664 Được thích 24,479
HieuCD đã viết: Có thể trong công thức Excel có các khoảng trắng, xóa hết các khoảng trắng rồi thu macro lại Nhấp chuột vào đây để mở rộng...
Tôi nghĩ là cái phiên bản macro kia nó cũ, không chép được công thức dài trên 255 ký tự. Cách đi vòng là dùng name để rút ngắn công thức. Upvote 0 H

HieuCD

Chuyên gia GPE
Tham gia 14/9/10 Bài viết 9,850 Được thích 23,484
VetMini đã viết: Tôi nghĩ là cái phiên bản macro kia nó cũ, không chép được công thức dài trên 255 ký tự. Cách đi vòng là dùng name để rút ngắn công thức. Nhấp chuột vào đây để mở rộng...
Xem lại video, sub Test không phải macro gốc mà đã qua chỉnh sửa :cool: Upvote 0 T

tranhthurac

Thành viên mới
Tham gia 6/10/16 Bài viết 35 Được thích 3
VetMini đã viết: Tôi nghĩ là cái phiên bản macro kia nó cũ, không chép được công thức dài trên 255 ký tự. Cách đi vòng là dùng name để rút ngắn công thức. Nhấp chuột vào đây để mở rộng...
Sử dụng Excel 2013 bạn à. Bài đã được tự động gộp: 10/4/20
HieuCD đã viết: Xem lại video, sub Test không phải macro gốc mà đã qua chỉnh sửa :cool: Nhấp chuột vào đây để mở rộng...
Video là làm lại để ghi lại các bước làm để nhờ các bác kiểm tra giúp có bị sai gì hay không. Kết quả làm ở video là đoạn code Mã:Sao chép. Sub record() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000" & _ "olieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Lần chỉnh sửa cuối: 10/4/20 Upvote 0 H

HieuCD

Chuyên gia GPE
Tham gia 14/9/10 Bài viết 9,850 Được thích 23,484
tranhthurac đã viết: Sử dụng Excel 2013 bạn à. Bài đã được tự động gộp: 10/4/20 Video là làm lại để ghi lại các bước làm để nhờ các bác kiểm tra giúp có bị sai gì hay không. Kết quả làm ở video là đoạn code Mã:Sao chép. Sub record() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000" & _ "olieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Nhấp chuột vào đây để mở rộng...
Bạn gởi sub gốc không chỉnh sửa mới biết bị gì Upvote 0 befaint

befaint

|||||||||||||
Tham gia 6/1/11 Bài viết 14,537 Được thích 19,736
tranhthurac đã viết: Sử dụng Excel 2013 bạn à. Nhấp chuột vào đây để mở rộng...
Bạn gửi file đang làm lên nhé. Upvote 0 T

tranhthurac

Thành viên mới
Tham gia 6/10/16 Bài viết 35 Được thích 3
befaint đã viết: Bạn gửi file đang làm lên nhé. Nhấp chuột vào đây để mở rộng...
Gửi bạn file đính kèm, nhờ bạn kiểm tra giúp. Cái mình đang record là ô X10, sheet 2. XLSL 1-14
HieuCD đã viết: Bạn gởi sub gốc không chỉnh sửa mới biết bị gì Nhấp chuột vào đây để mở rộng...
Sub gốc không chỉnh sửa gì ở đây bạn Mã:Sao chép. Sub record() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000" & _ "olieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Để đoạn sub gốc này không có chạy, muốn chạy thì mình phải sửa lại như sau Mã:Sao chép. Sub sualai() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000,INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Việc sửa thủ công bằng cách ngắt biểu thức ra làm các đoạn nhỏ, rồi chép từng đoạn code ghép lại, vừa mất thời gian và hay bị sai sót làm lại nhiều lần mới dc :( Biểu thức tính toán có thể rút giảm dc, nhưng do tính chất công việc không rút ngắn dc.

File đính kèm

  • Trao đỏi GPX.xlsm Trao đỏi GPX.xlsm 223.9 KB · Đọc: 4
Upvote 0 befaint

befaint

|||||||||||||
Tham gia 6/1/11 Bài viết 14,537 Được thích 19,736
tranhthurac đã viết: file đính kèm Nhấp chuột vào đây để mở rộng...
Quả thực là nếu đã dùng VBA thì không ai lại dùng nó để đi điền công thức cả.
tranhthurac đã viết: mất thời gian và hay bị sai sót Nhấp chuột vào đây để mở rộng...
Nhìn Rờ với Cờ chóng mặt, viết thế này cho dễ. PHP:Sao chép. Sub vidu() Dim congthuc As String congthuc = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(W10),4),""1"","""")&ROW())="""","""", " & _ "IF(OR(INDEX(solieu,U10+3,(Z$6-1)*$B$3+$G$4)="""",AJ10=$B$2),""""," & _ "IF(AND(INDEX(solieu,U10+3,(X$6-1)*$B$3+$G$4)="""",Z10>0),Z10," & _ "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(AC10),4),""1"","""")&7)/100>442," & _ "((AB10*100)-TRUNC(AB10*100))/150,0)+IF(AJ10=$B$1,Z10-O10/1000,INDEX(solieu,U10+3,(X$6-1)*$B$3+$G$4)))))" Sheet17.Range("X10").Value = congthuc End Sub Upvote 0 T

tranhthurac

Thành viên mới
Tham gia 6/10/16 Bài viết 35 Được thích 3
befaint đã viết: Quả thực là nếu đã dùng VBA thì không ai lại dùng nó để đi điền công thức cả. Nhìn Rờ với Cờ chóng mặt, viết thế này cho dễ. PHP:Sao chép. Sub vidu() Dim congthuc As String congthuc = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(W10),4),""1"","""")&ROW())="""","""", " & _ "IF(OR(INDEX(solieu,U10+3,(Z$6-1)*$B$3+$G$4)="""",AJ10=$B$2),""""," & _ "IF(AND(INDEX(solieu,U10+3,(X$6-1)*$B$3+$G$4)="""",Z10>0),Z10," & _ "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(AC10),4),""1"","""")&7)/100>442," & _ "((AB10*100)-TRUNC(AB10*100))/150,0)+IF(AJ10=$B$1,Z10-O10/1000,INDEX(solieu,U10+3,(X$6-1)*$B$3+$G$4)))))" Sheet17.Range("X10").Value = congthuc End Sub Nhấp chuột vào đây để mở rộng...
Cảm ơn bạn, mình đã hiểu cách làm, vì không có kiến thức nhiều, nên sử dụng chức năng record lại để chỉnh sửa trên đó :( Tại mới tìm hiểu và đang chờ sách VBA cơ bản GPE chuyển về để đọc. Upvote 0 H

HieuCD

Chuyên gia GPE
Tham gia 14/9/10 Bài viết 9,850 Được thích 23,484
tranhthurac đã viết: Gửi bạn file đính kèm, nhờ bạn kiểm tra giúp. Cái mình đang record là ô X10, sheet 2. XLSL 1-14 Sub gốc không chỉnh sửa gì ở đây bạn Mã:Sao chép. Sub record() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000" & _ "olieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Để đoạn sub gốc này không có chạy, muốn chạy thì mình phải sửa lại như sau Mã:Sao chép. Sub sualai() Sheet17.Range("x10").Formula = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[-1]),4),""1"","""")&ROW())="""",""""," & Chr(10) & "IF(OR(INDEX(solieu,RC[-3]+3,(R6C[2]-1)*R3C2+R4C7)="""",RC[12]=R2C2),""""," & Chr(10) & "IF(AND(INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)="""",RC[2]>0),RC[2]," & Chr(10) & "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(RC[5]),4),""1"","""")&7)/100>442,((RC[4]*100)-TRUNC(RC[4]*100))/150,0)+IF(RC[12]=R1C2,RC[2]-RC[-9]/1000,INDEX(solieu,RC[-3]+3,(R6C-1)*R3C2+R4C7)))))" End Sub Việc sửa thủ công bằng cách ngắt biểu thức ra làm các đoạn nhỏ, rồi chép từng đoạn code ghép lại, vừa mất thời gian và hay bị sai sót làm lại nhiều lần mới dc :( Biểu thức tính toán có thể rút giảm dc, nhưng do tính chất công việc không rút ngắn dc. Nhấp chuột vào đây để mở rộng...
Bị cắt đúng 255 ký tự như bài #10 Upvote 0 T

tranhthurac

Thành viên mới
Tham gia 6/10/16 Bài viết 35 Được thích 3
befaint đã viết: Quả thực là nếu đã dùng VBA thì không ai lại dùng nó để đi điền công thức cả. Nhìn Rờ với Cờ chóng mặt, viết thế này cho dễ. PHP:Sao chép. Sub vidu() Dim congthuc As String congthuc = _ "=IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(W10),4),""1"","""")&ROW())="""","""", " & _ "IF(OR(INDEX(solieu,U10+3,(Z$6-1)*$B$3+$G$4)="""",AJ10=$B$2),""""," & _ "IF(AND(INDEX(solieu,U10+3,(X$6-1)*$B$3+$G$4)="""",Z10>0),Z10," & _ "IF(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(AC10),4),""1"","""")&7)/100>442," & _ "((AB10*100)-TRUNC(AB10*100))/150,0)+IF(AJ10=$B$1,Z10-O10/1000,INDEX(solieu,U10+3,(X$6-1)*$B$3+$G$4)))))" Sheet17.Range("X10").Value = congthuc End Sub Nhấp chuột vào đây để mở rộng...
Bạn cho hỏi cách để không hiển thị địa chỉ tương đối Rờ Cờ, mà cho nó hiển thị địa chỉ tuyệt đối A2, hay X6.... Có làm theo hướng dẫn, tùy chọn (bật hay tắt) nút Use Relative Refrences thì nó vẫn cứ Rờ và Cờ như thường :(hoi 3.jpg Upvote 0 befaint

befaint

|||||||||||||
Tham gia 6/1/11 Bài viết 14,537 Được thích 19,736
tranhthurac đã viết: Bạn cho hỏi cách để không hiển thị địa chỉ tương đối Rờ Cờ, mà cho nó hiển thị địa chỉ tuyệt đối A2, hay X6.... Nhấp chuột vào đây để mở rộng...
Bạn viết công thức ở bảng tính, rồi chép vào code là được thôi. Upvote 0
  • 1
  • 2
Tiếp 1 of 2

Go to page

Tiếp tục Tiếp Last Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây. Web KT

Bài viết mới nhất

HeSanbi
  • Đã giải quyết
ExplorerXL - Quản lý thư mục với Excel: tìm, đổi tên, sao chép, di chuyển và xóa
    • Thích
    • Yêu thích
    • Cảm ơn
  • HeSanbi
  • 20/9/19
  • Lập Trình với Excel
2 3 4 Trả lời 78 Đọc 16K 27 phút trước HeSanbi HeSanbi ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba
    • Thích
    • Yêu thích
    • Cảm ơn
  • ongke0711
  • 6/10/24
  • Lập Trình với Excel
13 14 15 Trả lời 297 Đọc 20K 37 phút trước BlueSphere B B Xin hàm đếm số lượng khách hàng theo 1 điều kiện và bỏ dữ liệu trùng.
  • bipbo2008
  • 15/12/24
  • Hàm và công thức Excel
Trả lời 8 Đọc 244 Hôm nay lúc 12:42 Phan Thế Hiệp Phan Thế Hiệp S Tính trung bình của tháng đầu tiên.
  • SteveNguyen1991
  • Hôm qua, lúc 21:36
  • Hàm và công thức Excel
Trả lời 1 Đọc 102 Hôm nay lúc 09:27 Phan Thế Hiệp Phan Thế Hiệp Nguyễn Duy Tuân Hàm BS_FORMATTEXT Tạo công thức định dạng văn bản trong Excel với Add-in A-Tools v10
  • Nguyễn Duy Tuân
  • Hôm nay lúc 09:05
  • BLUESOFTS: A-Excel, A-Tools
Trả lời 0 Đọc 23 Hôm nay lúc 09:05 Nguyễn Duy Tuân Nguyễn Duy Tuân Nguyễn Duy Tuân Hàm BS_TEXT trộn văn bản trong Excel với Add-in A-Tools v10
  • Nguyễn Duy Tuân
  • Hôm nay lúc 08:36
  • BLUESOFTS: A-Excel, A-Tools
Trả lời 0 Đọc 22 Hôm nay lúc 08:36 Nguyễn Duy Tuân Nguyễn Duy Tuân aduc Nhật ký thi công bằng excel
    • Thích
  • aduc
  • 27/10/13
  • Excel và Kỹ Thuật
2 Trả lời 36 Đọc 53K Hôm nay lúc 08:35 PhanTuHuong PhanTuHuong T
  • Question Question
Xin code VBA trả về tên tài khoản theo điều kiện
    • Chấp nhận
  • Thanh Binh111
  • Thứ sáu lúc 16:40
  • Lập Trình với Excel
Trả lời 8 Đọc 137 Hôm qua, lúc 21:02 ptm0412 ptm0412 likosin xin cách lọc này với ạ.
  • likosin
  • Thứ sáu lúc 09:53
  • Lọc và sắp xếp dữ liệu
Trả lời 4 Đọc 120 Hôm qua, lúc 20:58 ptm0412 ptm0412 OverAC [Thông báo] Diễn đàn tạm ngừng hoạt động để bảo trì từ 21g thứ Sáu ngày 20/12
    • Thích
    • Cảm ơn
  • OverAC
  • Thứ năm lúc 22:13
  • Thông tin về diễn đàn
Trả lời 1 Đọc 917 Hôm qua, lúc 14:18 OverAC OverAC A Nhờ xử lý tính toán Số nằm trong chuỗi kí tự
  • acrox84
  • 15/12/24
  • Xử lý chuỗi ký tự
2 Trả lời 20 Đọc 547 Thứ sáu lúc 20:35 SteveNguyen1991 S V
  • Question Question
FILE EXCEL LOI : WE FOUND A PROBLEM ... RECOVER
  • vuasutu08
  • Thứ sáu lúc 16:03
  • Lập Trình với Excel
Trả lời 0 Đọc 63 Thứ sáu lúc 16:03 vuasutu08 V D
  • Question Question
Gửi Email chào giá hàng loạt cho đối tác có nhúng 1 bảng báo giá vào mail
  • ductoan.0703
  • Thứ tư lúc 14:49
  • Lập Trình với Excel
Trả lời 3 Đọc 181 Thứ sáu lúc 15:12 BuiQuangThuan B likosin Nhờ các bác hướng dẫn ạ.
  • likosin
  • Thứ sáu lúc 08:59
  • Giải thích, gỡ rối, xử lý lỗi công thức
Trả lời 1 Đọc 80 Thứ sáu lúc 14:02 yaaasoo01 Y C Lỗi hàm days360
  • Cuong001
  • Thứ năm lúc 09:28
  • Hỏi đáp những vấn đề khác
Trả lời 9 Đọc 182 Thứ sáu lúc 12:20 HieuCD H HeSanbi
  • Đã giải quyết
HÀM FITROW - Co giãn dòng tự động tối ưu nhất cho Excel v2.43 (*14/10/2024)
    • Thích
    • Yêu thích
  • HeSanbi
  • 18/4/21
  • Lập Trình với Excel
2 3 Trả lời 50 Đọc 22K Thứ sáu lúc 11:03 HeSanbi HeSanbi Huy@@* Xử lý sổ NKC - Gộp nợ có thành 1 dòng
  • Huy@@*
  • Thứ tư lúc 09:05
  • Những vấn đề chung
Trả lời 5 Đọc 189 Thứ sáu lúc 06:23 DeTong D H Hướng dẫn in hàng loạt trong excel
  • hieuchi89
  • 28/8/24
  • Hàm và công thức Excel
Trả lời 16 Đọc 1K Thứ sáu lúc 00:58 dinhthang8709 D P Xin hỏi cách tăng tốc khi nhập liệu cho sheet NHAPXUAT
  • pqdowntailieu3
  • Thứ năm lúc 16:59
  • Google Spreadsheets
Trả lời 3 Đọc 157 Thứ năm lúc 22:38 ptm0412 ptm0412 L Xin được giúp đỡ DÒ TÌM lấy danh sách tổng giá các đơn hàng
    • Thích
  • LINHCM
  • 15/12/24
  • Tìm kiếm, dò tìm và tham chiếu
2 Trả lời 26 Đọc 696 Thứ năm lúc 21:53 LINHCM L Xem thêm… Chia sẻ: Facebook X (Twitter) LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

Thành viên có số lượng bài viết cao nhất tháng

  • Hoàng Tuấn 868 29
  • HeSanbi 27
  • LINHCM 25
  • ptm0412 24
  • hoangtuaotrang_hp_vn 21
  • HieuCD 18
  • qtm1987 17
  • ongke0711 17
  • SA_DQ 17
  • huuthang_bd 16
  • DeTong 15
  • hoangminhtien 13
  • hvnhpro 13
  • HUONGHCKT 12
  • BuiQuangThuan 12
  • SteveNguyen1991 11
  • Duy Tùng 9x 10
  • GPE-Trợ Lý 9
  • Nguyễn Duy Tuân 9
  • befaint 8

Thành viên có điểm tương tác cao nhất tháng

  • HieuCD 70
  • huuthang_bd 34
  • Hoàng Tuấn 868 31
  • hoangtuaotrang_hp_vn 28
  • hoangminhtien 24
  • SA_DQ 24
  • HeSanbi 23
  • HUONGHCKT 22
  • DeTong 22
  • GPE-Trợ Lý 21
  • ptm0412 21
  • befaint 21
  • ongke0711 15
  • longtay1111 13
  • Phuocam 12
  • NT Ngoc Yen 12
  • Hai Lúa Miền Tây 11
  • Nguyễn Duy Tuân 11
  • OverAC 10
  • qtm1987 9

Đếm ngược thời gian

000 Ngày 00 Giờ 00 phút 00 giây Chúc mừng năm mới
  • Trang chủ
  • Diễn đàn
  • Lập Trình với Excel
  • Lập Trình với Excel
  • Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…
Back Top Bottom

Từ khóa » Excel Bị Lỗi Rc