Excel Forum
 
 

Geri Git   Excel Forum > EXCEL-Soruları > Makro-VBA
Atatürk

DUYURU SİSTEMİ

Makro-VBA Makro veya VBA ile ilgili sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz



Yanıtla
 
Konu Araçları Görünüm Modları
Eski 09-02-2010, 07:35   #1
Yesilyurtlu
 
Giriş: 22/05/2009
Bölüm: Malatya
Mesaj: 440
Excel Vers. ve Dili:
Office 2003
Varsayılan kopyala yapıştır

Üstadlarım
Makro ile en basitinden

A sayfasındaki E3 hücresini B sayfasında ki L5 hücresine kopyalayacak bir makro

Birde
A Sayfasında ki E3 E4 E5 yani çoğul hücreleri B Sayfasında ki U9 U10 U11 gibi çoğul hücrelere hücre belirterek kopyalayıp yapıştıracak makro kodunu paylaşabilir misiniz?
Yesilyurtlu Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-02-2010, 13:52   #2
acolkesen1
 
Giriş: 04/12/2007
Bölüm: akçakoca
Mesaj: 389
Excel Vers. ve Dili:
office xp with frontpage
Varsayılan

Merhaba,
Aşağdaki kodu kullanabilirsiniz. daha farklı birşeyler istiyorsanız bir örnek çalışma ekleyiniz. İyi çalışmalar.
Sub kopyala()
Sheets("A").Range("e3").Copy Sheets("B").Range("L5")
End sub
__________________
acolkesen
acolkesen1 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-02-2010, 14:05   #3
Evren Gizlen
Uzman
 
Evren Gizlen kullanıcısının avatarı
 
Giriş: 01/03/2005
Mesaj: 13,585
Excel Vers. ve Dili:
Windows-XP_TR Ofis-2003_TR
Varsayılan

Alıntı:
Yesilyurtlu tarafından gönderildi Mesajı Görüntüle
Üstadlarım
Makro ile en basitinden

A sayfasındaki E3 hücresini B sayfasında ki L5 hücresine kopyalayacak bir makro

Birde
A Sayfasında ki E3 E4 E5 yani çoğul hücreleri B Sayfasında ki U9 U10 U11 gibi çoğul hücrelere hücre belirterek kopyalayıp yapıştıracak makro kodunu paylaşabilir misiniz?
Kod:
sheets("A").range("E3").copy sheets("B").range("L5")
sheets("A").range("E3:E5").copy sheets("B").range("U9")
__________________
FORUM KURALLARI

Kod anlatılmaz yazılır.
DİKKAT .: Kodları çalıştırmadan önce dosyanın bir yedeğini almanız daha doğru olacaktır.


www.excel.web.tr UZMAN
www.excelce.net/forum/index.php YÖNETİCİ
Evren Gizlen Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-02-2010, 19:44   #4
Yesilyurtlu
 
Giriş: 22/05/2009
Bölüm: Malatya
Mesaj: 440
Excel Vers. ve Dili:
Office 2003
Varsayılan

Evren Abim ve sayın acolkesen1 ellerinize sağlık.
Teşekkür Ederim
Yesilyurtlu Çevrimdışı   Alıntı Yaparak Cevapla
Eski 10-02-2010, 13:14   #5
Yesilyurtlu
 
Giriş: 22/05/2009
Bölüm: Malatya
Mesaj: 440
Excel Vers. ve Dili:
Office 2003
Varsayılan

Selamün Aleyküm;
Üstadlarımdan sayfa1 sekmesinde A1:A100 hücrelerinde ki değerleri B1:B100'e 1'ncisi keserek üstüste 2'nciside kesmeden üstüste toplayacak makro kodunu rica etsem paylaşabilir misiniz? Ama en basidinden olacak.. İlk olduğu için anlayabileceğim şekilde olmalı.

Teşekkür Ederim
Yesilyurtlu Çevrimdışı   Alıntı Yaparak Cevapla
Eski 19-04-2010, 11:52   #6
muokumus
 
