Otomatik komut

Katılım
7 Ekim 2004
Mesajlar
60
Excel Vers. ve Dili
Excel 2003
(11.5612.6505)
Arkadaşlar merhaba.

Bir sorunum var.
Excelde bir makro yazdım , ve bu makroıyu otomatik olarak çalıştırmak istiyorum.

Yani bir örnek vermek gerekirse...
B2 hücresine herhangi birşey yazdığımda makronun otomatik olarak çalışmasını sağlamak istiyorum.....


Bir diğer deyişle şöyle anlatayım....
A Sütununa barkod yardımıyla veriler girilecek.
Ve B sütununa da bu veriler girilir gilirmez o anki saat ve tarihi yamasını istiyorum...

=eğer(a2>0;şimdi();"") bu formülü yazdığımda iş tamam ama "şimdi formülünü kullandığım için zaman sabit kalmıyor.... b sütununu "copy+ değerleri yapıştır" ile sabitlemem gerek
bunun için makro yazdım ama A sütununa veri yazıldığında makroyu çalıştır... Bunu yapamadım

Teşekkürler...
:hey:
 
Katılım
7 Temmuz 2004
Mesajlar
1,141
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then Cells(Target.Row, 2) = Now
End Sub
 
Katılım
7 Ekim 2004
Mesajlar
60
Excel Vers. ve Dili
Excel 2003
(11.5612.6505)
olmadı...

ustam bu olmadı
komut hata veriyor
:kafa:
 
Katılım
7 Temmuz 2004
Mesajlar
1,141
nerde hata verdiğini yazarsanız daha çabuk yardım edilir.
neyse yukarıdaki kodun aynısını gönderiyorum.
 
Katılım
7 Ekim 2004
Mesajlar
60
Excel Vers. ve Dili
Excel 2003
(11.5612.6505)
...

ustam dosyayı bir incelersen sevinirim.
teşekkürler... :icelim:
 
Katılım
7 Temmuz 2004
Mesajlar
1,141
ben anlamadım...
bir üstte gönderdiğim dosya tam olarak istedğin şeyi yapıyor zaten.
yada benim tam olarak tatile ihtiyacım var.
 
X

xxrt

Misafir
Sayfa 2'ye Yazdırsan olurmu?
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
Sheets("Sayfa2").Range(Target.Address) = Now
End Sub
Bunları Sayfa1'in kod bölümüne yaz.
 
Üst