• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

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

Katılım
30 Mart 2021
Mesajlar
15
Excel Vers. ve Dili
2017
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.
 
Merhaba,

=EĞER(A1="A";"ctrl+shift+";"")
 
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 :(

 
Bu işlemi makro ile yapabilirsiniz.

Forumda örnekler var. Lütfen arama yapınız.
 
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.
 
İnceleyiniz.

 
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
 
Aşağıdaki gibi kullanabilirsiniz:

Set RaBereich = Range("A1:A1000, C1:C1000")
 
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 :)

 
Lütfen örnek excel dosyası paylaşın ki deneme yapabilelim.
 
İmzamda belirttiğim gibi paylaşabilirsiniz.
 
Linki gördüm ama linkte excel dosyası değil jpg resim dosyası var.
 
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
 
Geri
Üst