• DİKKAT

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

20 excel dosyasının hücresine förmül koyma

  • Konbuyu başlatan Konbuyu başlatan dr_1356
  • Başlangıç tarihi Başlangıç tarihi
Katılım
15 Ocak 2008
Mesajlar
123
Excel Vers. ve Dili
türkçe
20 excel dosyasına yada 500 excel dosyayasının örnegin b1 hücresine =c1 yazdırmak istiyorum bu 500 excel dosyasına zor oldugu için bunu bir anda 500 üne nasıl yazdırabilirim. şimdiden teşekürler
 
merhaba;
ilgili tüm çalışma kitaplarını açınız ve aşağıdaki kodu bir modül üzerinden çalıştırınız.

Kod:
Sub duzenle()
For i = 1 To Workbooks.Count
Workbooks(i).Worksheets(1).Range("b1").Formula = "=c1"
Next
End Sub
 
Geri
Üst