• DİKKAT

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

Rakamın önüne sıfır eklemek

Katılım
26 Aralık 2008
Mesajlar
1,145
Excel Vers. ve Dili
EXCEL 2016 TÜRKÇE
Merhaba arkadaşlar 11,111,1111,11111 Gibi Rakamlarım var ben bu rakamların önene mevcut rakamlar dahil 15 karakter olacak şekilde ilk numara 1 diğerleri sıfır olmak kaydıyla ekleme nasıl yaparız
yani 100000000000011 ,100000000000111 , 100000000001111 gibi
 
Merhaba;
A2 hücresine 11,111 vs.. gibi rakamlarınız varsa B2 hücresine;
="1"&SAĞDAN(YİNELE("0";14)&A2;14)
Formülünü uygulayın.
İyi çalışmalar.
 
http://www.excel.web.tr/f14/2den-fazla-otomatik-tamamlama-t125687.html

sayfasındaki turist beyin makrosunu size göre değiştirdim.
dosya ekte.

yanlız makro sadece A sütününda çalışıyor.
diğer sütünlar için ya kendiniz değiştirin.
yada örnek dosya ile daha kolay halledelim.

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A:A")) Is Nothing Then
  Application.EnableEvents = False
    Select Case Target
      Case 0 To 1E+16
        Target.Value = "1" & Format(Target, "00000000000000")
      
      Case Else
    End Select
  Application.EnableEvents = True
End If
End Sub
 

Ekli dosyalar

çok teşekkür ederim arkadaşlar iyiki varsınız hayırlı bayramlar
 
Geri
Üst