Bạn có thể xem nhanh những phông chữ nào có sẵn trong Excel
Bạn có thể dễ dàng chọn phông chữ cho một ô. Nhưng danh sách các phông chữ được cài đặt còn dài. Nếu bạn đang tìm kiếm phông chữ phù hợp cho màn hình hoặc nếu bạn muốn thử nghiệm một chút với phông chữ, macro sẽ giúp bạn.
Sử dụng macro sau nếu bạn muốn liệt kê tất cả các phông chữ có sẵn trong cột A của sổ làm việc mới:
Phông chữ phụ Enter ()
Làm mờ danh sách phông chữ Như CommandBarControl, bộ đếm Dưới dạng Số nguyên
Application.ScreenUpdating = Sai
Workbooks.Add
Đặt danh sách phông chữ = Application.CommandBars.FindControl (ID: = 1728)
Đối với bộ đếm = 1 Đến danh sách phông chữ.
Với các ô (bộ đếm, 1)
.Value = Danh sách phông chữ.List (bộ đếm)
.Font.Name = Danh sách phông chữ.List (bộ đếm)
Kết thúc với
Quầy tiếp theo
Cột (1) .AutoFit
Application.ScreenUpdating = True
Kết thúc Sub
Excel nhập tên của từng phông chữ vào các ô và ngay lập tức định dạng ô đó bằng phông chữ thích hợp. Hình minh họa sau đây cho thấy điều này có thể trông như thế nào:
