Xem công thức trong Excel

[romanbrave]

Tôi có vấn đề như sau:
1- Files Excel mà các ô đã được giấu công thức. Làm thế nao để xem các công thức đó?
2- Làm thế nào khi nhập số sai trong Excel vào ô thì đổi màu ô?

Cám ơn anh, chị giúp

 

[levy]

trả lời cho câu số 1:
vào tools---> chọn protection---> unprotection. Sau đó nhập password vào.
câu thứ 2 để nghiên kíu đã nhé, lâu wé ko sử dụng wên rùi.:wall: :wall:

 

[adam_tran]

Tôi có vấn đề như sau:
1- Files Excel mà các ô đã được giấu công thức. Làm thế nao để xem các công thức đó?
2- Làm thế nào khi nhập số sai trong Excel vào ô thì đổi màu ô?

Cám ơn anh, chị giúp

1. Do File của bạn đã được Protect (Tools - Protecttion - Protect Sheet) bằng password. Có thể bẻ pass word bằng 1 vài công cụ nhưng theo tôi, không nên bởi vì: 1. Cần tôn trọng tác giả của file. 2. Có nhiều rủi ro làm mất dữ liệu, công thức được che chắc chắn sẽ phức tạp, bạn không rành thì có xem cũng khó mà làm gì. 3. Muốn giỏi excel, bạn có thể học hỏi từ rất nhiều open source, trên forum này, trên giaiphapexcel.com, không nhất thiết phải xem công thức đó.

2. Bạn vào Format - Conditional Formating, đó là chức năng thay đổi format của cell tùy vào giá trị của ô nhập vào hay 1 ô bất kỳ nào đó.

 

[QDuc]

Bạn nêu thêm điều kiện đi, nha!

Tôi có vấn đề như sau:. . .
2- Làm thế nào khi nhập số sai trong Excel vào ô thì đổi màu ô?

Bạn viết tiếng Anh hay tiếng Việt đây vậy?
Nếu là tiếng Việt, thì:
Sai đối với ai? Với bạn hay với máy (mà tất nhiên với máy thì nó sẽ cho biết ngay). Sai với bạn nhưng máy không biết, thì bạn phải đưa lên ví dụ mới giúp nhau được;
VD Cột này không được nhập chuỗi; cột kia chỉ được nhập ngày tháng, . . .
& cột kia nữa không nhập số quá hàng tỉ, .. . .

 

[HongViet]

Bạn tham khảo macro sau

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ij As Integer
If Not Intersect(Target, Range("A2:A99")) Is Nothing Then
Select Case VarType(Target.Value)
Case 0
ij = 34
Case 1: ij = 35
Case Is < 7: ij = 36
Case 8: ij = 37
Case 9, 13: ij = 38
Case 10, 11, 12: ij = 39
Case Is < 37: ij = 40
Case Else: ij = 41
End Select
End If
With Target.Interior
.ColorIndex = ij: .Pattern = xlSolid
End With
End Sub

Bạn phải chuột vô thanh SheetsName (bên trái dưới cùng màn hình excel)
Chọn dòng cuối của CS vừa xuất hiện;
Chép đoạn mã này vô & đóng CS này lại;
Trở về trang tính, bạn thử nhập số liệu vô vùng A2:A99;
Xem macro làm việc & rút ra ~ gì cần thiết!