• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Makro ile seçili hücre birleştir

T

talatgorkem

Katılım
2 Ekim 2016
Mesajlar
44
Excel Vers. ve Dili
.
Merhaba arkadaşlar

B3 + B5:C15 hücrelerinde ki yazı ve sayıları, - işareti ile D2 birleştirmek için nasıl bir kod yazılmalı ?

İslem sonunda D2 de ki tüm içeriği kopyalayıp farklı bir alana yapistirabilmem gerekir

NOT : D2 de birleştirme sıralaması örn. B3+B5+C5+B6+C6 ... şeklinde ilerlemeli

Yardımlarınız için şimdiden çok teşekkür ederim
 
Bu şekilde deneyebilirsiniz.
Kod: 
[d2] = [B3&" "&b5&" "&c3&" "&d3]
[d2].Copy
MsgBox [d2] & " Kopyalama Yapıldı"
Application.CutCopyMode = False
 
[d2] = [B3&" "&b5&" "&c3&" "&d3]
[d2].Copy
MsgBox [d2] & " Kopyalama Yapıldı"
Application.CutCopyMode = False

[d2].Copy kısmı için hata veriyor seyit bey
 
seyit bey yardımız için tekrar teşekkür etmek isterim fakat bir sorun oluştu
bir satır içine o kadar uzun bir formül yazamıyorum hata veriyor :(

acaba kod yazarken uzun kod un sonuna bir işaret ekleyerek alt satırdan kodun devamını yazabilir miyiz ?

yani birleşik yazılan bir kodu iki satırda yazabilir miyiz - özellikle uzun olan kodlar için Devamı anlamında bir işaret

ilginiz için tekrar teşekkür ediyorum
 
Bende böyle bir kod yazdım.
Kod: 
Sub Birleştir()
Range("D2") = Range("B3") & "-" & Range("B5") & "-" & Range("C5") & "-" & Range("B6") & "-" & Range("C6") _
& "-" & Range("B7") & "-" & Range("B8")
End Sub
 
valla çıtır ben hepsini tuttum tek tek yazdım fakat kod çok uzun olduğu için hata veriyor hatta kodu bir kaç parçaya böldüm sonra onları da birleştirmek için ayrı bir devam kodu yaptım fakat hücre içinde ki karakterlerde belirli bir sayıyı geçince hata veriyor :(

http://www.excel.web.tr/f48/kod-uzunluou-en-fazla-kac-karakter-olur-t170485.html
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst