Kullanıcı adı:  Şifre:  Her ziyaretimde otomatik giriş yap                              GirişGiriş   
 Sitemize Hoşgeldiniz..! 

Bilişim Teknolojileri-Bilgisayar Forum
Ana Sayfa
Bilişim Teknolojileri Forumu Son Konuları
Son 24 Saat
Kayıt Olun
Kayıt Olun
iletişim
iletişim

Tüm zamanlar UTC + 2 saat [ GITZ ]





Yeni başlık gönder Başlığa cevap ver  [ 18 mesaj ] Sayfaya git 1, 2  Sonraki
Yazar Mesaj
  Excelden İyi Anlayan Yok Mu?
Mesaj 19 May 2017, 04:42 
HİPERAKTİF
HİPERAKTİF



Kayıt: 27 Nis 2008, 13:24
Mesajlar: 2031
Konum: İstanbul



merhaba, excel dosyasında, sayfa sonundaki isimlerin olduğu satırı satırı her sayfada yenilenmesini nasıl yapabilirim? teşekkür ederim

BU MAKRO'yu ekteki dosyada çalıştırabilecek biri var mı? Yapmak istediğim şey şu; baskı önizleme neticesinde oluşan herbir sayfanın sonuna sayfanın en son satırındaki isimlerin olduğu bölümü eklemek istiyorum. Her sayfanın altında imza gibi o kişilerin ismi çıksın istiyorum.

Sub aktar()
sonsatir = Sheets("XXX XXXXX").Range("a65536").End(3).Row
For i = 2 To Sheets.Count
Sheets("XXX XXXXX").Range("a" & sonsatir & ":bq" & sonsatir).Copy Sheets(i).Range("a65536").End(3)(2, 1) ' bu şekilde yaparsanız sayfaların son dolu satırının bir alt satırına aktarır.
Sheets("XXX XXXXX").Range("a" & sonsatir & ":bq" & sonsatir).Copy Sheets(i).Range("a55") ' satır sabit ise bu şekilde kullanabilirsiniz
Next
End Sub

Eklenti:
Eklenti Dosyanın Yasal Olmadığını Düşünüyorsanız, Lütfen Bildiriniz...!
[1.36 MiB]
sayfa altı.rar

90 kere indirildi

_________________
''WICS (World Intelligent Cities Summit) in Istanbul''
http://www.wicsummit.com


En son zodiac tarafından 20 May 2017, 13:53 tarihinde düzenlendi, toplamda 2 kere düzenlendi.

Başa Dön
   
 
  Re: Excel Yardım Lütfen Çok Önemli
Mesaj 19 May 2017, 08:44 
Seçkin Üye
Seçkin Üye
Kullanıcı avatarı



Kayıt: 29 Eyl 2007, 10:07
Mesajlar: 410
Konum: Tokat



Sanırım altbilgiyi soruyorsun hocam.

Dosya> yazdır> sayfa yapısı açarsan üstbilgi altbilgi sekmesinden yapabilirsin.

_________________
BTE - Bilişim Teknolojileri Eğitimcileri Derneği
http://www.bte.org.tr/index.html
Okul
http://www.gormeengelliler60.meb.k12.tr/
braille çev.
http://okuyaneller.info/braille/braille.html


Başa Dön
   
 
  Re: Excel Yardım Lütfen Çok Önemli
Mesaj 19 May 2017, 09:17 
HİPERAKTİF
HİPERAKTİF



Kayıt: 27 Nis 2008, 13:24
Mesajlar: 2031
Konum: İstanbul



latcakir yazdı:
Sanırım altbilgiyi soruyorsun hocam.

Dosya> yazdır> sayfa yapısı açarsan üstbilgi altbilgi sekmesinden yapabilirsin.


Hocam o şekilde olmuyor denedim

_________________
''WICS (World Intelligent Cities Summit) in Istanbul''
http://www.wicsummit.com


Başa Dön
   
 
  Re: Excel Yardım Lütfen Çok Önemli
Mesaj 19 May 2017, 09:40 
HİPERAKTİF
HİPERAKTİF



Kayıt: 27 Nis 2008, 13:24
Mesajlar: 2031
Konum: İstanbul



İstediğim şey excel dosyasının en son satırındaki bölümü her sayfanın altında göstermek, alt bilgi ile olmuyor.

_________________
''WICS (World Intelligent Cities Summit) in Istanbul''
http://www.wicsummit.com


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 19 May 2017, 14:49 
Tecrübeli Üye
Tecrübeli Üye
Kullanıcı avatarı



Kayıt: 09 May 2007, 23:11
Mesajlar: 530



Belki yardımcı olur.... :idea: :idea: :idea: :idea:


Eklentiler:
Eklenti Dosyanın Yasal Olmadığını Düşünüyorsanız, Lütfen Bildiriniz...!
[1.39 MiB]
Desktop.zip

42 kere indirildi
Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 19 May 2017, 16:17 
HİPERAKTİF
HİPERAKTİF



Kayıt: 27 Nis 2008, 13:24
Mesajlar: 2031
Konum: İstanbul



die4you yazdı:
Belki yardımcı olur.... :idea: :idea: :idea: :idea:


Hocam resim mi attınız sayfa alt bilgisi olarak?

_________________
''WICS (World Intelligent Cities Summit) in Istanbul''
http://www.wicsummit.com


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 19 May 2017, 16:32 
Tecrübeli Üye
Tecrübeli Üye
Kullanıcı avatarı



Kayıt: 09 May 2007, 23:11
Mesajlar: 530



evetttt :idea: :idea: :idea:


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 19 May 2017, 18:51 
HİPERAKTİF
HİPERAKTİF