muokumus kullanıcısının avatarı
 
Giriş: 28/09/2007
Bölüm: Zonguldak
Mesaj: 698
Excel Vers. ve Dili:
2007 Türkçe
Varsayılan

Sub Düğme1_Tıklat()
Sayfa1.Range("E&h1:f&ı1").Copy Sayfa1.Range("n&h1&ı1")
End Sub

yukarıdaki makroda satır sayısını h1 ve ı1 deki değerlere göre belirlemek için yaptım.ancak hata veriyor.Nasıl bir düzenleme yaparsak sorunu çözebiliriz
__________________
---------------------------------------------------
biliyorsan konuş ibret alsınlar,
bilmiyorsan sus adam sansınlar!
---------------------------------------------------
muokumus Çevrimdışı   Alıntı Yaparak Cevapla
Eski 19-04-2010, 12:57   #7
muokumus
 
muokumus kullanıcısının avatarı
 
Giriş: 28/09/2007
Bölüm: Zonguldak
Mesaj: 698
Excel Vers. ve Dili:
2007 Türkçe
Varsayılan

Sayfa1.Range("E" & [a1]).Copy Sayfa1.Range("5" & [b1])
cevabı buldum
__________________
---------------------------------------------------
biliyorsan konuş ibret alsınlar,
bilmiyorsan sus adam sansınlar!
---------------------------------------------------
muokumus Çevrimdışı   Alıntı Yaparak Cevapla
Eski 19-04-2010, 13:04   #8
muokumus
 
muokumus kullanıcısının avatarı
 
Giriş: 28/09/2007
Bölüm: Zonguldak
Mesaj: 698
Excel Vers. ve Dili:
2007 Türkçe
Varsayılan

Sayfa1.Range("E" & [a1]:"E" & [a2]).Copy Sayfa1.Range("L" & [b1]:"L" & [a2])
arkadaşlar bu makroda hata veriyor.sanırım bunu düzeltemeyeceğim.burda nerde hata yapmışım.
__________________
---------------------------------------------------
biliyorsan konuş ibret alsınlar,
bilmiyorsan sus adam sansınlar!
---------------------------------------------------
muokumus Çevrimdışı   Alıntı Yaparak Cevapla
Eski 19-04-2010, 13:17   #9
muokumus
 
muokumus kullanıcısının avatarı
 
Giriş: 28/09/2007
Bölüm: Zonguldak
Mesaj: 698
Excel Vers. ve Dili:
2007 Türkçe
Varsayılan

Sayfa1.Range("E" & [a1]:"E" & [a2]).Copy Sayfa1.Range("L" & [a1]:"L" & [a2])

bu kısımda hata veriyor
__________________
---------------------------------------------------
biliyorsan konuş ibret alsınlar,
bilmiyorsan sus adam sansınlar!
---------------------------------------------------
muokumus Çevrimdışı   Alıntı Yaparak Cevapla
Eski 19-04-2010, 14:28   #10
muokumus
 
muokumus kullanıcısının avatarı
 
Giriş: 28/09/2007
Bölüm: Zonguldak
Mesaj: 698
Excel Vers. ve Dili:
2007 Türkçe
Varsayılan

Sayfa1.Range("E" & [a1], "E" & [a2]).Copy Sayfa1.Range("c3")

1 saattir uğraştım buldum sonunda
__________________
---------------------------------------------------
biliyorsan konuş ibret alsınlar,
bilmiyorsan sus adam sansınlar!
---------------------------------------------------
muokumus Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 03:12


Bu forum Çorlu WEB - www.elitnet.com.tr tarafından sunulmaktadır.

Dost Site : İlköğretim - Toplu SMS - Göz - Kreş - Rotary - Lions - Trakya İş Dünyası - Trakya Su Arıtma - Çorlu - Çorlu Mobilya - Çorlu WEB - Çorlu KPSS - Çorlu Fotokopi
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2010, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden
Özel Arama