kayıt ve otomatik sıra no verme

[ordulu82]

Merhaba,

Aşağıdaki gibi deneyin.

=DOLAYLI("veri!c"&SATIR())

Teşekkür ederim Üstadım mükemmel olmuş

 

[keremnideck]

Altarnatif Olsun

=EĞER(EMETİNSE(C6);MAK($B$4:B5)+1;"")

Formülü kullanılmıştır.

Merhaba,

En son yazılana son numarayı nasıl verebiliriz?

 

[keremnideck]

Yardımcı olmanızı rica ederim.

 

[YUSUF44]

Yardımcı olmanızı rica ederim.

Örnek bir dosya hazırlayıp tam olarak nasıl bir sonuç istediğinizi örneklerle gösteriniz. Sıra nonun hangi şartlarda ve ne zaman verileceğini de belirtiniz.

 

[keremnideck]

C10 hücresine isim yazdığımda Sıra No 4 değil 6 olmasını istiyorum.

 

[keremnideck]

Örnek bir dosya hazırlayıp tam olarak nasıl bir sonuç istediğinizi örneklerle gösteriniz. Sıra nonun hangi şartlarda ve ne zaman verileceğini de belirtiniz.

İlginiz için teşekkür ederim, dosyayı ekledim.

 

[YUSUF44]

Eğer sorunuz anladığım gibiyse B sütunundaki formülleri silin ve aşağıdaki kodları ilgili sayfanın kod bölümüne yapıştırarak deneyiniz. C5:C29 aralığına veri girildikçe B sütununa o sütundaki en büyük sayının bir fazlasını yazar:

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, Range("C5:C29")) Is Nothing Then Exit Sub
If Target = "" Then
Target.Offset(0, -1) = ""
Else
Target.Offset(0, -1) = WorksheetFunction.Max(Range("B5:B29")) + 1
End If
End Sub

 

[keremnideck]

Formülle yapma şansımız var mı?

 

[keremnideck]

Eğer sorunuz anladığım gibiyse B sütunundaki formülleri silin ve aşağıdaki kodları ilgili sayfanın kod bölümüne yapıştırarak deneyiniz. C5:C29 aralığına veri girildikçe B sütununa o sütundaki en büyük sayının bir fazlasını yazar:

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, Range("C5:C29")) Is Nothing Then Exit Sub
If Target = "" Then
Target.Offset(0, -1) = ""
Else
Target.Offset(0, -1) = WorksheetFunction.Max(Range("B5:B29")) + 1
End If
End Sub

Teşekkür ederim, formülle nasıl yapabiliriz?

 

[YUSUF44]

Formülle muhtemelen yapılmaz (bundan emin değilim, olmaz dediğim bir çok şey burada çözüldü). Yardımcı sütun kullanılarak yapılabilir belki ama makro en ideal çözümdür bence.

 

[keremnideck]

Formülle muhtemelen yapılmaz (bundan emin değilim, olmaz dediğim bir çok şey burada çözüldü). Yardımcı sütun kullanılarak yapılabilir belki ama makro en ideal çözümdür bence.

İsim değilde Onay kutusu işaretlendiğinde sayı artacak şekilde nasıl yapabiliriz?

 

[YUSUF44]

Maalesef beni aşıyor.

 

[keremnideck]

Maalesef beni aşıyor.

İlginiz için çok teşekkür ederim.

 

[keremnideck]

C10 hücresine isim yazdığımda Sıra No 4 değil 6 olmasını istiyorum.

Formül kullanarak nasıl yapılabilir? Yardımcı olur musunuz?

 

[Merhum İdris SERDAR]

C10 hücresine isim yazdığımda Sıra No 4 değil 6 olmasını istiyorum.

.

B5 hücresine;

=EĞER(C5="";"";BOŞLUKSAY($C$5:C5)+BAĞ_DEĞ_DOLU_SAY($C$5:C5))

=IF(C5="";"";COUNTBLANK($C$5:C5)+COUNTA($C$5:C5))

yazıp aşağıya doğru kopyalayın.

.

 

[keremnideck]

.

B5 hücresine;

=EĞER(C5="";"";BOŞLUKSAY($C$5:C5)+BAĞ_DEĞ_DOLU_SAY($C$5:C5))

=IF(C5="";"";COUNTBLANK($C$5:C5)+COUNTA($C$5:C5))

yazıp aşağıya doğru kopyalayın.

.

İlginiz için çok teşekkür ederim.

 

[keremnideck]

İlginiz için çok teşekkür ederim.

Dosyadaki gibi yapmamız mümkün müdür?

 

[Merhum İdris SERDAR]

Dosyadaki gibi yapmamız mümkün müdür?

.

Gibinin bir mantığı olmalı. Mantığı ne?

.

 

[keremnideck]

.

Gibinin bir mantığı olmalı. Mantığı ne?

.

Aslında çalıştığım dosya bu değil o yüzden size mantıksız geldi yapmak istediğim. Çalıştığım dosyaya benzer bir dosya ekledim incelemenizi rica ederim.

 

[istanbulcahan]

b5 1 yazınız B6 yada su formulu yazınız asagıya kadar kopyalayınız
=EĞER(C6>0;B5+1;"") yada

=EĞER(C6=0;"";B5+1)

eki inceleyiniz c ye ifade girdiginizde b de otomatik sayı artmaktadır

diger tabloyuda birden baslattım sayı eklemek isterseniz diger tablodaki sayının bir fazlasını diger tabloya erkleyiniz b deki formullere dokunmayınız kolay gelsin

Sizin formülünüz;

=EĞER(C6=0;"";B5+1)

formülünüzden yararlandım
benim iban sheetimde(iban dosyası iban sheetinde)

=EĞER(E9=0;"";A9+1)

ancak sondaki satıra veri girince alta geciyor ancak sayı otomatik artmıyor.nasıl formül düzenlenebilir.