Ana içeriğe atla

Outlook'ta tüm gün etkinliği varsayılanı meşgul olarak nasıl değiştirilir?

Outlook, varsayılan olarak randevuların ve toplantıların durumunu "Meşgul", ama tüm gün süren etkinlikler "Bedava" (aşağıdaki ekran görüntüsüne bakın). Tüm gün süren bir etkinlik oluşturduğunuzda, Farklı Göster durumunu manuel olarak Meşgul olarak değiştirmeniz gerekir. Tüm gün süren etkinliklerin durumu olarak varsayılan gösteriyi Meşgul olarak değiştirmek için makale size iki yöntem sunar.


Özel bir form oluşturarak tüm gün etkinlik varsayılanını meşgul olarak değiştirin

Özel bir form, varsayılan olarak tüm gün süren bir etkinlik oluşturmanıza yardımcı olabilir. Olarak göstermek durumu Meşgul. Lütfen aşağıdaki gibi yapın.

1. Takvim görünümüne geçin. Tıklamak Ana Sayfa > Yeni randevu.

2. Yeni Randevu penceresinde, Geliştirici > Bu Formu Tasarla'yı tıklayın.

İpuçları: Eğer Geliştirici sekmesi şeritte görünmüyor, lütfen yöntemleri takip edin Bu makalede görüntülemek için

3. Ardından randevu penceresi tasarım moduna geçer. tıklamanız gerekiyor (P.2) sekmesi.

4. Sürükleyin Tüm gün aktivitesi alan ve Zamanı Farklı Göster alanından Alan Seçici altındaki panoya ayrı ayrı bölme (P.2) çıkıntı

5. Dışarıya sürüklenen öğeye sağ tıklayın Tüm gün aktivitesi alan ve seçin Emlaklar bağlam menüsünden.

6. içinde Emlaklar iletişim kutusu, aşağıdaki gibi yapılandırmanız gerekir.

6.1) Şuraya gidin: Özellik sekme;
6.2) içinde Başlangıç ​​değeri bölümüne bakın, Bu alanın başlangıç ​​değerini şuna ayarlayın: Kutu;
6.3) Bir değer girin "Doğru" metin kutusuna;
6.4) OK buton. Ekran görüntüsüne bakın:

7. Açılan kutucuğu sağ tıklayın. Zamanı Farklı Göster alanı ve tıkla Emlaklar bağlam menüsünden.

8. içinde Emlaklar iletişim kutusu, aşağıdaki gibi yapılandırmanız gerekir.

8.1) Şuraya gidin: Özellik sekme;
8.2) içinde Başlangıç ​​değeri bölümüne bakın, Bu alanın başlangıç ​​değerini şuna ayarlayın: Kutu;
8.3) Bir sayı giriniz "2” metin kutusuna;
8.4) OK buton. Ekran görüntüsüne bakın:

9. tık Yayınlamak > Formu Farklı Olarak Yayınla şeritte.

10. içinde Formu Farklı Olarak Yayınla iletişim kutusu, yapmanız gerekenler:

10.1) Özel form için bir hedef klasör seçin. Arama konumu açılır liste. İşte seçiyorum Kişisel Formlar Kütüphanesi kalem;
10.2) Özel forma şurada bir ad verin: Görünen Ad Metin kutusu;
10.3) Yayınlamak buton. Ekran görüntüsüne bakın:

11. Randevu penceresini kaydetmeden kapatın.

12. Şu andan itibaren, durumu varsayılan olarak Meşgul olarak göster ile tüm gün süren bir etkinlik oluşturmanız gerektiğinde, lütfen Takvim görüntüle ve tıkla Ana Sayfa > Yeni öğeler > Özel Formlar > "Özel formun adı".

Not: Durum olarak varsayılan olarak "Ücretsiz" olarak göster ile tüm gün süren bir etkinlik oluşturmak için, her zamanki gibi yapın: tıklayın Ana Sayfa > Yeni randevuve daha sonra Tüm gün aktivitesi kutusu Randevu pencere.


VBA kullanarak tüm gün etkinlik varsayılanını meşgul olarak değiştirin

Yukarıdaki yöntemin çok fazla adımı var. Her zaman Farklı Göster durumu varsayılan olarak "Meşgul" olarak tüm gün süren bir etkinlik oluşturmanız gerekiyorsa, aşağıdaki VBA kodu bunu kolayca yapmanıza yardımcı olabilir.

1. Outlook'unuzu başlatın, Ara Toplam + F11 anahtarları aynı anda açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. içinde Uygulamalar için Microsoft Visual Basic pencere, üzerine çift tıklayın Project1 > Microsoft Outlook Nesneleri > Bu OutlookOturumu açmak için Bu OutlookOturumu (Kod) penceresini açın ve ardından aşağıdaki kodu bu kod penceresine kopyalayın.

VBA kodu: Tüm gün olay durumunu varsayılan olarak "Meşgul" olarak ayarlayın

Public WithEvents GInspectors As Inspectors
Public WithEvents GAppointmentItem As AppointmentItem

Private Sub Application_Startup()
'Updated by Extendoffice 20220413
  Set GInspectors = Application.Inspectors
End Sub

Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
  Select Case Inspector.CurrentItem.Class
    Case olAppointment
      Set GAppointmentItem = Inspector.CurrentItem
  End Select
End Sub

Private Sub GAppointmentItem_Open(Cancel As Boolean)
  Select Case GAppointmentItem.AllDayEvent
    Case True
      GAppointmentItem.BusyStatus = olBusy
  End Select
End Sub

