• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Tüm ayarları diğer çalışma sayfalarına aktarma

  • Konbuyu başlatan Konbuyu başlatan alves
  • Başlangıç tarihi Başlangıç tarihi
Katılım
28 Aralık 2005
Mesajlar
41
ustalar merhaba ;

site çok işime yarıyor bunu için teşekkür ederim herkese . özellikle kurucularına

benim yine söyle bi sorunum oluştu. bir excel sayfasında 15-20 sayfa arasında çalışma kitabım var bunların hepsi birbiriyle aynı fakat bi tanesini hazırlıyorum diğerlerine kopyalıyorum. biçimlendirmeden renkleri satır sutun genişliklerini aynı yapıyorum. ancak yazdırma ayarları ekran büyüklüğü v.s. özelliklerine aynı biçimlendir özelliği gibi kısa yoldan yapabilirmiyim.

yardımlarınız için teşekkür ederim..
 
kopyalamayı nasıl yapıyorsunuz? sheet üzerine sağ tıklayıp taşı veya kopyala seçeneğinden seçtikten sonra açılan pencerede verinizi taşımak istediğiniz kitabı ve taşımak istediğiniz sheet secerek altta bulunan kopyala seçeneği işaretli olarakmı taşıyorsunuz?
 
. . .

Kod:
Sub kod_bir()
aa = ActiveSheet.Name
bb = Sheets.Count
Application.ScreenUpdating = False
On Error Resume Next

For i = 1 To bb
Sheets(i).Select
ActiveWindow.Zoom = 150
ActiveSheet.PageSetup.PrintArea = "A1:A10"
Next i

Sheets(aa).Select
Application.ScreenUpdating = True
MsgBox " B İ T T İ "
End Sub

. . .
 
Geri
Üst