Oh iya Mr. Kid Thank u Mr. Kid...
Pada Selasa, 7 Januari 2014 22:08, Mr. Kid <[email protected]> menulis: Object shape memiliki properti Top. Geser shape kekiri dan kekanan berarti mengubah posisi pojok kiri object ke kiri dan kekanan. Dipojok kiri atas shape ada koordinat x,y tertentu atau posisi left dan top nya. Wassalam, Kid. On Tue, Jan 7, 2014 at 5:12 PM, Andy Ajhis Ramadhan <[email protected]> wrote: > >Thanks Miss Jan, >Miss jan kok kalau .LEFT diganti up atau down gda ya miss ? juga rotate? > > >Terima Kasih, >Andy > > > >Pada Selasa, 7 Januari 2014 14:41, Jan Raisin <[email protected]> >menulis: > > >Hai Andy, > > >coba copas script ini ke dalam sebuah modul, >lalu assign masing-masing prosedur ke tombol yang telah ada > > >Sub Kanan() >Dim dbPos As Double > > >With Sheet1.Shapes(1) > dbPos = .Left > .Left = dbPos + 1 >End With >End Sub > > >Sub Kiri() >Dim dbPos As Double > > >With Sheet1.Shapes(1) > dbPos = .Left > .Left = dbPos - 1 >End With >End Sub > > >solusi file terlampir >Wasslam, > > >-Miss Jan Raisin- > > >2014/1/7 Andy Ajhis Ramadhan <[email protected]> > > >> >>Dear, >>Be-Exceller >> >> >>Bagaimana cara membuat shape bergerak dengan VB ? >>Terima kasih... >> >> >>Andy Ajhis R > >
