Pintasan keyboard untuk mengubah huruf teks dalam sel di Excel 2010?

Jawaban:

8

Saran Paul bagus atau Anda dapat menulis makro sendiri dan menetapkan tombol pintas

 Sub makeUPPER()
  ActiveCell = UCase(ActiveCell)
 End Sub

 Sub makeLOWER()
  ActiveCell = LCase(ActiveCell)
 End Sub
datatoo
sumber
4

Saya menggunakan teknik berikut untuk mengubah kolom teks menjadi huruf besar.

  1. Pindahkan kursor ke kolom kosong.
  2. Di sel kosong di baris yang sama dengan sel pertama yang ingin Anda konversi, ketikkan =upper(A3), jika A3 adalah sel pertama yang ingin Anda konversi.
  3. Sel yang sebelumnya kosong sekarang harus menunjukkan setara dengan huruf besar dari sel teks pertama Anda.
  4. Salin sel ini ke bawah kolom dengan ketinggian yang sama dengan semua teks Anda.
  5. Anda sekarang harus memiliki kolom yang setara dengan teks Anda, tetapi semuanya dalam huruf besar.
  6. Sorot semua sel teks huruf besar, dan pilih salin.
  7. Klik kiri pada sel pertama teks sumber Anda (yang tidak dalam huruf besar), yang akan memilih sel.
  8. Klik kanan.
  9. Pilih Tempel Spesial
  10. Di kotak daftar, pilih tombol radio "Nilai", dan klik OK.
  11. Anda sekarang akan memiliki 2 kolom teks huruf besar.
  12. Hapus kolom yang berisi =upper() formula.

Prinsip yang sama berfungsi untuk Proper, dan fungsi manipulasi teks lainnya.

Mark Bagley
sumber
1

Jika Anda menginstal addin ASAP Utilities Excel yang sangat baik (gratis untuk penggunaan pribadi) ...

http://www.asap-utilities.com/download-asap-utilities.php

ini memiliki KASUS UPPER bawaan dan opsi huruf kecil (serta jutaan lainnya) yang dapat Anda tetapkan tombol pintasannya (lihat situs web mereka untuk info lebih lanjut)

Paul
sumber
0

Salin teks yang ingin Anda ubah kasing ke kata sorot dan tekan shift + f3 sampai semuanya sesuai dengan yang Anda inginkan dan potong lalu lewati.

Malcolm Solomon
sumber
Itu sama sekali tidak praktis untuk banyak sel.
David Richerby
0

Ini bekerja paling baik untuk saya, karena bekerja pada banyak pilihan sel:

Sub Uppercase()
    For Each Cell In Selection
        If Not Cell.HasFormula Then
            Cell.Value = UCase(Cell.Value)
        End If
    Next Cell
End Sub
Dean
sumber