Note: The other languages of the website are Google-translated. Back to English

Tüm çalışma sayfaları yalnızca değerler olarak nasıl kaydedilir?

Birden çok formül içeren bir çalışma kitabınız varsa, şimdi bu dosyayı diğer kullanıcılara dağıtmanız gerekir, formülleri göstermek istemezsiniz, yalnızca değerler görüntülenir. Normalde, verileri yalnızca değerler olarak kopyalayıp yapıştırarak bir çalışma sayfasını hızla değer olarak kaydedebiliriz. Ancak, tüm çalışma sayfalarını birer birer kopyalayıp yapıştırmadan nasıl yalnızca değerler olarak kaydedebilirsiniz?

Tüm çalışma sayfalarını yalnızca VBA kodu ile değer olarak kaydedin


ok mavi sağ balon Tüm çalışma sayfalarını yalnızca VBA kodu ile değer olarak kaydedin

Aşağıdaki VBA kodu, tüm sayfaları hızla değer olarak kaydetmenize (formül yok) ve tüm hücre biçimlendirmesini korumanıza yardımcı olabilir. Lütfen şunu yapın:

1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. tıklayın Ekle > modülve aşağıdaki kodu modül Pencere.

VBA kodu: Tüm çalışma sayfalarını yalnızca değerler olarak kaydedin:

Sub Saveasvalue()
'Updateby Extendoffice
    Dim wsh As Worksheet
    For Each wsh In ThisWorkbook.Worksheets
        wsh.Cells.Copy
        wsh.Cells.PasteSpecial xlPasteValues
    Next
    Application.CutCopyMode = False
End Sub

3. Daha sonra tuşuna basın. F5 Bu kodu çalıştırmak için anahtar ve tüm çalışma kitabı yalnızca değerler olarak kaydedildi, tüm formüller bir kerede kaldırıldı, yalnızca hücre biçimlendirmeli değerleri bıraktı.

not: Kodu uygulamadan önce çalışma kitabının bir kopyasını kaydedebilirsiniz.


En İyi Ofis Üretkenliği Araçları

Kutools for Excel Sorunlarınızın Çoğunu Çözer ve Verimliliğinizi% 80 Artırır

  • Yeniden: Hızlıca yerleştirin karmaşık formüller, grafikler ve daha önce kullandığınız her şey; Hücreleri Şifrele şifre ile; Posta Listesi Oluşturun ve e-posta gönder ...
  • Süper Formül Çubuğu (birden çok metin ve formül satırını kolayca düzenleyin); Okuma Düzeni (çok sayıda hücreyi kolayca okuyun ve düzenleyin); Filtrelenmiş Aralığa Yapıştır...
  • Hücreleri / Satırları / Sütunları Birleştirme Veri kaybetmeden; Bölünmüş Hücre İçeriği; Yinelenen Satırları / Sütunları Birleştirme... Yinelenen Hücreleri Önleyin; Aralıkları Karşılaştır...
  • Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
  • Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
  • Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
  • Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
  • Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
  • 300'den fazla güçlü özellik. Office / Excel 2007-2021 ve 365'i destekler. Tüm dilleri destekler. Kuruluşunuzda veya kuruluşunuzda kolay devreye alma. Tam özellikler 30 günlük ücretsiz deneme. 60 günlük para iade garantisi.
kte sekmesi 201905

Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
ofis tabanı
Yorumları sıralama ölçütü
Yorumlar (18)
Henüz derecelendirme yok. İlk değerlendiren siz olun!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Teşekkürler! VBA kodu harika çalıştı.
Yine de fark ettiğim bir şey, onu bazı hücrelerde Filtre bulunan bir çalışma kitabında kullanmaya çalıştığımda işe yaramayacak.
Bu kodun Filtreyi devre dışı bırakmadan çalışması için herhangi bir geçici çözüm var mı?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Filtreli VBA kodunu kullanırken de aynı sorunu yaşıyorum. Ona bir çözüm buldunuz mu?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Hey, bunu düzeltebildin mi? bende de aynı sorun var
Bu yorum sitedeki moderatör tarafından en aza indirildi
Çok güzel! Birçok sorunumu çözdü. Çok teşekkürler. Saygılarımızla.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Çok sağol Abi..Bu harika..Bana çok yardımcı oldu.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Alt Saveasvalue()
'güncelleme Extendoffice 20161025
Dim wsh As Çalışma Sayfası
ThisWorkbook.Worksheets'teki Her wsh için
wsh.Hücreler.Kopyala
wsh.Cells.PasteSpecial xlPasteValues ​​- Çalışma Zamanı Hatası 1004 alınıyor - BU KONUDA HERKES YARDIMCI OLABİLİR.
Sonraki
Application.CutCopyMode = Yanlış
End Sub
Bu yorum sitedeki moderatör tarafından en aza indirildi
bu kodu çalıştırdığımda "Çalışma Zamanı Hatası 1004 alınıyor" hatası alıyorum.
Bilginize, excel'imde birleştirme hücreleri var.