Kayıt: 27 Nis 2008, 13:24
Mesajlar: 2031
Konum: İstanbul



die4you yazdı:
evetttt :idea: :idea: :idea:


hocam resim atınca üst sayfalarda altta kalan bazı bölümler görünmüyor bende denemiştim olmadı :(

_________________
''WICS (World Intelligent Cities Summit) in Istanbul''
http://www.wicsummit.com


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 19 May 2017, 20:02 
HİPERAKTİF
HİPERAKTİF
Kullanıcı avatarı



Kayıt: 08 Ağu 2007, 21:18
Mesajlar: 3847



Notepad ile istediğiniz şekilde yazın, alt bilgi olarak notepaden kopyala yapıştır yapın.

_________________
Söz biliyorsan söyle ibret alsınlar. Yok bilmiyorsan, sus da "ADAM"sansınlar


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 20 May 2017, 06:08 
Site Gezgini
Site Gezgini



Kayıt: 03 Kas 2013, 11:51
Mesajlar: 51



Selamun aleyküm hocam bu fazla uzun değil ki her sayfanın altına kopyala yapıştır yapın olsun bitsin inşallah hayırlısıyla saygı ve selamlar.


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 20 May 2017, 13:51 
HİPERAKTİF
HİPERAKTİF



Kayıt: 27 Nis 2008, 13:24
Mesajlar: 2031
Konum: İstanbul



Aydın ÖZTÜRK yazdı:
Selamun aleyküm hocam bu fazla uzun değil ki her sayfanın altına kopyala yapıştır yapın olsun bitsin inşallah hayırlısıyla saygı ve selamlar.


Aleyküm Selam Hocam, yüzlerce excel dosyası var ve bazı dosyalarda çok sayfalardan oluşuyor, bu dediğiniz yöntemle yapmak hem çok vakit alıyor hemde her sayfa altı için özel ayar yapmak gerekiyor. MAKRO yazarak yapılabiliyor ama yolladığım dosyada ben çalıştıramadımi anlayan varsa çalıştırabilir mi bo MAKRO'yu? teşekkür ederim.

_________________
''WICS (World Intelligent Cities Summit) in Istanbul''
http://www.wicsummit.com


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 20 May 2017, 14:30 
Aktif Üye
Aktif Üye



Kayıt: 12 Ağu 2015, 23:46
Mesajlar: 156



Sayfalardaki satır yükseklikleri eşit değilse hata olur. Eger esitse son satir bilgisini döngünün icine koymalisiniz.


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 20 May 2017, 14:43 
Aktif Üye
Aktif Üye



Kayıt: 12 Ağu 2015, 23:46
Mesajlar: 156



İsimler belki son sayfaya taşabilir. XXX XX.. sayfası 1. sayfa olsun.
Alıntı:
Sub Aktar()
Application.ScreenUpdating = False
Sheets("XXX XXXXX").Range("A55:BZ55").Copy
For i = 2 To Sheets.Count
son = Sheets(i).Cells(Rows.Count, 1).End(3).Row + 1
Sheets("XXX XXXXX").Range("A55:BZ55").Copy Sheets(i).Cells(son, 1)
Sheets(i).Rows(son).RowHeight = 75.75
Next
End Sub


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 20 May 2017, 16:27 
HİPERAKTİF
HİPERAKTİF



Kayıt: 27 Nis 2008, 13:24
Mesajlar: 2031
Konum: İstanbul



mokumus67 yazdı:
İsimler belki son sayfaya taşabilir. XXX XX.. sayfası 1. sayfa olsun.
Alıntı:
Sub Aktar()
Application.ScreenUpdating = False
Sheets("XXX XXXXX").Range("A55:BZ55").Copy
For i = 2 To Sheets.Count
son = Sheets(i).Cells(Rows.Count, 1).End(3).Row + 1
Sheets("XXX XXXXX").Range("A55:BZ55").Copy Sheets(i).Cells(son, 1)
Sheets(i).Rows(son).RowHeight = 75.75
Next
End Sub


Hocam dediğinizi gönderdiğim dosyada uygulayabilir misiniz? Ben yapamadım söylediğinizi, teşekkür ederim.

_________________
''WICS (World Intelligent Cities Summit) in Istanbul''
http://www.wicsummit.com


Başa Dön
   
 
  Re: Excelden İyi Anlayan Yok Mu?
Mesaj 20 May 2017, 17:07 
Aktif Üye
Aktif Üye



Kayıt: 12 Ağu 2015, 23:46
Mesajlar: 156



Vba editörüne bir tane Modül ekleyeyin.
Kodu module yapistirin.
Bir tane ekle menüsünden sekil ekleyin
Sag tiklayip makro ata deyin
Aktar makrosunu seçip tiklayin.


Başa Dön
   
 
Eskiden itibaren mesajları göster:  Sırala  
Yeni başlık gönder Başlığa cevap ver  [ 18 mesaj ]  Sayfaya git 1, 2  Sonraki

Tüm zamanlar UTC + 2 saat [ GITZ ]


Kimler çevrimiçi

Bu forumu gezen kullanıcılar: Hiç bir kayıtlı kullanıcı yok ve 18 misafir


Bu foruma yeni başlıklar gönderemezsiniz
Bu forumdaki başlıklara cevap veremezsiniz
Bu forumdaki mesajlarınızı düzenleyemezsiniz
Bu forumdaki mesajlarınızı silemezsiniz
Bu foruma eklentiler gönderemezsiniz


Bu sitede ismi verilen dosyaların ve yazışmaların sorumlulukları kaynaklarına aittir.Hak sahibinin talebi durumunda derhal sitemizden kaldırılacaktır.

phpBB-alexa-cizgi-tagem-


Bilgisayar-Bilişim Teknolojileri