sheet aktarma

[musti_99]

selam arkadaslar

benim sorum su olacakti,,

shhet 1 uzerindeki bilgiler soyle


A1 HHUCRESININ ICERIGI ADI=MUSTAFA
A2 HHUCRESININ ICERIGI SOYADIADI=UCAR
A3 HHUCRESININ ICERIGI ISI=OGRETMEN
A4 HHUCRESININ ICERIGI ADI=MURAT
A5 HHUCRESININ ICERIGI SOYADIADI=YILDIZ
A6 HHUCRESININ ICERIGI ISI=VALI
...
....
BU SEKILDE DEVAM EDIYOR

SHEET 2 YE VERI AKTARMAM LAZIM SU SEKILDE

A1=MUSTAFA
B1=UCAR
C1=OGRETMEN
A2=MURAT
B2=YILDIZ
C2=VALI

INSALLAH ANLATABILMISIMDIR...YARDIMLARINIZI BEKLIYOM..TESEKKURLER:yardim:

 

[veyselemre]

Sub Makro1()
Set s1 = Sheets("sayfa1")
Set s2 = Sheets("sayfa2")

For x = 1 To s1.[a65536].End(3).Row Step 3
    A = A + 1
    For y = 1 To 3
        veri = s1.Cells((A - 1) * 3 + y, 1)
        s2.Cells(A, y) = Right(veri, Len(veri) - InStr(veri, "="))
    Next y
Next x

End Sub

 

[musti_99]

selam

selam kardes oncelikle tesekkurler yardimin icin

http://www.excel.web.tr/showthread.php?t=31789

peki kardes soyle bi durum olursa..

mesela adi alani 3 er arayla gidiyor normalde

a1=adi
a4=adi


boyle olmasa karisik olsa mesela

a1=adi

a5=adi

a12=adi olsa

karisik bi sekilde olsa yapabilirmiyizi,,,

yeni a sutununda adi gecenleri arama yoluyla bulabilirmiyiz?

 

[veyselemre]

Dediğiniz tabiki yapılabir,

ama veriler 2. sayfaya hangi sırada atılacak,
yani a12 de bulunan 3.adı bilgisi 2. sayfada 3.satırın ad kısmına mı yazılacak
1. sayfada A4 deki veri ne olacak gibi soruları cevaplar,örnek verilerin ve örnek aktarımın sayfaların bulunduğu bir çalışma ekleyin, daha çabuk cevap alırsınız.

 

[musti_99]

kardes su sayfada resimler ver bu sekilde demek istedim

http://www.excel.web.tr/showthread.php?t=31000