Birisi çözüm verirse yardımcı olacaktır

teşekkür ederim
Bu yorum sitedeki moderatör tarafından en aza indirildi
merhaba mirna,
Yukarıdaki kod çalışma kitabımda iyi çalışıyor, hangi excel sürümünü kullanıyorsunuz?
Bu yorum sitedeki moderatör tarafından en aza indirildi
İyi çalışıyor. Teşekkürler.

@mirna: Sayfanın veya hücrenin korumasını kaldırmanız gerekir. VB koruma modunu sevmiyor :)
Bu yorum sitedeki moderatör tarafından en aza indirildi
Çalışıyor!! Muito Bom!!!
Bu yorum sitedeki moderatör tarafından en aza indirildi
En basit diller, en özel ve en iyi işlevler için özel olarak düşünülemez. sence puede?
Selamlar.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Tüm sayfalardaki tüm filtreleri/korumayı kaldırın. mükemmel çalışmalıdır.
Bu yorum sitedeki moderatör tarafından en aza indirildi
İyi! Harika! Buna ihtiyacım var ama çarşaf yok
Bu yorum sitedeki moderatör tarafından en aza indirildi
Excel tabanlı finansal tabloları gruplamalar ile yayınlamam gerekiyor. Bu, tüm formülleri temizlemek ve sadece sayıları bırakmak için çalıştı. Denediğim diğer yöntemler gruplamaları temizledi.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Önce formül sürümünü kaydetmeyi unuttuysanız, bunu geri almanın bir yolu var mı?
Bu yorum sitedeki moderatör tarafından en aza indirildi
İyi çalışıyor ama bir grup excel çalışma kitabı için değer olarak bir VBA yapıştırmasına ihtiyacım var.



Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba,
Kullandığım şey bu (dosyadan otomatik olarak çıkıyorum, böylece yanlışlıkla yalnızca değerlerle kaydetmeyeceğim).

Ama tutmak istedim "normalde" yalnızca bir sayfa kaydedildi çünkü dosyayı paylaşırken kaybetmek istemediğim bir açılır listem var.


Bunu yapmama yardım edebilecek var mı?

Teşekkür ederim!


Alt Saveasvalue()

Dim wsh As Çalışma Sayfası
ThisWorkbook.Worksheets'teki Her wsh için
wsh.Hücreler.Kopyala
wsh.Cells.PasteSpecial xlPasteValues
Sonraki
Application.CutCopyMode = Yanlış

savename = Application.GetSaveAsFilename(fileFilter:="Exel Dosyaları (*.xlsx), *.xlsx")
ActiveWorkbook.SaveAs Dosya Adı:=savename, DosyaFormat:=51

Application.DisplayAlerts = False 'uyarısız çık
Application.Quit
End Sub
Bu yorum sitedeki moderatör tarafından en aza indirildi
sämst shjkjhgasghjdfsjhkfdgsdjhgafgb,ja u fdsvjkhgfkjahfg ka khdfzhjkg
Buraya henüz hiç yorum yapılmamış
Lütfen yorum yazın
Misafir olarak yayınlama
×
Bu gönderiyi değerlendirin:
0   Karakterler
Önerilen Konumlar

Bizi takip et

Telif Hakkı © 2009 - www.extendoffice.com. | Tüm hakları Saklıdır. Tarafından desteklenmektedir ExtendOffice. | | | Site Haritası
Microsoft ve Office logosu, Microsoft Corporation'ın Amerika Birleşik Devletleri ve / veya diğer ülkelerdeki ticari markaları veya tescilli ticari markalarıdır.
Sectigo SSL ile korunmaktadır