Đăng ký học Excel và VBA cùng GPE tháng 11 - TPHCM

Đăng ký học Excel và phân tích số liệu cùng GPE tháng 12 - TPHCM

Mua sách "VBA trong Excel - Cải thiện và tăng tốc" tái bản

Phím tắt để chuyển chữ hoa, chữ thường ?

Thảo luận trong 'Hỏi đáp những vấn đề khác' bắt đầu bởi Chuotdong, 20 Tháng mười hai 2006.

  1. Chuotdong

    Chuotdong Thành viên thường trực

    Trong Excel khi muốn chuyển cả dòng text từ chữ hoa thành chữ thường và ngược lại ? (khi dùng font UNICODE) thì dùng phím tắt nào ?
     
  2. Mr Okebab

    Mr Okebab Ngon Ngất Ngây

    Hình như là không có. Chỉ có WORD thôi (Shift + F3)
     
  3. lachinhan

    lachinhan The God of Pigs

    Gửi Các bác mấy file phím tắt nè
     

    Các file đính kèm:

  4. Mr Okebab

    Mr Okebab Ngon Ngất Ngây

    Rất hay, cảm ơn cậu, nhưng không có phím tắt để Upper hay Lower (Chắc dùng hàm quá)
     
  5. nvson

    nvson Geotechnics

    Nhấn Alt+F11 để vào VBA, sau đó Insert Module, rồi thêm đoạn code sau:
    Mã:
    Option Explicit
     
    'Chuyen thanh chu hoa
    Public Sub UCase_VBA()
    Dim rngData As Range
    Set rngData = Selection
    Dim i As Long, j As Long
    For i = 1 To rngData.Rows.Count
        For j = 1 To rngData.Columns.Count
            If Not rngData.Cells(i, j).HasFormula Then rngData.Cells(i, j) = UCase(rngData.Cells(i, j))
        Next j
    Next i
    End Sub
     
    'Chuyen thanh chu thuong
    Public Sub LCase_VBA()
    Dim rngData As Range
    Set rngData = Selection
    Dim i As Long, j As Long
    For i = 1 To rngData.Rows.Count
        For j = 1 To rngData.Columns.Count
            If Not rngData.Cells(i, j).HasFormula Then rngData.Cells(i, j) = LCase(rngData.Cells(i, j))
        Next j
    Next i
    End Sub
    
    Trở về MS Excel (Alt+Q), nhấn Alt+F8, chọn từng macro trên rồi nhấn vào nút Options, sau đó đặt phím tắt cho macro.
    Khi bạn muốn thay đổi thành chữ hoa hay chữ thường thì chọn vùng rồi nhấn phím tắt đã đặt.
     
  6. Thien

    Thien Thành viên thường trực

    Hi Son

    Nếu dùng VBA thì đã có tích hợp sẵn trong add-in tienichexcel rồi còn gì.
     

Chia sẻ trang này