1

さて、私の職場では、手順/ガイドラインにより、長時間デスクを離れているかどうかを他の従業員に知らせる電子メールを送信する必要があります。これは空のメール本文 (署名は別) で、件名には IN、OUT、または 10 と記載されています。

私は、混乱を避けるために、これらの電子メールを受信したら単純に削除する習慣を身につけています. しかし、誰が出入りしているかを追跡することは困難です。そこで、これらのメールに基づいて、誰が出入りしているかを表示するアドインを書きたいと思います。現時点での私の考えは、各従業員の名前と、従業員が勤務中か退勤中かを示すラベルをツールバーに作成することです。

誰かがこれを行うための良い方法を提案できますか?

4

2 に答える 2

1

このためのアドインを (VB6 または VSTO を使用して) 作成するか、VBA を使用して受信メールを処理し、カレンダーの予定を作成して、それらの人々が AFK である時間をブロックすることができます。

何かのようなもの:

Private WithEvents Items As Outlook.Items 
Private Sub Application_Startup() 
Dim olApp As Outlook.Application 
Dim objNS As Outlook.NameSpace 
Set olApp = Outlook.Application 
Set objNS = olApp.GetNamespace("MAPI") 
Set Items = objNS.GetDefaultFolder(olFolderInbox).Items 
End Sub

Private Sub Items_ItemAdd(ByVal item As Object) 
On Error Goto ErrorHandler 
Dim Msg As Outlook.MailItem 

If TypeName(item) = "MailItem" Then
Set Msg = item 
  If Msg.Subject = "OUT" Then
    ' create calendar appointment here
  End If
  If Msg.Subject = "IN" Then
    ' delete calendar appoinment here
  End If
End If
ProgramExit: 
Exit Sub
ErrorHandler: 
MsgBox Err.Number & " - " & Err.Description 
Resume ProgramExit 
End Sub

別の方法として、不在通知機能を使用することをお勧めします。トイレや会議でしか使っていない場合でも、件名に「外出中」と表示されることは承知していますが、あなたが今していることよりも悪いことは想像できません. それは組み込みであり、それほど多くの労力を必要としません。

ps- これは私には関係のないことです。このような質問をするとおそらく非難されるでしょうが、その会社がどんな会社か教えていただけないでしょうか。それは絶対に恐ろしいですね。

于 2012-05-23T20:14:41.120 に答える
0

MS BizSparkにサインアップし、Lync Server/Communicatorをダウンロードする必要があります。プレゼンス認識組み込まれています。これは、この奇妙な Outlook VBA/電子メールのセットアップよりも、労力を費やしたほうがよいものです。

別の方法として、Jabber ルートに進みたい場合は、Jabber クライアントを無料で入手することもできます。jabber.org では、独自の jabber サーバーをホストしたくない場合に無料のアカウントを提供しています。

これらのアプローチは両方とも、手動アクションを実行するために人に依存する必要なく、人々の可用性 (プレゼンス) を知るための標準ベースの方法です。

于 2012-05-24T13:00:05.950 に答える