Ô Excel luôn viết hoa.
Làm thế nào để thiết lập kiểu chữ chỉ cho chữ in hoa trong một số ô nhất định?
Trả lời:
>Đó là một sự điều chỉnh khá dễ dàng. Hãy thử xem,
>Private Sub Worksheet_Change(ByVal Target As Range)
Nếu Not Intersect(Target, Range("C:C,E:I")) Is Nothing Then
Application.EnableEvents = False
Đối với mỗi c trong Target
Nếu Not Intersect(c, Range("C:C,E:I")) Is Nothing And Not c.HasFormula Then _
c.Value = UCase(c.Value)
Tiếp theo c
Ứng dụng.ChoPhóngSựKiện = Đúng
Kết thúc nếu
End Sub
Nhấn tổ hợp phím Alt+Q để đóng cửa sổ VBE và quay lại bảng tính khi hoàn tất.
Trả lời:
Tôi muốn cột C và EI được viết hoa. ...
>Đó là một sự điều chỉnh khá dễ dàng. Hãy thử xem,
>Private Sub Worksheet_Change(ByVal Target As Range)
Nếu Not Intersect(Target, Range("C:C,E:I")) Is Nothing Then
Application.EnableEvents = False
Đối với mỗi c trong Target
Nếu Not Intersect(c, Range("C:C,E:I")) Is Nothing And Not c.HasFormula Then _
c.Value = UCase(c.Value)
Tiếp theo c
Ứng dụng.ChoPhóngSựKiện = Đúng
Kết thúc nếu
End Sub
Nhấn tổ hợp phím Alt+Q để đóng cửa sổ VBE và quay lại bảng tính khi hoàn tất.
Comments
Post a Comment