AccessTr.neT
Sayfa Kopyalama ve Veri Aktarımı - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Sayfa Kopyalama ve Veri Aktarımı (/konu-sayfa-kopyalama-ve-veri-aktarimi.html)

Sayfalar: 1 2 3 4


Sayfa Kopyalama ve Veri Aktarımı - drummers - 08/04/2012

Kod:
Sub Firma_Ekle()
On Error Resume Next
X = Sheets("Sablon").Cells(65536, 1).End(xlUp).Row
isim = Cells(X, 1)
Sheets("Sablon").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = InputBox("Firma Adı Gir Muko...!!!")
ActiveSheet.Range("A1").Value = ActiveSheet.Name & " Firmasının Gider Pusulaları"
Sheets("Ana Sayfa").Select
End Sub

Bu makro ile "Sablon" isimli sayfamı "InputBox" değerine göre yeni sayfa haline getirebiliyorum.

İsteğim Şudur.

- InputBox a girilen ismi aynı anda "Ana Sayfa" isimli sayfamın B2 hücresinden başlıyarak yazması ve her sayfa eklendiğinde bir alt satıra geçmesi.

- Aynı isimden sayfa olup olmadığını kontrol etmesi var ise uyarı verip kaydetmemesi

- Ana Sayfamdaki "Firma Ay Verilerini Getir" butonuna bastığımda tüm sayfalarda olan ay toplamlarını "Ana Sayfamdaki" ilgili firmaların ilgili aylarına aktarması

Teşekkürler...


Gider Pusulası.rar



Cvp: Sayfa Kopyalama ve Veri Aktarımı - DUAYEN - 08/04/2012

İyi geceler istediğiniz bir kısmı yapılmıştır aynı sayfa ismi ekleme engellenmiştir örneği inceleyip tekrar dönüş yaparsanız sevinirim.


DUAYEN....
Gider Pusulası- DYN.rar



Cvp: Sayfa Kopyalama ve Veri Aktarımı - drummers - 08/04/2012

(08/04/2012, 01:54)DUAYEN yazdı: İyi geceler istediğiniz bir kısmı yapılmıştır aynı sayfa ismi ekleme engellenmiştir örneği inceleyip tekrar dönüş yaparsanız sevinirim.


DUAYEN....
Gider Pusulası- DYN.rar

Teşekkür ederim

Gece gece sıkıntı olmaz ise

- InputBox a girilen ismi aynı anda "Ana Sayfa" isimli sayfamın B2 hücresinden başlıyarak yazması ve her sayfa eklendiğinde bir alt satıra geçmesi.

Bunuda yapabilme şansınız varmı acaba



Cvp: Sayfa Kopyalama ve Veri Aktarımı - DUAYEN - 08/04/2012

Sadece ana sayfaya , sayfa isimlerinimi almak istiyorsunuz.


Cvp: Sayfa Kopyalama ve Veri Aktarımı - drummers - 08/04/2012

(08/04/2012, 02:42)DUAYEN yazdı: Sadece ana sayfaya , sayfa isimlerinimi almak istiyorsunuz.


- eklenen sayfaları "Ana Sayfa" da alt alta eklemiyor sürekli B2 hüzcresi üzerine yazıyor


Cvp: Sayfa Kopyalama ve Veri Aktarımı - DUAYEN - 08/04/2012

Merhaba sizin değişik bir örnek yaptım örneği inceleyiniz sizin içinde uygunsa örnek birlikte geliştiririz.
Gider Pusulası- DYN1.rar

DUAYEN...