Bul düğmesi ekleme

[acogurcu]

düğmenin altında yer alan hücreye yazdığım sayıyı sütunda bulmasını istiyorum...yardımcı olursanız sevinirim...Bu konularda oldukça yeniyim...şimdiden yardımcı olan arkadaşlara teşekkürler

örnek:

C sütünunda arama yapmak için düğme eklemek istiyorum.C6 hücresine girdiğim değeri bul düğmesine bastığımda C sütununda bulmalı...:yardim:

 

[Orion1]

Merhaba.
Ekli dosyayı inceleyiniz.
Kodlar aşağıdaki gibi yazıldı.
C6 hücresine aranacak veriyi yazıyorsunuz C sütununda bulup renklendiriyor.

Sub Düğme1_Tıklat()
Set c = Range("C7:C65536").Find(Range("C6").Value, LookIn:=xlValues, lookat:=xlWhole)
If Range("C6") = "" Then Exit Sub
Range("C7:C65536").Interior.ColorIndex = xlNone
Range("C7:C65536").Font.ColorIndex = 0
If Not c Is Nothing Then
    Range("C" & c.Row).Select
    ActiveCell.Interior.ColorIndex = 3
    ActiveCell.Font.ColorIndex = 6
    MsgBox "BULUNDU", vbOKOnly
    Exit Sub
End If
MsgBox "BULUNAMADI", vbCritical
End Sub

 

[acogurcu]

TeŞekkÜr Ederİm,bİr İsteĞİm Daha Olacak...

İKİ GÜNDÜR BAĞLANAMIYORDUM, ÖNCELİKLE İLGİNİZ İÇİN TEŞEKKÜR EDERİM. MAKRO ÇALIŞIYOR FAKAT BEN BUNU ÇALIŞMA SAYFAMA KAYDETMEK İSTİYORUM... KENDİ SAYFAMA KOPYALADIM AMA BUL DÜĞMESİNE BASTIĞIMDA MAKROLAR ETKİNLEŞTİRME UYARISI GELİYOR,ETKİNLEŞTİR DEDİĞİMDE SİZİN GÖNDERMİŞ OLDUĞUNUZ SAYFA AÇILIYOR.(ORADAN KOPYALAMIŞTIM...) NASIL DÜZELTECEĞİMİ BİRAZ AÇIKLARSANIZ SEVİNİRİM MAKRODA OLDUKÇA YENİYİM DE...TEŞEKKÜRLER

MAKRO NASIL KAYDEDİLİYOR,
NASIL ÇALIŞTIRILIYOR,

GİBİ...:yardim:

 

[acogurcu]

Yenİ Farkettİm...

BEN DE ÇORLU'DANIM :hey:

 

[Orion1]

Merhaba.
Araçlar => Makro => Güvenlik => Güvenli Düzeyi => Düşük önerilmez
Seçerek makroları etkinleştirebilirsiniz.
2'nci sorunuzu anlamadım.