"ctrl+shift+:" formül şekli nedir?

[granit2424]

Merhaba,

"ctrl+shift+:" kısayolunun formül şekli nedir? Lütfen yardımcı olabilir misiniz?

eğer a ise ctrl+shift+: olsun değil ise boş olsun demeye çalışıyorum ama başaramıyorum

iyi çalışmalar.

 

[Mahir64]

Merhaba,

=EĞER(A1="A";"ctrl+shift+";"")

 

[granit2424]

cevap için teşekkürler lakin, sorunum tam olarak şu: bir sütunu seçip ctrl+shift+: yazdığımızda şimdiki saati statik olarak vermekte ben aslında aşağıdaki formatta olduğu gibi ismin karşısındaki kutucuğu tıkladığımda ctrl+shift+: kısayolu devreye girecek ve tarih yazan yere şimdiki tarihi, saat yazan yerede şimdiki saati atacak, bu değerlerde kutucukları işaretledikçe atanacak ve değişmeyecek, tam olarak bunu yapmaya çalışıyorum ama saat ve tarihi statik olarak çağıramıyorum, en fazla dinamik olarak çağırabiliyorum ondada sürekli excel i kapatıp açınca güncellendiği için tarih saat şimdiki zamana alıyor ve veriler kaybolmuş oluyor

9P7y2A.jpg

excell

hizliresim.com

 

[Korhan Ayhan]

Bu işlemi makro ile yapabilirsiniz.

Forumda örnekler var. Lütfen arama yapınız.

 

[Mahir64]

Merhaba,

"ctrl+shift+:" kısayolunun formül şekli nedir? Lütfen yardımcı olabilir misiniz?

eğer a ise ctrl+shift+: olsun değil ise boş olsun demeye çalışıyorum ama başaramıyorum

iyi çalışmalar

Bu soruyla,

cevap için teşekkürler lakin, sorunum tam olarak şu: bir sütunu seçip ctrl+shift+: yazdığımızda şimdiki saati statik olarak vermekte ben aslında aşağıdaki formatta olduğu gibi ismin karşısındaki kutucuğu tıkladığımda ctrl+shift+: kısayolu devreye girecek ve tarih yazan yere şimdiki tarihi, saat yazan yerede şimdiki saati atacak, bu değerlerde kutucukları işaretledikçe atanacak ve değişmeyecek, tam olarak bunu yapmaya çalışıyorum ama saat ve tarihi statik olarak çağıramıyorum, en fazla dinamik olarak çağırabiliyorum ondada sürekli excel i kapatıp açınca güncellendiği için tarih saat şimdiki zamana alıyor ve veriler kaybolmuş oluyor

bunu mu anlatmaya çalıştınız.

 

[granit2424]

benim eksikliğim kusura bakmayın, tam ifade edemedim

 

[Korhan Ayhan]

İnceleyiniz.

Hücre Değiştiğinde yanında ki hücreye tarih yazsın

Ustalar forumu aradım ama bulamadım. Herhangi bir hüdreye veri girişi yapıldığında hmen yanındaki hücreye o anki tarih ve saat yazılması için nasıl bir olay yazmamız gerekecek. örnek olarak A1 Hücresi içerisine veri girişi yapıldığında veya içeriği değiştiğinde B1 hücresine, giriş veya...

www.excel.web.tr

Veri Girişinde Yandaki Sutüna otomatik tarih atama ?

Merhaba Arkadaşlar; B sütununda her hangi bir satıra veri girdiğimde A sütununa otomatik güncel tarih ve saat ataması yapılsın istiyorum. Örneğin B3 sütununa veri girdiğimde A3 sütununa otomatik tarih ve saat ataması yapılmasını istiyorum. Yardımlarınızı Bekliyorum Kafayı yemek üzereyim.

www.excel.web.tr

Formüle bağlı hücre değiştiğinde tarih yazması

Webden veri çektiğim bir excel sayfam var. Burada dakika başı verileri güncelliyor. H:H sutununda değişiklik olduyğunda yanına tarih yazmasını istiyorum. Fakat H:H sutunundaki değerler formul ile alıyor. Aşağıdaki kod veriler yenilendiğinde çalışmıyor. Örneğin H5 hücresini elle değiştirdiğimde...

