Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Fonksiyonlar
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Fonksiyonlar Bir fonksiyonun, nasıl işlediğini veya aradığınız bir işleme uygun olup olmadığını bu başlık altında sorabilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 07-12-2017, 10:49   #1
sirkülasyon
Altın Üye
 
sirkülasyon kullanıcısının avatarı
 
Giriş: 10/07/2012
Şehir: Malatya / Hekimhan
Mesaj: 947
Excel Vers. ve Dili:
2016 TR
Varsayılan Hücre Biçimlendir >> İsteğe Uyarlanmış >> Tür

Hücreye
1 rakamını girdiğim zaman [1.(Birinci)]
2 rakamını girdiğim zaman [2.(İkinci)]
3 rakamını girdiğim zaman [3.(Üçüncü)] gibi rakam ile beraber yazı ile yazılması için
Hücre Biçimlendir >> İsteğe Uyarlanmış >> Tür kısmında ki yere hangi formatı girmem gerekiyor.

Yardımcı olabilir misiniz?
sirkülasyon Çevrimdışı   Alıntı Yaparak Cevapla
Eski 07-12-2017, 12:08   #2
Haluk
Özel Üye
 
Giriş: 07/07/2004
Şehir: Türkiye
Mesaj: 5,130
Excel Vers. ve Dili:
Office 2010 - İngilizce
Varsayılan

Merhaba,

Bu iş format tipi seçmek ile olmaz, makro yazmak gerekir.

.
__________________
Kod anlatılmaz,yazılır !
Haluk Çevrimdışı   Alıntı Yaparak Cevapla
Eski 07-12-2017, 17:12   #3
Korhan Ayhan
Moderatör
 
Korhan Ayhan kullanıcısının avatarı
 
Giriş: 15/03/2005
Şehir: ANTALYA
Mesaj: 22,719
Excel Vers. ve Dili:
OFFICE 2013-2016 PRO TR
Varsayılan

Denemeler yaptım ve aşağıdaki gibi sonuca ulaştım. Sizde deneyiniz.

Diğer değerler içinde tanımlama yapmanız gerekiyor.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
[=1]0".(Birinci)";Genel
__________________
.
.
.

Soru sormadan önce forumumuzun aşağıdaki
bölümlerini incelediğinizde birçok sorunuza yanıt bulabilirsiniz.


Excel Dersanesi
Uygulamalı Excel Eğitimi
Excel İçin Örnek Uygulamalar
Video Dersane (***Altın Üyelere Özel***)

Lütfen sorularınızın çözümlendiğine dair geri dönüş mesajı yazınız...!
Lütfen yazım ve forum kurallarına uyalım...!
Lütfen sorularımızı açık ve net bir dille ifade edelim...!



FORUM KURALLARI
Korhan Ayhan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 08-12-2017, 06:51   #4
sirkülasyon
Altın Üye
 
sirkülasyon kullanıcısının avatarı
 
Giriş: 10/07/2012
Şehir: Malatya / Hekimhan
Mesaj: 947
Excel Vers. ve Dili:
2016 TR
Varsayılan

Korhan abi
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
[=1]0".(Birinci)";Genel
yazdığım zaman 1 için işlem görüyor.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
[=2]0".(İkinci)";Genel
yazdığım zaman da 1 işlemini görmüyor. Bu sefer de 2 işlem görüyor.
İkinci tanımlama birinci tanımlamayı devre dışı bırakıyor.
Aynı hücrede yapılabilmesi için HALUK abi makro demişti.
Makro konusunda yardımcı olabilir misiniz?
sirkülasyon Çevrimdışı   Alıntı Yaparak Cevapla
Eski 08-12-2017, 08:57   #5
Seyit Tiken
Uzman
 
Seyit Tiken kullanıcısının avatarı
 
Giriş: 22/08/2005
Şehir: MARDİN
Mesaj: 3,643
Excel Vers. ve Dili:
Excel : 2010
Varsayılan

Üçe kadar döndürebiliyor, üçten fazla ise MAKRO kullanmak lazım.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
[=1]"1.Birinci";[=2]"2.İkinci";"3.Üçüncü"
__________________
Sizi, Boş Yere Yarattığımızı ve Bize Döndürülmeyeceğinizi mi Sandınız? (Müminun-115)

Ve Kim Benim Zikrimden Yüz Çevirirse, O Taktirde Mutlaka Onun İçin Sıkıntılı Bir Geçim (Hayat) Vardır. Ve Kıyâmet Günü Onu, Kör Olarak Haşredeceğiz (Tâhâ-124)

İnsanın En Büyük Dostu Allah'tır - (MİHR)
Seyit Tiken Çevrimdışı   Alıntı Yaparak Cevapla
Eski 08-12-2017, 09:34   #6
İdris SERDAR
Moderatör
 
İdris SERDAR kullanıcısının avatarı
 
Giriş: 21/10/2005
Şehir: Ankara
Mesaj: 14,470
Excel Vers. ve Dili:
Excel, 2016 - İngilizce
Varsayılan

.

Aşağıdaki kodu kullanabilirsiniz.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
'İ.Serdar-2017

Private Sub Worksheet_Change(ByVal Target As Range)

Dim aln As Range

Set aln = Application.Intersect(Target, Me.Range("A:B")) 'A:B aralığını kendinize göre uyarlayın.
If aln Is Nothing Then Exit Sub

With Target
Select Case .Value

Case Is = 1: .NumberFormat = "[=1]0"".(Birinci)"";General"
Case Is = 2: .NumberFormat = "[=2]0"".(İkinci)"";General"
Case Is = 3: .NumberFormat = "[=3]0"".(Üçüncü)"";General"
Case Is = 4: .NumberFormat = "[=4]0"".(Dördüncü)"";General"
Case Is = 5: .NumberFormat = "[=5]0"".(Beşinci)"";General"
Case Is = 6: .NumberFormat = "[=6]0"".(Altıncı)"";General"
Case Is = 7: .NumberFormat = "[=7]0"".(Yedinci)"";General"
Case Is = 8: .NumberFormat = "[=8]0"".(Sekizinci)"";General"
Case Is = 9: .NumberFormat = "[=9]0"".(Dokuzuncu)"";General"
Case Is = 10: .NumberFormat = "[=10]0"".(Onuncu)"";General"

'Buraya istediğiniz sayıya kadar yazabilirsiniz.
'.......
'.......
'......

Case Else
.NumberFormat = "General"

End Select

End With

End Sub

.
__________________
Çalışmalarımı görmek için:

http://www.excelgurusu.com/

İdris SERDAR
İdris SERDAR Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-12-2017, 09:10   #7
sirkülasyon
Altın Üye
 
sirkülasyon kullanıcısının avatarı
 
Giriş: 10/07/2012
Şehir: Malatya / Hekimhan
Mesaj: 947
Excel Vers. ve Dili:
2016 TR
Varsayılan

İdris abi Teşekkür ederim
sirkülasyon Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 15:08


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım -- invest in turkey - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Özel Eğitim- Site Yönetimi- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Araç Takip- Çorlu Su Arıtma- Gebze Emlak- Bakır Sülfat- Rampa- Rotary- Çorlu İnternet Sitesi- youngblood- Çorlu Sürücü Kursu- Çorlu Sandviç Panel- Şişli Avukat- Korona Test Kalemi- Çorlu Vinç- Çorlu Pimapen Tamiri- Çorlu Çelik Konstruksiyon- Çorlu Dans- Edirne Serbest Muhasebeci- Çorlu Etüt- İstanbul Botanik-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden