Hi Mr Kid,
Saya coba melakukan perubahan pada srnaddr sehingga mengacu kepada sebuah cell
Saya ubah menjadi
Srngaddr = "$" & sheets("sheet1").range("A1").value & "$2"
Atau
Srngaddr = cells(2,sheets("sheet1").range("A1").value)
Tapi ga bisa
-----Original Message-----
From: "Mr. Kid" <[email protected]>
Sender: [email protected]
Date: Wed, 14 Nov 2012 17:26:00
To: <[email protected]>
Reply-To: [email protected]
Subject: Re: [belajar-excel] Select image didalam sebuah cell
Sama-sama.
Jangan lupa, pastikan bahwa sRngAddr benar-benar berisi alamat cell pojok
kiri atas si shape. Kadangkala, si shaope tampak sudah masuk di range D2
padahal masih di D1 atau malah C1.
Wassalam,
Kid.
2012/11/14 <[email protected]>
> **
>
>
> ** Luar biasa mr kid, udah browse google dr pagi akhirnya nemu nya
> disini. Thanks
> ------------------------------
> *From: * "Mr. Kid" <[email protected]>
> *Sender: * [email protected]
> *Date: *Wed, 14 Nov 2012 16:55:46 +0700
> *To: *<[email protected]>
> *ReplyTo: * [email protected]
> *Subject: *Re: [belajar-excel] Select image didalam sebuah cell
>
>
>
> Coba dengan prosedur berikut :
>
> public sub SelectShapeAh()
> dim shp as shape
> dim sRngAddr as string 'var ini bisa jadi input parameter agar
> lebih luwes
>
> srngaddr = "$D$2"
> sheet1.activate
> for each shp in sheet1.shapes
> if shp.topleftcell.address=srngaddr then
> shp.select
> endif
> next shp
> end sub
>
> Wassalam,
> Kid.
>
> 2012/11/14 <[email protected]>
>
>> **
>>
>>
>> Hi all,
>>
>> Saya sedang membuat form dimana user akan menginput sebuah image ke dalam
>> suatu cell.
>> Let's say semua image tersebut ditempatkan di sheet 1 row 2, bagaimana
>> jika ingin men-select image yang ada di cell D2 saja?
>>
>> _
>>
>>
>
>
