A1,B1,C1 Hücrelerindeki değerleri D1 hücresinde alt alta yazmak için nasıl bir formül yada makro uygulamalıyım

[darkvenue]

Merhabalar A1,B1,C1 Hücrelerindeki değerleri D1 hücresinde alt alta yazmak için nasıl bir formül yada makro uygulamalıyım ?
Teşekkürler

 

[Korhan Ayhan]

Merhaba,

Deneyiniz...

=A1&DAMGA(10)&B1&DAMGA(10)&C1

Sonrasında D1 hücresi seçiliyken METNİ KAYDIR seçeneğini seçiniz.

 

[RBozkurt]

Merhaba,

Sub AltAltaYaz()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sayfa1") ' Sayfa adını kendi sayfanızın adıyla değiştirin
   
    Dim deger1 As String
    Dim deger2 As String
    Dim deger3 As String
   
    deger1 = ws.Range("A1").Value
    deger2 = ws.Range("B1").Value
    deger3 = ws.Range("C1").Value
   
    ws.Range("D1").Value = deger1 & vbCrLf & deger2 & vbCrLf & deger3
    ws.Range("D1").WrapText = True
End Sub

 

[darkvenue]

Merhaba,

Deneyiniz...

=A1&DAMGA(10)&B1&DAMGA(10)&C1

Sonrasında D1 hücresi seçiliyken METNİ KAYDIR seçeneğini seçiniz.

Çok teşekkür ederim