www.excel.web.tr

Otomatik tarih ve saat

Merhaba abilerim kardeşlerim emekleriniz için şimdiden çok teşekkür ederim *b hücresine veri girilince otomatik olarak a hücresine günün tarihini veya tarih ve saatini atsın *soru ekte de yer almaktadır

www.excel.web.tr

 

[granit2424]

Merhaba Arkadaşlar,

Aşağıdaki kod ile sorunu kısmen çözdüm, lakin eksik kalan taraf var,

A sutununa yazı yazdığımda B sutununda tarih ve saati veriyor, lakin aynısından C sutununa yazdığımda D sutununa tarih saat vermesini istiyorum, birisi giriş saatini tutarken diğeri çıkış saatini tutacak, birde saat ve tarihi ayrı ayrı verdirtme seçeneğim olabilse süper olur, çünkü sonrasında bu datalara şekil verme işlemine geçeceğim, kusuruma bakmayınız makro konusunda 0 seviyesindeyim, yardımcı olur iseniz bol bol dua ederim.

iyi çalışmalar.


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim RaBereich As Range, RaZelle As Range
Set RaBereich = Range("A1:A1000")
' ActiveSheet.Unprotect
Application.EnableEvents = False
For Each RaZelle In Range(Target.Address)
If Not Intersect(RaZelle, RaBereich) Is Nothing Then RaZelle.Offset(0, 1) = Date + Time
Next RaZelle
' ActiveSheet.protect
Application.EnableEvents = True
Set RaBereich = Nothing
End Sub

 

[YUSUF44]

Aşağıdaki gibi kullanabilirsiniz:

Set RaBereich = Range("A1:A1000, C1:C1000")

 

[granit2424]

Aşağıdaki gibi kullanabilirsiniz:

Set RaBereich = Range("A1:A1000, C1:C1000")

çok teşekkürler.

 

[granit2424]

Yusuf44 kardeş sizden bir arzum daha olacak, aşağıdaki gibi bir taslak oluşturdum, c2 deki kutucuğu işaretlediğimde e2 sutununda =EĞER(D2;"kutucuk işaretlendi";"") kutucuk işaretlendi yazdırdım,

e 2 dede işlem yapıldığında f2 de tarih saat çıkması gerekiyor ama e2 deki sutun yazısını işlem olarak görmediğinden kutucuğu işaretlediğimde tarihi ve saati çağıramıyorum,

bunuda çözersem emelime ulaşacağım

fff

Resim fff kaydedildi Resimyukle.link

www.resimyukle.link

 

[YUSUF44]

Lütfen örnek excel dosyası paylaşın ki deneme yapabilelim.

 

[granit2424]

Lütfen örnek excel dosyası paylaşın ki deneme yapabilelim.

forum excel dosyası paylaşmama izin vermiyor, çözmeye çalışıyorum

 

[granit2424]

https://convertio.co/tr/download/b9a2a5b37085b14ed1fe3f0a706e5412995d59/ bu linki görebiliyormusunuz?

 

[YUSUF44]

İmzamda belirttiğim gibi paylaşabilirsiniz.

 

[YUSUF44]

Linki gördüm ama linkte excel dosyası değil jpg resim dosyası var.

 

[Mahir64]

forum excel dosyası paylaşmama izin vermiyor, çözmeye çalışıyorum

https://dosyam.org bu siteye yükleyip bağlantı paylaşın.

 

[granit2424]

https://dosyam.org/X04/Araç_Giriş.xlsx

sanırım oldu

 

[granit2424]

hakkınızı helal edin ya, sorunumla sizi de meşgul ediyorum

 

[granit2424]

kod kısmında aşağıdaki kod vardı sanırım sizdeki taslakta gelmedi

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim RaBereich As Range, RaZelle As Range
Set RaBereich = Range("E1:E1000")
' ActiveSheet.Unprotect
Application.EnableEvents = False
For Each RaZelle In Range(Target.Address)
If Not Intersect(RaZelle, RaBereich) Is Nothing Then RaZelle.Offset(0, 1) = Date + Time
Next RaZelle
' ActiveSheet.protect
Application.EnableEvents = True
Set RaBereich = Nothing
End Sub