Çalışma kitabı açıldığında bir sayı otomatik olarak nasıl artırılır?

Çalışma kitabını her açtığınızda bir sayı hücresini otomatik olarak 1 artırmak istiyorsanız, elbette 1'i manuel olarak ekleyebilirsiniz. Ancak, Excel belgesini açarken numara için otomatik olarak 1 eklemenin daha iyi bir yöntemi var mı?

Çalışma kitabı VBA koduyla açıldığında bir sayıyı otomatik olarak artırın

Çalışma kitabı VBA koduyla açıldığında bir sayıyı otomatik olarak artırın

İnanılmaz! Excel'de Chrome, Edge, Firefox ve Safari Gibi Verimli Sekmeler Kullanmak!
Zamanınızın% 50'sinden tasarruf edin ve her gün binlerce fare tıklamasını azaltın!

Aşağıdaki basit VBA kodu, çalışma kitabı her açıldığında sayı hücresi için otomatik olarak 1 eklemenize yardımcı olabilir, lütfen şu şekilde yapın:

1. Basılı tutun ALT + F11 anahtarlar ve açılır Uygulamalar için Microsoft Visual Basic pencere.

2. In Proje-VBAProject bölme, çift tıklama Bu Çalışma Kitabı açmak için modül, ardından aşağıdaki kodu kopyalayıp modüle yapıştırın, ekran görüntüsüne bakın:

VBA kodu: Çalışma kitabı açıldığında bir sayıyı otomatik olarak artırın:

Private Sub Workbook_Open()
Worksheets("Sheet1").Range("A2") = Worksheets("Sheet1").Range("A2") + 1
End Sub

not: Yukarıdaki kodda, Sheet1 ve A2 otomatik olarak artırmak istediğiniz sayıyı içeren sayfa ve hücredir. Lütfen bunları ihtiyacınıza göre değiştirin.

3. O zaman Excel dosyasını şu şekilde kaydetmelisiniz: Excel Makro Etkin Çalışma Kitabı biçim, ekran görüntüsüne bakın:

Şu andan itibaren, bu belirli çalışma kitabını açtığınızda, Sayfa2'deki A1 hücresindeki sayı otomatik olarak 1 eklenecektir.

not: Bu kod yalnızca sayı hücresine uygulanır.

En İyi Ofis Üretkenlik Araçları

🤖	Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
	Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla   |  Boş Satırları Sil   |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin   |   Formülsüz Tur ...
	Süper Arama: Çoklu Ölçütlü VLookup  |   Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
	Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  Bağımlı Açılır Liste   |  Çoklu Seçim Açılır Liste ....
	Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştırın ...
	Öne Çıkan Özellikler: Izgara Odağı   |  Tasarım görünümü   |   Büyük Formül Çubuğu   |  Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynak Kütüphanesi (Otomatik metin)   |  Tarih Seçici   |  Çalışma Sayfalarını Birleştirin   |  Hücreleri Şifrele/Şifresini Çöz   |  E-postaları Listeye Göre Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtre...) ...
	En İyi 15 Araç Seti:  12 Metin Tools (Metin ekle, Karakterleri Kaldır, ...)   |   50+ Grafik Türleri (Gantt şeması, ...)   |   40+ Pratik Formüller (Yaşı doğum gününe göre hesapla, ...)   |   19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle, ...)   |   12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme, ...)   |   7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Bölünmüş hücreler, ...)   |   ... ve dahası

Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar.  En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...

Devamı ... Ücretsiz indirin...

---

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!

Devamı ... Ücretsiz indirin...