• Tanımlı fonksiyon kullanımı 1. Microsoft Visual Basic for Applications penceresi açılır, "Ekle > Modül" seçeneğine tıklanır ve aşağıdaki kod boş betiğe yapıştırılır 1.

Function AddSpaces(pValue As String) As String
   'UpdatebyExtendoffice20160908
   Dim xOut As String
   xOut = VBA.Left(pValue, 1)
   For i = 2 To VBA.Len(pValue)
      xAsc = VBA.Asc(VBA.Mid(pValue, i, 1))
      If xAsc >= 65 And xAsc <= 90 Then
         xOut = xOut & " " & VBA.Mid(pValue, i, 1)
      Else
         xOut = xOut & VBA.Mid(pValue, i, 1)
      End If
   Next
   AddSpaces = xOut
End Function
Kopyala

=AddSpaces(A1)

• Kutools for Excel kullanımı 1. Boşluk eklemek istenen hücreler seçilir, "Kutools" > "Metin" > "Metin Ekle" seçeneğine tıklanır 1. Metin Ekle penceresinde, "Metin" kutusuna bir boşluk karakteri girilir, "Gelişmiş" seçeneği işaretlenir ve "Büyük harflerden önce" seçeneği açılır listeden seçilir 1. "Tamam" veya "Uygula" butonuna tıklandığında, her büyük harften önce bir boşluk eklenir 1.
• Formül kullanımı 5. Ad ve soyadı içeren alanlar birleştirilirken

  &

  işlecinden yararlanılır 5. Örneğin,

  =Ad & " " & Soyad

  formülü, ad ve soyadı arasına boşluk ekler 5.