sadece rakam yazan hücreleri başka bir sayfaya kopyalama

[metot]

arkadaşlar gunlerdir bu konuyla ugrasiyorum bir turlu cozume ulasamadim, konularda arama yaptim yine istedigim sonucu alamadim yardim ederseniz cok sevinirim.ekte gonderdigim dosyada sunu yapmak istiyorum;
dugme1 e tıkladıgımda a sutununda ne kadar veri olursa olsun, bunların icinden sadece rakam olan hucreleri sayfa2 nin a sutununa alt alta yapistirmasini istiyorum. simdiden tesekkur ederim...

 

[Levent Menteşoğlu]

Aşağıdaki kodu deneyin.

Sub kopyala()
[a:a].SpecialCells(xlCellTypeConstants, 1).Copy [sayfa2!a1]
End Sub

 

[metot]

)

cok tesekkur ederim, saatlerce ugrasmistim tek satirda bitirmissiniz olayi, emeginize saglik...

 

[hsayar]

Aşağıdaki kodu deneyin.

Sub kopyala()
[a:a].SpecialCells(xlCellTypeConstants, 1).Copy [sayfa2!a1]
End Sub

............(xlCellTypeConstants, 1)..........
hocam burada kullanılan argumanlar nelerdir alternatifleri nelerdir açıklma zamanınız olabilirse sevinirim.

 

[Necdet]

Sayın hsayar,

Bir dosya üzerinde şu işlemleri yaparken aynı zamanda makro kaydedi de çalıştırınız ve makroyu inceleyiniz.

• F5
• Özel
• ve istediğinizi seçerek OK deyiniz

 

[Levent Menteşoğlu]

............(xlCellTypeConstants, 1)..........
hocam burada kullanılan argumanlar nelerdir alternatifleri nelerdir açıklma zamanınız olabilirse sevinirim.

Bu komut ctrl+g veya f5 kısayol ile açılan "git" penceresindeki uygulamaların vba daki karşılığıdır. Diğer argümanları görmek için ctrl+g veya f5 ile "git" penceresini açmadan önce "makro kaydet" yöntemini çalıştırın. Sonrasında seçtiğiniz tüm uygulamaların kod olarak karşılığını görebilirsiniz.

Aşağıdaki linkte konu ile ilgili güzel açıklamalar mevcuttur.

http://www.ozgrid.com/News/may-2006.htm

 

[hsayar]

teşekkür ederim sn necdet yesertener

 

[hsayar]

teşekkür ederim sn leventm