Super User is a question and answer site for computer enthusiasts and power users. Join them; it only takes a minute:

Sign up
Here's how it works:
  1. Anybody can ask a question
  2. Anybody can answer
  3. The best answers are voted up and rise to the top

I recently installed Firefox thunderbird and I want to import all the rules that I created in Outlook into thunderbird. Is there any way to import these rules?

I tried Import option in Tools menu. When I select, Filters I get only Eudora to import from. It is not listing Outlook. Also when I try Import Everything, nothing gets listed.

So is there anyway to import all the rules for Outlook to thunderbird.?

share|improve this question
up vote 0 down vote accepted

Thunderbird calls message rules message filters. They are not compatible, and Thunderbird doesn't know how to convert them from a Microsoft email client. There don't appear to be any utilities that know how to convert them either, possibly because there is no industry standard format for message rules/filters.


share|improve this answer

There is a Import Message Rules from Outlook Express (Workaround) post in the Mozillazine forums, but this involves registry export and some file editing stuff that looked to much trouble - I just did it manually. But it may be worth checking out if you have a lot of rules. Maybe you can also try installing Eudora, import from Outlook, then import the Eudora rules into Thunderbird.

share|improve this answer

'A macro like this in Outlook 2007 will create some rules compatible with the Thunderbird Message Filter Import/Export add-on. Replace usernames and domains with your email addresses and server domains.

Option Explicit
Sub CreateRule()
Dim colRules As Outlook.Rules
Dim oRule As Outlook.Rule
Dim j As Integer
Dim email(5) As String
Dim server(5) As String

'Get Rules from Session.DefaultStore object
Set colRules = Application.Session.DefaultStore.GetRules()
email(1) = ""
email(2) = ""
email(3) = ""
email(4) = ""
email(5) = ""
server(1) = ""
server(2) = ""
server(3) = ""
server(4) = ""
server(5) = ""
For j = 1 To 5
    Open "c:\temp\" + email(j) + ".txt" For Output As #1
    Print #1, "RootFolderUri=mailbox://" + email(j) + "@" + server(j)
    Print #1, "mailnews.customHeaders="
    Print #1, "version=""9"""
    Print #1, "logging=""no"""
    Dim i As Integer
    For i = 1 To colRules.Count
        Set oRule = colRules.item(i)
        ' break here, right click, add watch to see the structure of oRule
        If Len(oRule.Name) > 0 And oRule.Enabled And oRule.conditions.from.Enabled And oRule.conditions.from.recipients.Count > 0 And oRule.actions.MoveToFolder.Enabled Then
            Print #1, "name=""From is: " + oRule.Name + """"
            Print #1, "enabled=""yes"""
            Print #1, "type=""16""" ' type 16 for manually run only, type 17 for manually run and run on checking mail
            Print #1, "action=""Move to folder"""
            Print #1, "actionValue=""mailbox://nobody@Local%20Folders/Outlook%20Import/Personal%20Folders/Inbox/" + oRule.actions.MoveToFolder.folder + """"
            Print #1, "condition=""AND (from,is," + oRule.conditions.from.recipients.item(1).Address + ")"""
        End If
    Next i
    Close 1
Next j
End Sub
share|improve this answer

You must log in to answer this question.

Not the answer you're looking for? Browse other questions tagged .