Hücredeki değeri 4 eşit parçaya bölme

[levoni]

Arkadaşlar Merhaba,
A1 hücresinde yazan 4555888766634441 değerini yandaki B1 hücresine
4555 8887 6663 4441 görüldüğü şekli ile yazmak istiyorum.
Biraz araştırdım ve uğraştım ama yapamadım.
Bu konuda yardımcı olabilirmisiniz
Çok teşekkürler

 

[Korhan Ayhan]

Merhaba,

Hücreyi "METİN" olarak biçimlendirirseniz yazabilirsiniz.

Yada aşağıdaki formülü deneyin.

=METNEÇEVİR(A1;"#### #### #### ####")

 

[excelci1]

hücre üzerinde
sağ tuş> hücre biçimlendir>isteğe uyarlanmış

#### #### #### ####

yazın ve çıkın
kolay gelsin

b1 için

=PARÇAAL(A1;1;4)&" "&PARÇAAL(A1;5;4)&" "&PARÇAAL(A1;9;4)&" "&PARÇAAL(A1;13;4)

 

[levoni]

Sayın Korhan Bey ve "excelci1" çok teşekkür ederim yardımlarınız için

 

[Murat OSMA]

Kod ile yapmak isterseniz;

Sub Emre()
    Dim i As Integer
    For i = 1 To Range("A65536").End(3).Row
        Cells(i, 2) = Format(Cells(i, 1), "#### #### #### ####")
    Next i
    i = Empty
End Sub