ara bul işaretle

[helpmaster]

arkadaşlar merhaba

benim sıkıntımı kısaca anlatıyım excel'e atılmış 20.000 seri numarası var elimde bulunan ürünlerlerin içinden bu ürünlerin serilerini barkodla veya elle bulup sarı renk e işaretlemem lazım ama okutup buldugum yerle işaretledigim yer aynı butonla beraber olması lazım ikinci bir olay sarı ile işaretledigim yerleri süzmem lazım bunun için yardımcı olursanız çok sevinirim...

şimdiden çok teşekkür ederim...

 

[Seyit Tiken]

Yanlış anlamadıysam bu kodlar ilk sorunuzu çözebilir.

Private Sub CommandButton1_Click()
ActiveCell.Interior.ColorIndex = 6
ActiveCell.Offset(1).Select
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
CommandButton1.Top = ActiveCell.Rows(1 - 1).Top
End Sub

 

[helpmaster]

yanlış arkadaşım

çok teşekkür ederim ugraşmışın ama yanlış olmuş

 

[Kemal Demir]

Sn.helpmaster

Sizin anlattıklarınız kadarı ile seyit bey'in yapmıs oldugu calısma zannedersem anlattıklarınızla aynı.

Bende Yanlıs anladım Galiba ama yinede dosya işinize yarayabilir düşüncesi ile gönderiyorum.