làm sao bỏ dấu bằng "=" nằm bên trái công thức

[congnguyen88]

Chào các bạn, và các thầy. Ví dụ trong 1 bảng tính mình dùng nhiều công thức thì em thấy nó hơi chậm, Vậy là sao mình có thể bỏ dấu bằng "=" để nó thành Text cho nhẹ. rồi khi nào mình cần tính toán thì thêm dấu "=" trở lại. Gồm 2 đoạn code ( Xóa dấu bằng, và thêm dấu bằng ) Và tất nhiên chỉ code chỉ hoạt động trong 1 vùng nào thôi ( Ví dụ: B3:B20 ). Mong mọi người giúp đỡ. Xin cảm ơn các thầy !

Lưu ý các này không phải : ActiveWindow.DisplayFormulas = True nhé mọi người

 

[vu_tuan_manh_linh]

Đặt biến Cll as range rồi duyệt qua vùng cần hiện công thức, code chỉ thế này thôi:
Cll.Value=right(Cll.Formula,len(Cll.Formula)-1)

 

[congnguyen88]

Chào các bạn, và các thầy. Ví dụ trong 1 bảng tính mình dùng nhiều công thức thì em thấy nó hơi chậm, Vậy là sao mình có thể bỏ dấu bằng "=" để nó thành Text cho nhẹ. rồi khi nào mình cần tính toán thì thêm dấu "=" trở lại. Gồm 2 đoạn code ( Xóa dấu bằng, và thêm dấu bằng ) Và tất nhiên chỉ code chỉ hoạt động trong 1 vùng nào thôi ( Ví dụ: B3:B20 ). Mong mọi người giúp đỡ. Xin cảm ơn các thầy !

Lưu ý các này không phải : ActiveWindow.DisplayFormulas = True nhé mọi người

View attachment 234151

đã giải quyết xong

Public Sub XoaDauBang()
Dim r As Range, a
For Each r In Range("b3:b16")
    a = r.Formula
    If Left(a, 1) = "=" Then r.Value = Mid(a, 2)
Next
End Sub

Public Sub ThemDauBang()
Dim r As Range
For Each r In Range("b3:b16")
    a = r.Formula
    If Len(a) Then
      If Left(a, 1) <> "=" Then r.Value = "=" & a
    End If
Next
End Sub

 

[Nhattanktnn]

Mình hạng gà nhưng cho mình hỏi mục đích để không chạy công thức cho nhẹ thì sao không text to columns cho lẹ nhỉ?

 

[PacificPR]

Chào các bạn, và các thầy. Ví dụ trong 1 bảng tính mình dùng nhiều công thức thì em thấy nó hơi chậm, Vậy là sao mình có thể bỏ dấu bằng "=" để nó thành Text cho nhẹ. rồi khi nào mình cần tính toán thì thêm dấu "=" trở lại. Gồm 2 đoạn code ( Xóa dấu bằng, và thêm dấu bằng ) Và tất nhiên chỉ code chỉ hoạt động trong 1 vùng nào thôi ( Ví dụ: B3:B20 ). Mong mọi người giúp đỡ. Xin cảm ơn các thầy !

Lưu ý các này không phải : ActiveWindow.DisplayFormulas = True nhé mọi người

View attachment 234151

Thử trước khi cho 1 code nào đó chạy thì tắt chế độ tính toán trong bảng tính đi. Xong rồi bật lại

 

[VetMini]

Yêu cầu quái đản và không biết lường trước hậu quả.

Không giản dị chỉ đổi formula thành text và đổi lại là xong đâu.
Một ngày nào đó gặp công thức mảng là tét bét hết.

 

[be_09]

Chào các bạn, và các thầy. Ví dụ trong 1 bảng tính mình dùng nhiều công thức thì em thấy nó hơi chậm, Vậy là sao mình có thể bỏ dấu bằng "=" để nó thành Text cho nhẹ. rồi khi nào mình cần tính toán thì thêm dấu "=" trở lại. Gồm 2 đoạn code ( Xóa dấu bằng, và thêm dấu bằng ) Và tất nhiên chỉ code chỉ hoạt động trong 1 vùng nào thôi ( Ví dụ: B3:B20 ). Mong mọi người giúp đỡ. Xin cảm ơn các thầy !
Lưu ý các này không phải : ActiveWindow.DisplayFormulas = True nhé mọi người

