[ÇÖZÜLDÜ] makroya çalışma sayfasından veri tanıtma

Katılım
25 Eylül 2006
Mesajlar
611
Excel Vers. ve Dili
Windows-XP_TR
Ofis-2003_TR
Altın Üyelik Bitiş Tarihi
26/10/2022
Selam arkadaşlar,
Ekteki dosyamda bir makro var.Bu makroda bazı sayılar yazılı.Ben bu sayıları excele yazdım ve makroya da tekrar yazmamak için makrodaki sayıların excelden gelmesini istiyorum.
 
Katılım
14 Şubat 2006
Mesajlar
3,426
Excel Vers. ve Dili
(Excel 2016 - İngilizce)
Altın Üyelik Bitiş Tarihi
30-11-2022
Şu anda aklıma gelen fonksiyonu aşağıdaki şekilde kullanmanızdır.

Fakat her kullandığınızda dilimleride tekrardan seçmeniz gerekiyor.
Kod:
Function STOPAJ(Kumulatif_Toplam As Double, Aylik_Ucret As Double, [COLOR=indigo][B]UST_I, UST_II, UST_III As Long[/B][/COLOR]) As Double
Dim Fark      As Double
'Const UST_I   As Long = 7800
'Const UST_II  As Long = 19800
'Const UST_III As Long = 44700
 
Katılım
25 Eylül 2006
Mesajlar
611
Excel Vers. ve Dili
Windows-XP_TR
Ofis-2003_TR
Altın Üyelik Bitiş Tarihi
26/10/2022
Şu anda aklıma gelen fonksiyonu aşağıdaki şekilde kullanmanızdır.

Fakat her kullandığınızda dilimleride tekrardan seçmeniz gerekiyor.
Kod:
Function STOPAJ(Kumulatif_Toplam As Double, Aylik_Ucret As Double, [COLOR=indigo][B]UST_I, UST_II, UST_III As Long[/B][/COLOR]) As Double
Dim Fark      As Double
'Const UST_I   As Long = 7800
'Const UST_II  As Long = 19800
'Const UST_III As Long = 44700
Sn.Recep İpek,
Bu sözlerinizden anladığım kadarıyla istediğim tarzda birşeyin olması neredeyse imkansız gibi görünüyor..Çok teşekkürler..
 
Katılım
14 Şubat 2006
Mesajlar
3,426
Excel Vers. ve Dili
(Excel 2016 - İngilizce)
Altın Üyelik Bitiş Tarihi
30-11-2022
Eğer fonksiyonu tek bir dosyada ve dilimlerin alınacağı hücreler sabit ise aşağıdaki şekilde kullanabilirsiniz.

Kod:
Function STOPAJ(Kumulatif_Toplam As Double, Aylik_Ucret As Double) As Double
Dim Fark      As Double
Dim UST_I   As Long
Dim UST_II  As Long
Dim UST_III As Long
UST_I = Sheets("Sayfa2").Range("a15").Value
UST_II = Sheets("Sayfa2").Range("a16").Value
UST_III = Sheets("Sayfa2").Range("a17").Value'.....
 
Katılım
25 Eylül 2006
Mesajlar
611
Excel Vers. ve Dili
Windows-XP_TR
Ofis-2003_TR
Altın Üyelik Bitiş Tarihi
26/10/2022
Sayın Recep İpek,
Açıkçası umudumu yitirmiştim ki,cevabınızı gördüm;çok teşekkür ediyorum.
Peki oranlarla ilgili birşeyler yapılabilirmi ?
 
Katılım
14 Şubat 2006
Mesajlar
3,426
Excel Vers. ve Dili
(Excel 2016 - İngilizce)
Altın Üyelik Bitiş Tarihi
30-11-2022
Yine aynı şekilde oranlarıda Oran_I, Oran_II,Oran_III olarak ilgili hücrelerden alıp, oranların geçtiği yerlerde bu değişkenleri kullanabilirsiniz.
 
Katılım
25 Eylül 2006
Mesajlar
611
Excel Vers. ve Dili
Windows-XP_TR
Ofis-2003_TR
Altın Üyelik Bitiş Tarihi
26/10/2022
Yine aynı şekilde oranlarıda Oran_I, Oran_II,Oran_III olarak ilgili hücrelerden alıp, oranların geçtiği yerlerde bu değişkenleri kullanabilirsiniz.
Sn.Recep İpek,
Yardımlarınız için çok teşekkür ediyorum.
 
Üst