Çözüldü Rakamı Yazıya Çevirme

  • Konuyu başlatan Konuyu başlatan __TR__
  • Başlangıç tarihi Başlangıç tarihi
T

__TR__

Normal Üye
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Aşağıdaki kod ile herhangi bir hücreye = Paracevir(hücre adresi) yazarak istediğim rakamı TL cinsinden yazıya çeviriyorum.

Yapmak istediğim bunu makro ile son dolu satırda kullanmak.

VBA: 
You must log in to view content
(1 satır)
şeklinde gibi. Bu şekilde denedim hata verdi.

Kod: 
You must log in to view content
(45 satır)
 
Tarihe göre sırala Oylamaya göre sırala
Sanırım belli bir sütunda, son hücredeki sayısal verinin YAZIYA çevrilmesi isteniyor.
Tabi sonucun nereye yazılacağı çok net değil.

Ben şöye düşündüm: yazıya çevrilecek sayısal verinin bulunduğu sütundaki herhangi bir hücre seçiliyken
kod tetiklenirse (düğme kullanmak gibi);
-- Private Function Cevir isimli KTF kodunda, End Sub satırının hemen üstüne snc = Cevir satırı eklenip,
-- KTF kodlarının bulunduğu Modul'ün en başına da aşağıdaki kod eklenirse,
sayının hemen sağındaki hücrede sonuç alınır.


CPP: 
You must log in to view content
(7 satır)

.
 
Oyla 0 Olumsuz oyla
Hazırladığım örnek dosyadan daha net anlaşılacaktır. H sütunu değişken o yüzden son dolu satırı kullanmak istedim. Kullandığım yazıya çevir makrosu yerine başka bir makroda kullanılabilir.
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
Tekrar merhaba.

Module1'de mevcut tüm kodları silip, yerine aşağıdaki kodları yapıştırın.
Kod, TOPLAM kelimesinin konumunu bulur ve karşısındaki tutarı yazıya çevirerek,
örnek belgedeki metni oluşturur, TOPLAM satırının 2 satır altına para kısmı koyu olacak şekilde
metni yazıp, hücre birleştirmesini (A sütunundan TOPLAM'ın sütunu +1 sütnuna kadarki hücreler) yaparak işlemi tamamlar.

CPP: 
You must log in to view content
(66 satır)

.
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.

Benzer Konular Popüler Daha Fazlası

Üst