Đây là Box lậo trình thì chỉ cần chay code ra kết quả rồi chứ mắt chi bỏ dấu = rồi lại gán lại.

 

[congnguyen88]

Yêu cầu quái đản và không biết lường trước hậu quả.

Không giản dị chỉ đổi formula thành text và đổi lại là xong đâu.
Một ngày nào đó gặp công thức mảng là tét bét hết.

Hihi thầy ơi. e đã Bay bồ chống sỷ hết rồi. tất nhiên trên vùng chạy code này thì 100% là công thức bình thường, không phải mãng Thầy ạ

Bài đã được tự động gộp: 27/3/20

Đây là Box lậo trình thì chỉ cần chay code ra kết quả rồi chứ mắt chi bỏ dấu = rồi lại gán lại.

Dạ do trình độ chưa đạt như mong đợi, nên vẫn còn dùng công thức thầy ạ

Bài đã được tự động gộp: 27/3/20

Mình hạng gà nhưng cho mình hỏi mục đích để không chạy công thức cho nhẹ thì sao không text to columns cho lẹ nhỉ?

cái này là 1 thủ thuật của mình thôi. Chỉ người trong cuộc mới hiểu được. tại do mình chưa rành Code nên đa số 80% vẫn dùng công thức bạn ạ

 

[PacificPR]

Hihi thầy ơi. e đã Bay bồ chống sỷ hết rồi. tất nhiên trên vùng chạy code này thì 100% là công thức bình thường, không phải mãng Thầy ạ

Bài đã được tự động gộp: 27/3/20

Dạ do trình độ chưa đạt như mong đợi, nên vẫn còn dùng công thức thầy ạ

Cứ từ từ cho nó ngấm Bạn. Nhanh quá khéo tẩu hỏa nhập ma đó

 

[thuyyeu99]

Chào các bạn, và các thầy. Ví dụ trong 1 bảng tính mình dùng nhiều công thức thì em thấy nó hơi chậm, Vậy là sao mình có thể bỏ dấu bằng "=" để nó thành Text cho nhẹ. rồi khi nào mình cần tính toán thì thêm dấu "=" trở lại. Gồm 2 đoạn code ( Xóa dấu bằng, và thêm dấu bằng ) Và tất nhiên chỉ code chỉ hoạt động trong 1 vùng nào thôi ( Ví dụ: B3:B20 ). Mong mọi người giúp đỡ. Xin cảm ơn các thầy !

Lưu ý các này không phải : ActiveWindow.DisplayFormulas = True nhé mọi người

View attachment 234151

Làm vậy chi cho cực vậy hình như range có chức năng cacula mà

 

[be_09]

Hihi thầy ơi. e đã Bay bồ chống sỷ hết rồi. tất nhiên trên vùng chạy code này thì 100% là công thức bình thường, không phải mãng Thầy ạ
Dạ do trình độ chưa đạt như mong đợi, nên vẫn còn dùng công thức thầy ạ
cái này là 1 thủ thuật của mình thôi. Chỉ người trong cuộc mới hiểu được. tại do mình chưa rành Code nên đa số 80% vẫn dùng công thức bạn ạ

Thì chỉ cần diễn giải thế này là người ta hiểu rồi:
1/ Tôi có 1 sheet đã sử dụng hàm tại cột A, B, C gì đó tôi muốn thay thế hàm bằng code các anh/chị giúp em.
2/ Sau khi nhận được code rồi thì có thể hỏi, với code trên em phải check loại bỏ dòng nào để khi chạy code nó hiển thị kết quả khi click vào kết quả em thấy được hàm (nếu sử dụng code với mãng thì không có vụ này").

 

[congnguyen88]

Thì chỉ cần diễn giải thế này là người ta hiểu rồi:
1/ Tôi có 1 sheet đã sử dụng hàm tại cột A, B, C gì đó tôi muốn thay thế hàm bằng code các anh/chị giúp em.
2/ Sau khi nhận được code rồi thì có thể hỏi, với code trên em phải check loại bỏ dòng nào để khi chạy code nó hiển thị kết quả khi click vào kết quả em thấy được hàm (nếu sử dụng code với mãng thì không có vụ này").

dạ em cảm ơn thầy từ vấn. để em nghiên cứu em hỏi 1 loạt luôn . đợt này cho tầu hỏa nhập ma luôn thầy ạ