11 Eğer 12 Durum - Genel Yazılım

mschumi

11-06-2008, 09:58 | #1

OP Yeni Üye

Teşekkür Sayısı: 0

23 mesaj

Kayıt Tarihi:Kayıt: Eki 2006

Arkadaşlar Merhaba;
Bir sütunda ingilizce aylar var. Ayların sayısal değerlerini yazdırmak istiyorum. Bir tane aydan birçok var.
Örnek: Ay April ise 4 yazsın.

cudi_evindar

11-07-2008, 20:26 | #2

Yıllanmış Üye

Teşekkür Sayısı: 0

100 mesaj

Kayıt Tarihi:Kayıt: Mar 2008

Kardeş 'eğer' formülü var kullanabileceğin. Ama en fazla 7 tane 'eğer' formülünü iç içe kullanabilirsin{örnk =eğer(a1=ocak;"01";" " )} ki buda 12 ay için yetmeyecektir. bence bu sorunu çözmen için Visual Basic programlama dilini bilmen lazım fikrimce. bu işi kod yazarak kolay bir şekilde haledebilirsin.ben bu prg dilini bilmiyorum bilsem kodları sana yazardım. forum kısmının programlama kısmına yazarsan eminim ki bu dili bilen arkadaşlar sana yrdcı olacaklardır.
not: kodsuz yapma yolunu bulduysan buraya yaz bende öğrenmiş olurum. Beğendim kolay gelsin

blckwolf

28-07-2008, 23:11 | #3

Yeni Üye

Teşekkür Sayısı: 0

26 mesaj

Kayıt Tarihi:Kayıt: Tem 2008

nasıl bir format kullanacaksınız, örnek dosya eklerseniz yardımcı olmaya çalışırım.

bektash

28-07-2008, 23:31 | #4

Yıllanmış Üye

Teşekkür Sayısı: 1

1,997 mesaj

Kayıt Tarihi:Kayıt: May 2008

cudi_evindar
Kardeş 'eğer' formülü var kullanabileceğin. Ama en fazla 7 tane 'eğer' formülünü iç içe kullanabilirsin{örnk =eğer(a1=ocak;"01";" " )} ki buda 12 ay için yetmeyecektir. bence bu sorunu çözmen için Visual Basic programlama dilini bilmen lazım fikrimce. bu işi kod yazarak kolay bir şekilde haledebilirsin.ben bu prg dilini bilmiyorum bilsem kodları sana yazardım. forum kısmının programlama kısmına yazarsan eminim ki bu dili bilen arkadaşlar sana yrdcı olacaklardır.
not: kodsuz yapma yolunu bulduysan buraya yaz bende öğrenmiş olurum. kolay

kovanci

05-08-2008, 23:01 | #5

Yeni Üye

Teşekkür Sayısı: 0

41 mesaj

Kayıt Tarihi:Kayıt: Şub 2006

Eğer formuluyle dediğiniz işlem yapılamıyor.Ama makro yazarak bu işlem yapılabilir. Bende kendi çapımda mokro yazıp sorunu öyle hallettim. Umarım yardımcı olabilirim.

Exceli açtıktan sonra <Araçlar> <mokro> <makrolar> (kısyolu ALT+F8) tıklayıp üst boşluğa makro ismini yazıp oluştur deyin. açılan pencereden Sub ve End Sub 'un arasına aşağıdaki kodu yapıştırın.
A sütünuna ayları yazıp makroyu test edin..

Excel "A" sutununda ayların olduğunu kabul ettim. "B" sütununa ise ayın sayı cinsinden değerini yazdırdım. For döngüsü A1000 kadar kontrol ediyor. Ayrıca ayları Türkçe olarak yazdım. İngilizcem pek iyi değil.

Dim k, i, a

For a = 1 To 1000

  k = k + 1
  i = i + 1

Select Case Cells(k, 1).Value

Case "Ocak"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 1

Case "Şubat"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 2
  Case "Mart"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 3
  Case "Nisan"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 4
  Case "Mayıs"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 5
  Case "Haziran"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 6
  Case "Temmuz"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 7
  Case "Ağustos"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 8
  Case "Eylül"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 9
  Case "Ekim"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 10
  Case "Kasım"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 11
  Case "Aralık"
Cells(i, 2).Select
  ActiveCell.FormulaR1C1 = 12


End Select