jika nilai adalah desimal, maka bisa diubah dahulu menjadi data bertipe
Single atau Double
caranya:
CSng(...) untuk mengubah menjadi single, atau
CDbl(....) untuk mengubah menjadi double
oia.. sebaiknya nilai suatu objek dituliskan lengkap sesuai defaultnya..
karena katanya (ini katanya ya..) akan lebih mudah saat akan diubah dari
satu bahasa pemrograman yang satu ke bahasa pemrograman yang lain..
jadi kalo Range("...") harus ditulis menjadi Range("...").value
lalu kalo textbox harus ditulis TextBox1.txt sesuai dengan defaultnya
kalo label berarti harus .Caption dsb
salam,
-Miss Jan Raisin-
Pada 26 September 2013 10.47, hendrik karnadi <[email protected]>menulis:
> **
>
>
> Miss Jan,
> Masih ada "sedikit" pertanyaan kecil,
> bagaimana kalau angkanya bisa integer atau decimal ?
>
> Salam,
> HK
>
> ----- Forwarded Message -----
> *From:* Andy Ajhis Ramadhan <[email protected]>
> *To:* "[email protected]" <[email protected]>
> *Sent:* Thursday, 26 September 2013, 10:30
> *Subject:* Trs: [belajar-excel] Nilai tambah pada VBA developer
>
>
> Wah terima kasih banyak miss jan :D miss jan Thanks You...
> hehee gak jadi patah semangat deh, buat belajar lagi... kapan-kapan andy
> teraktir bakso Xiaa ^_^ xixixi
>
> Terima Kasih Allah, kemudian Trima kasih Be-Exceller, Terima Kasih Miss
> Jan.
>
> Salam,
> Andy Ajhis R
>
> ----- Pesan yang Diteruskan -----
> *Dari:* Jan Raisin <[email protected]>
> *Kepada:* [email protected]
> *Dikirim:* Kamis, 26 September 2013 10:21
> *Judul:* Re: [belajar-excel] Nilai tambah pada VBA developer
>
>
> وَعَلَيْكُمُ لسَّلاَمُ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> coba nyekripnya pakai rasa cinta xixixix ^_^
>
> Range("C6") = CInt(TextBox2.Value) + CInt(TextBox3.Value)
>
>
> وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
>
> -Miss Jan Raisin-
>
>
> Pada 26 September 2013 09.35, Andy Ajhis Ramadhan <
> [email protected]> menulis:
>
> **
>
>
> Asslamu allaikum, wr wb
> Be-Exceller
>
> Bagaimana perumusan nilai tambah pada VBA developer ?
>
> Private Sub CommandButton1_Click()
> Range("C6") = (TextBox2.Value + TextBox3.Value) 'Nilai Plus disamping
> malah error, misal : 4 + 4 = 44, tetapi kalau diganti * atau / hasilnya
> tidak masalah.
> TextBox4 = Range("C6").Value
> End Sub
>
> file terlampir.... mohon bantuannya master. Terima Kasih
>
> Wassalamu allaikum, wr wb
> Andy
> _
>
>
>
>
>
>
>
