• Merhaba Ziyaretçi,
    Microsoft 365 Uygulamaları ile ilgili yeni haberler, dikkat çekici konular, ilgi ile takip edeceğiniz yazılar için.

    Abone Olun
  • ESTE - Microsoft Office Eğitimleri

    Yeni yıl Microsoft Office Eğitim planlarınız için bütçenizi oluşturmadan önce ESTE eğitim kalitesi ile tanışın. 🙌
    Kullanıcıların ihtiyacı olan yazılı materyal, dosya ve video kaynağı desteğimiz ile tüm ofis çalışanlarının iş süreçlerini rahatlatacak eğitimler planlayın. 🎯
    Microsoft Office eğitimlerimiz hakkında detaylı bilgi için bize ulaşın.

    👉 Microsoft Office Eğitim Talebi

Çözüldü makro ile sıra no

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

istiklal

Yeni Üye
Katılım
11 Nis 2019
Mesajlar
32
En iyi yanıt
0
Puanları
8
Yaş
49
Konum
Malatya
Ad Soyad
İlhan Yüksel
Office Vers.
Microsoft Office 2016 TR
c3 ten itibaren bilgi girdikçe b3 ten itibaren sıra no verecek.
Yalnız c sütununda veri silindiği ya da satır silindiği zaman sıra no kendini güncelleyecek.
Bu şekilde bir makro için yardımınızı esirgemezseniz çok memnun olurum.
Ves selam veddua
 

komutan63

Yeni Üye
Katılım
21 Haz 2018
Mesajlar
10
En iyi yanıt
1
Puanları
3
Yaş
60
Konum
Ankara
Ad Soyad
Muzaffer Demir
Office Vers.
Ofis 2010
Selamlar
C3 den itibaren bilgi girdikçe B3 den itibaren otomatik sıra no verir
 

Ekli dosyalar

  • Kitap1.xlsm
    13.6 KB · Görüntüleme: 11

askm

Yeni Üye
Katılım
19 Haz 2018
Mesajlar
10
En iyi yanıt
0
Puanları
3
Yaş
43
Konum
Kayseri
Aşağıdaki kodu deneyin.
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
satir = Target.Row
sutun = Target.Column
a = 0
Application.ScreenUpdating = False
Application.EnableEvents = False
Range("B2:B65536").ClearContents
If satir > 2 And sutun = 3 Then
    For i = 3 To Range("C" & Rows.Count).End(3).Row
        If Cells(i, 3) <> "" Then
            a = a + 1
            Cells(i, 2) = a
        End If
    Next i
End If
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
 

komutan63

Yeni Üye
Katılım
21 Haz 2018
Mesajlar
10
En iyi yanıt
1
Puanları
3
Yaş
60
Konum
Ankara
Ad Soyad
Muzaffer Demir
Office Vers.
Ofis 2010
Selamlar
Sayın @istiklal sorununuz çözüldü mü?
 

istiklal

Yeni Üye
Katılım
11 Nis 2019
Mesajlar
32
En iyi yanıt
0
Puanları
8
Yaş
49
Konum
Malatya
Ad Soyad
İlhan Yüksel
Office Vers.
Microsoft Office 2016 TR
Emeği geçen ve yardımını esirgemeyen siz değerli kardeşlerime teşekkür ederim
 

komutan63

Yeni Üye
Katılım
21 Haz 2018
Mesajlar
10
En iyi yanıt
1
Puanları
3
Yaş
60
Konum
Ankara
Ad Soyad
Muzaffer Demir
Office Vers.
Ofis 2010
Rica ederim
iyi çalışmalar
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst Alt