Mẹo: Các ngôn ngữ khác được Dịch bởi Google. Bạn có thể ghé thăm English phiên bản của liên kết này.
Đăng nhập
x
or
x
x
Ghi danh
x

or

Làm thế nào để giải nén chữ cái đầu tiên của mỗi từ trong ô?

Giả sử bạn có một danh sách tên các nước trong bảng tính của bạn, và bây giờ, bạn cần trích xuất chữ cái đầu tiên của mỗi từ trong ô như sau màn hình hiển thị. Thông thường, không có tính năng trực tiếp để lấy chữ cái đầu tiên của mỗi từ trong Excel. Nhưng, ở đây, tôi có thể nói về một cách hữu ích để giải quyết công việc này.

doc-extract-first-letter1

Trích xuất chữ cái đầu tiên của mỗi từ từ ô với chức năng do người dùng xác định


mũi tên màu xanh bên phảiTrích xuất chữ cái đầu tiên của mỗi từ từ ô với chức năng do người dùng xác định


Trong Excel, bạn có thể tạo một Chức năng do người dùng xác định để trích xuất các chữ cái đầu tiên của mỗi từ trong một ô. Vui lòng làm như sau:

1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > Mô-đun, và dán mã sau trong Cửa sổ mô-đun. </ p>

Function GetFirstLetters(rng As Range) As String
'Update 20140325
    Dim arr
    Dim I As Long
    arr = VBA.Split(rng, " ")
    If IsArray(arr) Then
        For I = LBound(arr) To UBound(arr)
            GetFirstLetters = GetFirstLetters & Left(arr(I), 1)
        Next I
    Else
        GetFirstLetters = Left(arr, 1)
    End If
End Function

3. Sau đó lưu và đóng mã này, quay lại bảng tính và nhập công thức này = GetFirstLetters (A2) (A2 chỉ ra ô mà bạn muốn trích xuất chữ cái đầu tiên, bạn có thể thay đổi nó khi cần) vào một ô trống. Xem ảnh chụp màn hình:

doc-extract-first-letter1

4. Và sau đó nhấn Đi vào và chọn ô B2, sau đó kéo chốt điền vào các ô mà bạn muốn áp dụng công thức này. Và tất cả các chữ cái đầu tiên đã được trích ra từ chuỗi từ, xem ảnh chụp màn hình:

doc-extract-first-letter1


Bài viết liên quan:

Làm thế nào để trích xuất từ ​​đầu tiên / cuối cùng / thứ n từ chuỗi văn bản trong Excel?



Các công cụ sản xuất được đề nghị

Tab Office

sao vàng1 Mang các tab tiện dụng vào Excel và các phần mềm Office khác, giống như Chrome, Firefox và Internet Explorer mới.

Kutools cho Excel

sao vàng1 Kinh ngạc! Tăng năng suất của bạn trong 5 phút. Không cần bất kỳ kỹ năng đặc biệt, tiết kiệm được hai giờ mỗi ngày!

sao vàng1 300 Các tính năng mới cho Excel, Làm cho Excel dễ dàng và mạnh mẽ:

  • Hợp nhất ô / Hàng / Cột mà không mất dữ liệu.
  • Kết hợp và Hợp nhất nhiều trang tính và Workbooks.
  • So sánh các dãy, sao chép nhiều dãy, chuyển đổi văn bản sang ngày, đơn vị và chuyển đổi tiền tệ.
  • Đếm theo màu sắc, Paging Subtotals, sắp xếp nâng cao và Super Filter,
  • Thêm / Chèn / Xóa / Văn bản / Định dạng / Liên kết / Nhận xét / Tập tin / Workheets Công cụ ...

Ảnh chụp màn hình của Kutools cho Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Oleg · 9 months ago
    Подскажите пожалуйста, можно ли модифицировать код чтобы забиралась не первые а Заглавные буквы?
  • To post as a guest, your comment is unpublished.
    nawal jha · 2 years ago
    i think it has one bug, it's automatically removed from module when sheet is closed, need to again every time when open sheet same process to be required, please advice how to save this formula in excel permanently.
  • To post as a guest, your comment is unpublished.
    NoOne · 2 years ago
    Please include this part:

    If you create a function called DISCOUNT in a workbook called Personal.xlsb and you call that function from another workbook, you must type =personal.xlsb!discount(), not simply =discount().

    https://support.office.com/en-us/article/Create-Custom-Functions-in-Excel-2007-2f06c10b-3622-40d6-a1b2-b6748ae8231f
  • To post as a guest, your comment is unpublished.
    Adam Pavey · 2 years ago
    Very helpful. Exactly what I was after.
  • To post as a guest, your comment is unpublished.
    Sridhar · 3 years ago
    Thank you very much.. its working.. u rocks