dear XL-maniawan & XL-maniawati,
bang momods menyangka cell berisi CODE yg mauk diklik oleh bang Eka SBY(+tr)
adalah code-code yg ada di kolom A (Target.Column = 1)
tetapi mungkin juga bang Eka SBY(+tr)nya mauk mengklik code code di
range E5:H8
jadi makronya (hanya mengalihkan pembatasan daerah target dowang)
'-------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column > 4 And Target.Column < 9 _
And Target.Column > 4 And Target.Column < 9 Then
[K4] = Target.Value
End If
End Sub
'---------------------------------
kindest regards
siti
[walauinikelihatannyaseriustapipercayalahbahwasebetulnyabercanda]
On 4/3/09, abimono <[email protected]> wrote:
> di sheet1:
>
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> If Target.Row >= 5 And Target.Row <= 17 And Target.Column = 1 Then
> Sheet1.Cells(4, 11) = Target
> End If
> End Sub
>
> regards,
> abimono
>
> On 4/2/09, Eka Subyantara <[email protected]> wrote:
>>
>> Excelwan dan Excelwati yang baik hati,
>> Kali ini daku hadirkan masalah sepele, tapi daku BELON BISA!
>>
>> Tersedia kode-kode di tabel pilihan, kode mana saja yang di-klik maunya
>> muncul di sel tertentu
>> sehingga dengan LOOKUP terhadap kode tersebut akan ditampilkan data-data
>> yang bersesuaian.
>>
>> File berisi tabel yang dimaksud telah dilampirkan.
>> Terima kasih kepada mereka yang mau berbagi kepada Q ... eh ... daku.
>>
>> WalauIniTampakTidakSeriusTapiP ercayalahBahwaIniSangatSerius
>> Eka S.
>>
>> N.B.
>> Maaf posting sebelumnya ketinggalan lampirannya.