Private Sub GAppointmentItem_PropertyChange(ByVal Name As String)
  If Name = "AllDayEvent" Then
    Select Case GAppointmentItem.AllDayEvent
      Case True
        GAppointmentItem.BusyStatus = olBusy
    End Select
  End If
End Sub

3. VBA kodunu kaydedin ve Outlook'u yeniden başlatın.

Şu andan itibaren, bir randevuyu veya toplantıyı tüm gün süren bir etkinliğe dönüştürdükten sonra, Olarak göstermek durum olarak gösterilecek "Meşgul" varsayılan olarak.


İlgili Makaleler

Outlook'ta Tüm Gün Olaylarının Varsayılan Hatırlatıcı Zamanını Değiştirin
Normalde, tüm gün olaylarının varsayılan anımsatıcı zamanı Outlook 18/2007'da 2010 saat ve Outlook 0.5'te 2013 gündür. Bazen, tüm gün olayların varsayılan anımsatıcı saati çalışma programınıza uymayabilir. Burada, Microsoft Outlook'taki tüm gün süren etkinliklerin varsayılan hatırlatma zamanını değiştirmenin yolunu tanıtacağız.

Outlook'ta Varsayılan Takip Süresini Değiştirin
Bildiğimiz gibi, Outlook'ta bir e-posta için takip hatırlatıcısı eklediğimizde, varsayılan takip süresi 4: 30'dur (veya çalışma saatinize bağlı olarak başka bir saattir). Ancak, varsayılan takip zamanını değiştirmek ve saat 9:00 gibi mesai saatlerinin başında size hatırlatmasına izin vermek isteyebilirsiniz. Bu makalede, Outlook'ta varsayılan takip süresini nasıl değiştireceğinizi göstereceğim.

Outlook'ta Varsayılan Arşiv Konumunu Değiştir
Varsayılan olarak Outlook, arşiv dosyaları için varsayılan konuma sahiptir. Varsayılan konumun yanı sıra, arşiv dosyalarınız için kendi arşiv konumunuzu da belirleyebilirsiniz. Bu eğiticide, Outlook'ta varsayılan arşiv konumunu nasıl değiştireceğinizi ayrıntılı olarak göstereceğiz.

Outlook'ta Varsayılan Ek Kaydetme Konumunu Değiştirin
Outlook'u her başlattığınızda belirlediğiniz ek konumunu bulmaktan bıktınız mı? Bu eğitimde, size varsayılan ek konumunu nasıl değiştireceğinizi göstereceğiz. Bundan sonra, Outlook'u yeniden başlatsanız bile ekleri her kaydettiğinizde belirtilen ek kaydetme klasörü otomatik olarak açılacaktır.

Outlook'ta Gecikmeli Teslimat İçin Varsayılan Zamanı Değiştirin
Bu öğretici, Outlook'ta gecikmeli teslim seçeneğinin varsayılan süresini değiştirmenize yardımcı olacak bir VBA kodu sağlar.


En İyi Ofis Üretkenlik Araçları

Outlook için Kutools - Outlook'unuzu Güçlendirecek 100'den Fazla Güçlü Özellik

🤖 AI Posta Yardımcısı: Yapay zeka büyüsüyle anında profesyonel e-postalar: tek tıkla dahice yanıtlar, mükemmel ton, çok dilli ustalık. E-posta göndermeyi zahmetsizce dönüştürün! ...

???? E-posta Otomasyonu: Ofis Dışında (POP ve IMAP için kullanılabilir)  /  E-posta Gönderimini Planla  /  E-posta Gönderirken Kurallara Göre Otomatik CC/BCC  /  Otomatik İletme (Gelişmiş Kurallar)   /  Otomatik Karşılama Ekleme   /  Çok Alıcılı E-postaları Otomatik Olarak Bireysel Mesajlara Bölün ...

📨 E-posta Yönetimi: E-postaları Kolayca Geri Çağırın  /  Dolandırıcılık E-postalarını Konulara ve Diğerlerine Göre Engelleyin  /  Yinelenen E-postaları Silin  /  gelişmiş Arama  /  Klasörleri Birleştir ...

📁 Ekler ProToplu Kaydetme  /  Toplu Ayır  /  Toplu Sıkıştırma  /  Otomatik kaydet   /  Otomatik Ayır  /  Otomatik Sıkıştır ...

🌟 Arayüz Büyüsü: 😊Daha Fazla Güzel ve Havalı Emoji   /  Sekmeli Görünümlerle Outlook Verimliliğinizi Artırın  /  Outlook'u Kapatmak Yerine Küçültün ...

👍 Tek Tıklamayla Harikalar: Tümünü Gelen Eklerle Yanıtla  /   Kimlik Avına Karşı E-postalar  /  🕘Gönderenin Saat Dilimini Göster ...

👩🏼‍🤝‍👩🏻 Kişiler ve Takvim: Seçilen E-postalardan Toplu Kişi Ekleme  /  Kişi Grubunu Bireysel Gruplara Bölme  /  Doğum Günü Hatırlatıcılarını Kaldır ...

üzerinde 100 Özellikler Keşfinizi Bekleyin! Daha Fazlasını Keşfetmek İçin Buraya Tıklayın.

 

 

Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Ahoj,
ani mě to nefunguje. Nevyskočila ani žádná zpráva.
Office Microsoft 365 apps pro velké organizace.

Můžu to nějak trasovat nebo najít někde v logu?

Dík Honza
This comment was minimized by the moderator on the site
Hi,
I've tried the second technique but it did not work. Do you know whether this still works on the newest Outlook version ?
Best,
Ben
This comment was minimized by the moderator on the site
Hi Benjamin Djian,
Yes the code still works on the newest Outlook version? Did you get any error prompt?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations