Asalamualaikum,
Mas Zainul,

Saya belajar membuat UDF apakah variabel dapat berubah secara dinamis
menggunakan loop?

Public Function remidi(batas As Single, var1 As Single, nama1 As String,
var2 As Single, nama2 As String, var3 As Single, nama3 As String, var4 As
Single, nama4 As String) As String
Dim a As Single
Dim hasil As String

For a = 1 To 4
If *var1* < batas Then hasil = *nama1*
remidi = remidi & hasil
Next a
End Function

maunya var1 dan nama1 dapat berubah sesuai dengan a,

Terima kasih
Wasalamualaikum warahmatullah




2014-09-26 8:10 GMT+07:00 'zainul_ulum[at]yahoo[dot]com'
[email protected] [belajar-excel] <[email protected]>:

>
>
> Mas NangAgus,
>
> ada contohnya input dan hasilnya?
>
> terus terang saya kurang mengerti yang dimaksud.
>
>
>
> wassalaamu’alaikum warahmatullahi wabarakaatuh…
>
> -zainul
>
>
>
> *From:* [email protected] [mailto:
> [email protected]]
> *Sent:* Friday, September 26, 2014 7:16 AM
> *To:* BExcel
> *Subject:* Re: [belajar-excel] Variabel VBA
>
>
>
>
>
> Asalamualaikum warahmatullah.
>
>
>
> Terima kasih pak Hendrik, sudah sesuai dengan kebutuhan, hanya saja
> variabel yang dapat diganti dengan "Var" & a adalah variabel tang bertype
> numerik saja, untuk variabel yang bertype String tidak bisa.
>
>
>
> Untuk pak Lukman, saya sedang belajar untuk membuat loop dengan variabel
> bernomor bertype string. variabel tersebut akan diambil sesuai dengan
> nomornya. adakah caranya membuat variabel bernomor untuk tipe data string?
> atau dapatkah menggunakan tanda kurung misalnya Var(a)
>
>
>
> For a = 1 to 40
>
> IF "nilai" & 1 > 3 THEN
>
> Range("E" & a).Value = var*1*
>
> ELSE
>
> Range("E" & a).Value = "Salah"
>
> Next a
>
>
>
> Terima kasih
>
>
>
> Wasalamualaikum warahmatullah
>
>
>
> NangAgus
>
>
>
> 2014-09-25 13:29 GMT+07:00 lkm jktind [email protected] [belajar-excel]
> <[email protected]>:
>
>
>
> Pak Agus .
>
> Kalau bertanya soal looping . ada kemungkinan saya dapat memjawab.
>
> Tapi tolong kasih contohnya .   (yg dinamakan Var 1  dst itu apa ?  )
>
> Tapi bila pertanyaan ini untuk digunakan menyelesaikan  soal dari pak
> syamsudin ?
>
> maka pertama looping  yg masuk kriteria sangat baik .  ----------  bila
> hasilnya lebih dari satu  --- apakah harus dicari yg paling tinggi  atau di
> abaikan .
>
> bertahap   selanjutnya  , Baik  -- dan seturusnya .
>
> Salam
>
> Lukman
>
> NB : banyak istilah yg tidak saya ingat atau tau .
>
>         maklum saja . bisanya hanya untuk praktek .
>
>
>
>
>
>
>
>
>
> 2014-09-25 13:06 GMT+07:00 Nang Agus [email protected] [belajar-excel] <
> [email protected]>:
>
>
>
>
>
> Asalamualaikumwarahmatullah,
>
>
>
> Salam sejahtera untuk seluruh milis B-Excel,
>
>
>
> Saya memiliki beberapa variabel yang saya beri nama var1, var2 var3, var4
> dst.
>
> saya berkeinginan untuk membandingkan masing masing variabel menggunakan
> Loop. bagaimana cara penulisan syntax di VBA?
>
>
>
> For a = 1 to 40
>
> IF var1 > 3 THEN Range("E" & a).Value = var1
>
> Range("E" & a).Value = "Salah"
>
> Next a
>
>
>
>
>
> Bagaimana caranya agar var1 (angka 1 nya dapat berubah mengikuti a)? saya
> coba dengan var & a tidak bisa.
>
>
>
> Terima kasih
>
> Wasalam
>
>
>
> NangAgus
>
>
>
>
>
>  
>

Attachment: Belajar.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

Kirim email ke