• DİKKAT

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

A satırındaki sayıları B1 hücresine atma

A sütunundaki sayıları B sütununa mı kopyalamak istiyorsunuz?
 
evet ama b1e kopyalamak istiyorum
 
Merhaba.

Bir hususu netleştirmek lazım sanırım.
Bir hücre aralığını (A1:A14), bir hücreye (B1) kopyalamaktan kastınız nedir?
Biri hücre aralığı, diğeri tek bir hücre.

Sayın mrwarrior, A sütunu, B sütununa mı şeklinde sorduğunda da aynı cevabı vermişsiniz.
.
Kod:
[FONT="Arial Narrow"][B]Sub Düğme1_Tıkla()[/B]
For satır = 1 To Sheets("Sayfa1").[A65536].End(3).Row
    metin = metin & ", " & Sheets("Sayfa1").Cells(satır, 1)
Next
With Sheets("Sayfa1")
.[B1] = Mid(metin, 3, Len(metin) - 2): .[B1].Interior.Color = vbRed: .Columns(2).AutoFit
End With
[B]End Sub[/B][/FONT]
 
yapmak istediğim örneği resimde paylaştım sizinki teker teker atıyor oraya. ben hepsini atmasını istiyorum
Adsız.jpg
 
Demek ki; ihtiyaç net ifade edilmemiş.

Önceki cevabımı güncelledim, sayfayı yenileyerek kontrol ediniz.
.
 
Geri
Üst