PDA

View Full Version : Jump to userdefined folder in Outlook 2019



Witzker
12-02-2020, 12:38 PM
Hi

by clicking the macro the Ol folder should be opened.
I can do this and jump to Inbox


Sub ChangeViewtoFolderPosteingang()

Dim ns As Outlook.NameSpace
Set ns = Application.GetNamespace("MAPI")


Dim Exp As Outlook.Explorer
Set Exp = Application.ActiveExplorer


Dim myInbox As Folder
Set myInbox = ns.GetDefaultFolder(olFolderInbox)


Dim folder1 As Folder
Set folder1 = myInbox


Set Exp.CurrentFolder = folder1


End Sub
WORX!

And jump to subfolder of Inbox:

Sub ChangeViewtoFolderFAX()

Dim ns As Outlook.NameSpace
Set ns = Application.GetNamespace("MAPI")


Dim Exp As Outlook.Explorer
Set Exp = Application.ActiveExplorer


Dim myInbox As Folder
Set myInbox = ns.GetDefaultFolder(olFolderInbox)


Dim folder1 As Folder
Set folder1 = myInbox.Folders.Item("FAX")


Set Exp.CurrentFolder = folder1


End Sub
WORX too!

But How to jump to user defined Folder # Datenbank?
http://www.vbaexpress.com/forum/image/png;base64,iVBORw0KGgoAAAANSUhEUgAAALkAAACsCAYAAAAntg10AAAW0klEQVR4Ae2dW68d RXqG/VNynz QH4AUaRRFSKNcRCGXkQbESBEXuYCgoLFsmMSYEGRFDpEHJpyGgzBjwGNmArYBgWwI48HYgQww9g SIMWBsgxkfO3oWejfvrl3V3atXd 9e39LKtfpO1RXPfV1Lbt7edO1a9eqSDEHU2Zg05QvLq4tNi8MBORxJ5v8nXw0yL8 caD69OCPVqSIthFth2ZgFMgFOLl/gH7oCwz7sYlqId 89a65IBTMuYhdakshvO666ypPBw4cmGsMqb2mOvbxN7SfpnFE/3CbsRHyeUAvgVzXni6uA3fPPfdU119/fWfI3VbqJ rDQbXW5rYRco4XbUGvg7nUl05ICmZaT Xr6ovo1tmNvvW1QVpB3hZ0P2 XyinsKTApmF7X0YI2EpFe jfccMPSMYd2yZDfdNNNMznX9zsEMjquyK70b7vttiUfjz766JJd2l3P/csfY tqT9cV eIbqjXkJdA/P/QvK/7GJAWZOnJ80r50ER0cQAIeyQCmwBaw5LQ5WJJ3W7ShL5hdx Uoy6eglj33n0IuGfK 7bntKM8PfWvIS0eWS2c rM7/z3Mr4HWYz733bIVcW8iBhOTRNgWOxQZGYBXwHnVT2KQv2 SCmbLg97LbQN/H432UGYfbRj6V8XqTPWQj9TMHrSAvAc4inH5la3Xp7O rL995LAv6mSMPVpfOnqxOv3pXa8gFnC yIPU2Qa42RdccYDmopOdge5l 1XP66tMmkz02Q24Mbe3JTuQjQV4HOItAxP7stW3V5XMfVV /fAy0M/8 iczwOlHrm0kz0EuQIiYlAVWKgvoiuhAKNhSfepKglUybjPtkz1FbmRp012Bsvt1/dS y7k9jSvy79ZokblojORNxnUsIVJf/Py96pv/ 3V19p3HZ/kfPj06i CSWRRygQ0cOUDUrjFzTqdN53UBKDm1UxfYXsaO1wUibbItPaI37cDeJpJju86eriHyxUGvhbzNB Atg5efefab65pM3q7PHnlgW1elvY2 9yGjD9TXevu31Na4p2OkdcsGey6cwYboGIrmOKGpbJO/b3iJjmZpuQG5n86bF1ZGEYwmpSb6pv297Tf42av/CkG/UiYvrXvysPNYcBuRzRPKxFiX89LuBAvKAfOFj11rflAF5QB6Qr/VdGuPr99Y xfmMSB6RPCL5FHd2XNPGiv4RySOSRySPqLexot4U1zsieUTyiOSL7uzLX5 uPnt9 4qHtab2wNai8xT6w90xB43kAH76te3V1ydfmT1L7n8E5MMtamyY5XNbC3nTCxNM5vn3X8hG6dxT iGlbbjH08JNynrnOyY3Zpue eaCqrd8/ pvdFemRAx/OdP7k7/bN6rT95bZXZm3kkvP8h/92eKm9rb QWw62z0cj5E2gp DOU/eBqAzcehFBbU15Fx1s6uUGHnMllfxIrtSfawdatQM64KpOn BXGznQawNQdxsuF Uy0Lm5aYScI0Yd6Dmoc47atnUBtotO2/Eg18V HaBE9a1PHl2CXmNJddK65CIfAPI60EuQ33LLLVUuXblytdr25JvVn/3Dz6s9r3 wYqFLQNGuYwNlf4 TOkkvHvgRh3a9l nvYtLudwyvyxa5J0V7vcVDX kIUwcofWkkJ9J7FAfkOhsBenvQW0VyfWHMRfQ6yKXn bkLF6ubd yvvnf7M9VfbHk C7mDJRBp05s4eldTC02f5ABcMFIGQm0Icm0A18GO1ylLJ 2jjs2cP42HvATon97x4gqYkf/jHz67AvySDfcT5WbYW0OeA5wJngfyHXuOVFsfO1x9 dW3oP/jE29mIRdAvoAOIe1e9zK6iq7A7tGbTSLbrlNnL 3TBkNfSZvPx5sDlGNKGq3R4ehCn tTztlIZaLeE QlwJngtpDvfP7tWfQmggM6EZ2jS7pIKXzqT9u97mXkBbNgp 6wI5PqeN3LqSx2ZFdjy UpoKVzOLqA719MZS 1ofbIm8H2OWqM5HWAY6gN5PfvPboEOJD/67O/mZ1gOLP7YCingKk/bfc6ZeCTLEcNwNaRI60jB6g6upCn9hTxc2NCVrrymeYOKABzTEllVM8dVehzG5KNfD7Ama9GyJs mtQnyn7xwbBng1PUpQQ5ESgLVIWRMXudYQl1ncQClLvBVd3AFtvTcnpdTX9Sxi4yS/PpcOaBEauqeHHqXLdnw9ijPB3ot5G0mswQ5uhcuXq5u/ lrS5A/tv9d8V2M5G18rgeZErjzjL0PG/P4m6rspqtXr1aLpBzk2Dtx6mx1/Y era5evTYD/eevf7AMcCpE8kV8r2VdRW3 qnDecd6889BS1J9XN RX8rww5KVJ/emvjs8i Pc3P7cCbjVMGfLSvET7SgiHnpPBIP/zO/ZUPzvwbvXZ2QuzSAbQuTT0BYb98aFaa3M GORr7UJjPBsX9oB8we8ksXnW/uYJyAPyub8Yr7eNHZAH5AH5etu1Md61f3wYe40ikkckj0g 9q4LfxGJ 2YgInlE8ojki 6qS199WvxJikVth35E/TYMDBrJBXjpJynaDDBkAuRFGVgY8nO/3Zd9pjz34FbatujgQz82QBsGaiHnhYkmIym489RLtvX8t57X5gWHkuzQ7Xq2fAg/jzzyyNIz6fi59dZbl11nybfmh7xuXCX9Op1SX mpSp6V560n9HLPzaO32k9VNkLeBPo8UKeyuQnVwpOrn5cSVB47bwNKG5l03Nu3b58B7qCymR30L nbdT0m/1O66aRlY0zbqtAvytB/oSWov2VD/UHkj5DwWWwd6Cu489dxFsdAAkOtbjbY2QLSRSceeu05FaMl2sStd8pJ qd1103IOUEFcgjzVSeupj6HqrSCvA92hXnSQ6SLn7EmGhfJjDO900kbSJinJSkbyHj1dh3ZkaGM s3iffskGuO05Ozq9F/d6mMnZ1F8OmIj5lHyf1unFhz2Wwy/hoU2o7XmylgPIyCHBveeLtbCTniOJRPGdD1zx03hryEugp5Llnxuva/AJZXMFDuyBLF0uLCwAslHK3RRlbqSzt2GNTUNbxSLroaJPIv2zU2ZNMnV/5QNavU 3Sdcg1TnR8HrzcNC5s6Jrw4bryqfGX5jKFXC9flyBXv19basP7hiy3hrx0ZMlBrjd/mnLg94vTQnobZS2KgKSuxAJKzyNdSdbtyY/bT HzPvlULgAlg706v/Kn8aruOf4dcsGHjMMqn3X kEHH5wU70qVcp /jckCJ0ERq nOQ59qQdRtue hyK8hLgDO4eSHnJylIfFLIseeLrIvXorAgKYSSIVfkRa5OVvakq3pOp64v1aeesyE5z3PXmcIv3 9IrQV6aE/Tp07FEdtxu2/E6oJTTROSWfd8EaiN3G94 dLkR8jrAGVzfkHO7ZBH8wn1RKPut1 UoA7oiV0nW7aHjdcosPO0ai6JpnT3pyF7dGHO2paexp3Xsp NsMy5kgNxB92uUn6bxlgDNRe3cUQU/JRv0DZkaIW9yXoJ8z549VZrS40sukuNPcLEYJF8gLbb3pfIac06WPnQFSFp3W/h12ZI9yWmcJTmNS7n7wg919Wlcsp32txmXyxDRFfFlc57xlgDNQV6SLbX7NQ9RroW8jcMS5CnQu XoJ8jZ N7qMAzzGXPQBaB82ulzrwpCnTgGXT1MURyYg73abJuIrKqfzP1QdQEnr8XdkBoM8F7nTtoB8Psg 5YhHBx47iQ22csewOAjnwtk1jXWj4mW9DTWm eod8SpMT1zKNjRGQD/zXV7FRVn jBOQB bK/tpzipgzIA/KAfIo7O65p9Y8QY65BRPKI5BHJx9xx4WtjRdix1jsieUTyiORj7bbwE1F8KAZ6jeTHjx vHnzwweqOO 5YkWinf6gLCbuxSUoM9AY5YD/99NPVBx s/A weGaF9t27d8/gLw0m2gPUIRjoBfIrV67M4H3ooYdqIaefzdB0If4gEg8jtXniboiHloawmT5r7i9JMC8ln5oTfw 4 N48l/ZzsRmnrBXIma9u2bdUbb7xR3X///SuOKoBN 8GDB6sdO3bUQi4IyLUIerhf9VyeLi4bg0dS0U1Byunn2lKbLlPX53Je1ksSDirj9PF1ses Svqldtedark3yHfu3FmdOnUqfZp2Wf3999 fndnrJlNw1snk oZYxDqbdX258dGWuzZFaOl0sStd8pJ qd11p1ruDfKHH364AuK6z1tvvVU99dRTSxE6ndR0wdN 6pJh0YBGMr6ILkO7v1bGy8C0pe3YUrvuIpJRuyKu6uS6y7hPH5fGp37VPUe ySfy MMOZdmjzf25DO2MjzaltuP18a33cm Q86USiPX59NyZ6j9e 2X1v2dOq6l69dVXq7179y6BmU4eC 0LBlRaHC0u/SrrOIKddHEFtmAgd3n3DfhafG/HJn20MTbq6nd/tJXGJXn8 7WpXboOuXz62JFznyV/ksGG5iDVlU/sUy7NC31TSL1B/uKLL1Yvv/zyDOjzf7hQ3f7MA9WTbx6s/n73rurM1 dn7fv27ZuBXpo4LWrar4UTaNSVBEQq4za04LKviIyM2lxeZdnM1b2vblzSrfMDsA45stLT2KnLZ 50/ZNDxa3RdynX68julvDfIDx06NIvS0HzPr56q/vP4t1H90If/XW19/pHq6rVrs6PKkSNHlhYwN5G 4Or3xS1FQ5ehLF1yB4W67hAsdh18silbXvcydkrjki557tpS/24XHR 7 ur8IYOf9M4kXWzW6ft4p1LuDfJjx45Vjz/ CxiH/3od9UPHvrnpfTWyd/O2h944IHZub1u8rh1siAu4wtE2W/DkivJCCKPjugAuqIdUKgse RuM63TByySL41L/eS6Nh8Leu7b69inLvm0XDcPQO6gozvveH3s67ncG QnT56sdu3aNYO59Md9991XffLJJ0tglCZOMLAwJF8sLXzaR10wkKufXIub2nX/OXm3iazXGRN1ja00LvdBOR1DCqpskpO8n7quseTPZdi8JPx2HW86/vVY7w3yL774orr33ntLfM/a77zzzur8 fONkK/HiRxjzA7wGP6m4qM3yC9dulRt3ry5Onz4cPXxxx9XFy9enIFNTp32Nv/aOZWJ7fs6iOiKyn3bnrq93iBnooC4KU19Qvu Pj966ajSt4 p2 sV8hMnTsx OYt//dy6desM C1btlTU UUt qc oXF9a /v1nuFPBZ47S1wrMnVahNPEEaKOZgyAwF5bPLJB7mAPCAPyKd8G4tr2xjHtIjkEckjkke02xjRbs rrHJE8InlE8inv8Li2jXGXikgekTwieVO0a/vfppTkmuxH/8aItkOu88KRHHi7ftDNXRwvRfMiAX033nhjVobHTj1JPmev7zb87t /PzuuLr76ttdlDFPWmQtyFiOdDIf8Nx9 Vv3tzoOzRLnpU4Kcx0oB3WFP/aZg8BhqaUO4bqrnfW3LfdhwX33bc9tRvtL 2RUWgpROmkP Vz/ RfW925 ZJcpNnxRy4JYfz3nPMfVLv0dTymlbqkO9jUxOz9v6sDGkPbcd5ZaQs6hK6aQ55H/9T/uWIKesT/of11Lnk0Iu24KayOwgq588BxrRnOhPPzY0ZkV41cnVps1BG/ryQd03nR H6vpyfjXeOnu6zrZ3JI0z8ubvLI3HFRbUUzqpDvkb752qiOAkyk2fJsgFe qTOmMSGOp3yNWWyqZ66MgOEAp 5OSfjUNdNr1Pm0Q2JJPzW2cPffoZg9uIcjPETXNUCzmLmabUoCD//enz1c079lefn/umOn32wuxc/tHnX804bxvJWeTUH/XcwtOeguWQe9REVhHe9QQvbUoC0eW4Zq97mT6Hs43fnD1s N0ineeod4e9CLkWPc3TyRbkAM55/N9/cbTa9cI7szJfQus uUgOJMBHqlv0FDQBy/gUXTVWh9/10KFPcp67HO1e9zJ9gryt35w9xqG7iI8jyt3h1twVIZdAUy7Iv7/5uaXzePrls20kxxcLDSwADoQl/w6a4FLER08RWfDLFnoqY5u69NyX25ccflTWBpR9 ijX ZW bKguX1x7gL441L6OlHuDfO/h383O4g74L//rZF0gL37xTAeZqwOGJwcXeSIj/UDnkRyIaBdMglS21E5dEGLP69KXjm Skl/Xz9mTL/RJuWuOtm4boDfIa2kudOaOK7GQ3RYy5q08b71ADqxdUyxOeXFibvqZm4Uhj4XoZyFiHoebx4A8n kKc/Pk/IA/IA/K4jQ53G425HWduI5JHJI9IHtFmnGgT8zzcPEckj0gekTwizHARJuZ2nLmNSB6RPCJ5RJtxok3M8 3DzHJE8InlE8ogww0WYmNtx5naUSN714S3pBQzjwDDVeR4N8sLTto3NgD7v5Os5b V6wWFeOyE/jc01OuR9/TZLHYDpCwq8hKCXIebRq5ONvvWzAUaHfNHfZmkDVwo5b92kbTk7bWRyetG2toEfHfK fpulDqwcrERzvSLHK3HIkBThVfc2bQ7a/JU06rzyJp04DgXks7eGdPju67dZFoHcdQFV71d6GRnAVh9Q 4ZIX1h2m1FeW9CPGsn7 G0Wj64plIIr1 6R3KMwsorwrpe 4EyfwHY5fKZ12tqMU ONfNhNMSrkff02SxMUKXQC1uGTDYff9dDxI4rkyV0uV3fZKA8LcJv5HRXyvn6bpenCHEJFVP1sB PAqIgt cmyip7Lq0nOfbl9yOta4XJRXH3DWYFTIx/ptFiD05OBy0URo oHdIzlnbtp19tYmkC21U3eo03rAvTbg1jqMCrm fM6Td/nHIF1c5GsLttVaj9Eg1z/Rd8lXa3LC7zQ2ySiQByzTgGW9rmNAHo/azv1s0HqDPSAPyAPy9bZrY7xxNEoZiEgekTwieboroh6Rcr0xEJE8Ivn0I/nly5erSDEHU2Zg05QvLq4tNi8MBORxJ5v8nTwgD8gD8rjlxy1/vTMwSiTv8lCW66z3SY7xr26gWBjyzVvvarzdAWzXD7rzQqLnv5XzovG8NrrK4/Oll17qzV/f9rpe13rW6wXyJtAd8i6/uzLvBKdg8GIELzw02Un1muRz/X3YcLt923PbG6XcC RE6TrQHfIuv7sy72KkYBBZ07aczTYyOT1v68PGkPbc9kYp9wZ5HegOeZffXZl3MXKg6TU3bPHaG zIkRXjVvU2bgzb0NQ7qd99995INPw7V9eX8YrNOhz4df9rekTTOyL/9LtAr5CXQHfIuv7sy72I5GNJ1yNVG7rJepg8dAQbUviEAFhm9Byqb2FCfNolsSIbcfblOzh762G QMbiPK7b7Q9gp56cgiyLv 7oovpsABDAfFZXLtDrlHYWQBC33XE2y0KQlel0v10j6Hs43fnD1s N3Cr7XNfLj8Riz3BnkJcCZVkHf93ZV5FyYFTcBiR1DIpsPveujQJznPXY52r3uZPkHe1m/OHuPQXcTHEeURI3kd4CyEIO/6uyvzLqaDJrh0qwdeRWTBT44P9FRWXXo BrcvOfyorKgr /RRrvMrfdlQXb6APEBvB7WvFeVeInlqNK0L8q6/u5Laa6oDhicHF10iI/1A55EciGgXTIJUttROXRBiz vSl45vkpJf18/Zky/0SU3XH/3LN8PCkLeZUEHe5R E0G3jI2SWL2zMx3fzMRrkwNo1xYJ9t2AxF/PPxSiQx8LMvzAxZ/3NWUAej9pO/jgYkAfkAXncNvu7bcZcrs5cRiSPSB6RPKLP6kSfmPf 5j0ieUTyiOQRUfqLKDGXqzOXEckjkkckj izOtEn5r2/eY9IHpE8InlElP4iSszl6szl/wNqxUD/Rm5eVgAAAABJRU5ErkJggg==
The folder # Datenbank is in the main Tree!

Hope for help

gmayor
12-03-2020, 09:41 PM
You have to complete the path to the folder. If it is on the same level as Inbox then


Sub ChangeViewtoFolderDatenbank()
Dim ns As Outlook.NameSpace
Dim Exp As Outlook.Explorer
Dim folder1 As Folder

Set ns = Application.GetNamespace("MAPI")
Set Exp = Application.ActiveExplorer


Set folder1 = ns.GetDefaultFolder(olFolderInbox).Parent.folders.Item("Datenbank")
Set Exp.CurrentFolder = folder1
End Sub

Witzker
12-04-2020, 12:14 PM
THX

But How to jump to user defined Folder # Datenbank?
http://www.vbaexpress.com/forum/image/png;base64,iVBORw0KGgoAAAANSUhEUgAAALkAAACsCAYAAAAntg10AAAW0klEQVR4Ae2dW68d RXqG/VNynz%20QH4AUaRRFSKNcRCGXkQbESBEXuYCgoLFsmMSYEGRFDpEHJpyGgzBjwGNmArYBgWwI48 HYgQww9gSIMWBsgxkfO3oWejfvrl3V3atXd9e39LKtfpO1RXPfV1Lbt7edO1a9eqSDEHU2Zg05Q vLq4tNi8MBORxJ5v8nXw0yL8%20caD69OCPVqSIthFth2ZgFMgFOLl/gH7oCwz7sYlqId%2089a65IBTMuYhdakshvO666ypPBw4cmGsMqb2mOvbxN7SfpnFE/3CbsRHyeUAvgVzXni6uA3fPPfdU119/fWfI3VbqJ%20rDQbXW5rYRco4XbUGvg7nUl05ICmZaT%20Xr6ovo1tmNvvW1QVpB3hZ0P2%20Xy insKTApmF7X0YI2EpFe%20jfccMPSMYd2yZDfdNNNMznX9zsEMjquyK70b7vttiUfjz766JJd2l 3P/csfY%20tqT9cV%20eIbqjXkJdA/P/QvK/7GJAWZOnJ80r50ER0cQAIeyQCmwBaw5LQ5WJJ3W7ShL5hdx%20Uoy6eglj33n0IuGfK%207bntK M8PfWvIS0eWS2c%20rM7/z3Mr4HWYz733bIVcW8iBhOTRNgWOxQZGYBXwHnVT2KQv2%20SCmbLg97LbQN/H432UGYfbRj6V8XqTPWQj9TMHrSAvAc4inH5la3Xp7O%20rL995LAv6mSMPVpfOnqxOv3pXa8gF nC%20yIPU2Qa42RdccYDmopOdge5l%201XP66tMmkz02Q24Mbe3JTuQjQV4HOItAxP7stW3V5XM fVV/fAy0M/8%20iczwOlHrm0kz0EuQIiYlAVWKgvoiuhAKNhSfepKglUybjPtkz1FbmRp012Bsvt1/dS%20y7k9jSvy79ZokblojORNxnUsIVJf/Py96pv/%203V19p3HZ/kfPj06i%20CSWRRygQ0cOUDUrjFzTqdN53UBKDm1UxfYXsaO1wUibbItPaI37cDeJpJju86eriH yxUGvhbzNBAtg5efefab65pM3q7PHnlgW1elvY2%209yGjD9TXevu31Na4p2OkdcsGey6cwYboG IrmOKGpbJO/b3iJjmZpuQG5n86bF1ZGEYwmpSb6pv297Tf42av/CkG/UiYvrXvysPNYcBuRzRPKxFiX89LuBAvKAfOFj11rflAF5QB6Qr/VdGuPr99Y%20xfmMSB6RPCL5FHd2XNPGiv4RySOSRySPqLexot4U1zsieUTyiOSL7uzLX5%20uP nt9%204qHtab2wNai8xT6w90xB43kAH76te3V1ydfmT1L7n8E5MMtamyY5XNbC3nTCxNM5vn3X8 hG6dxTiGlbbjH08JNynrnOyY3Zpue%20eaCqrd8/%20pvdFemRAx/OdP7k7/bN6rT95bZXZm3kkvP8h/92eKm9rb%20QWw62z0cj5E2gp%20DOU/eBqAzcehFBbU15Fx1s6uUGHnMllfxIrtSfawdatQM64KpOn%20BXGznQawNQdxsuF%20Uy0Lm5a YScI0Yd6Dmoc47atnUBtotO2/Eg18V%20HaBE9a1PHl2CXmNJddK65CIfAPI60EuQ33LLLVUuXblytdr25JvVn/3Dz6s9r3%20wYqFLQNGuYwNlf4%20TOkkvHvgRh3a9l%20nvYtLudwyvyxa5J0V7vcVDX%20kIU wcofWkkJ9J7FAfkOhsBenvQW0VyfWHMRfQ6yKXn%20bkLF6ubd%20yvvnf7M9VfbHk%20C7mDJR Bp05s4eldTC02f5ABcMFIGQm0Icm0A18GO1ylLJ%202jjs2cP42HvATon97x4gqYkf/jHz67AvySDfcT5WbYW0OeA5wJngfyHXuOVFsfO1x9%20dW3oP/jE29mIRdAvoAOIe1e9zK6iq7A7tGbTSLbrlNnL%203TBkNfSZvPx5sDlGNKGq3R4ehCn%20tTzt lIZaLeE%20QlwJngtpDvfP7tWfQmggM6EZ2jS7pIKXzqT9u97mXkBbNgp%206wI5PqeN3LqSx2Z Fdjy%20UpoKVzOLqA719MZS%201ofbIm8H2OWqM5HWAY6gN5PfvPboEOJD/67O/mZ1gOLP7YCingKk/bfc6ZeCTLEcNwNaRI60jB6g6upCn9hTxc2NCVrrymeYOKABzTEllVM8dVehzG5KNfD7Ama9GyJs mtQnyn7xwbBng1PUpQQ5ESgLVIWRMXudYQl1ncQClLvBVd3AFtvTcnpdTX9Sxi4yS/PpcOaBEauqeHHqXLdnw9ijPB3ot5G0mswQ5uhcuXq5u/%20lrS5A/tv9d8V2M5G18rgeZErjzjL0PG/P4m6rspqtXr1aLpBzk2Dtx6mx1/Y%20era5evTYD/eevf7AMcCpE8kV8r2VdRW3%20qnDecd6889BS1J9XN%20RX8rww5KVJ/emvjs8i%20Pc3P7cCbjVMGfLSvET7SgiHnpPBIP/zO/ZUPzvwbvXZ2QuzSAbQuTT0BYb98aFaa3M%20GORr7UJjPBsX9oB8we8ksXnW/uYJyAPyub8Yr7eNHZAH5AH5etu1Md61f3wYe40ikkckj0g%209q4LfxGJ%202YgInlE8ojki%20 6qS199WvxJikVth35E/TYMDBrJBXjpJynaDDBkAuRFGVgY8nO/3Zd9pjz34FbatujgQz82QBsGaiHnhYkmIym489RLtvX8t57X5gWHkuzQ7Xq2fAg/jzzyyNIz6fi59dZbl11nybfmh7xuXCX9Op1SX%20mpSp6V560n9HLPzaO32k9VNkLeBPo8UKeyu QnVwpOrn5cSVB47bwNKG5l03Nu3b58B7qCymR30LnbdT0m/1O66aRlY0zbqtAvytB/oSWov2VD/UHkj5DwWWwd6Cu489dxFsdAAkOtbjbY2QLSRSceeu05FaMl2sStd8pJ%20qd1103IOUEFcgjzVS eupj6HqrSCvA92hXnSQ6SLn7EmGhfJjDO900kbSJinJSkbyHj1dh3ZkaGMs3iffskGuO05Ozq9F/d6mMnZ1F8OmIj5lHyf1unFhz2Wwy/hoU2o7XmylgPIyCHBveeLtbCTniOJRPGdD1zx03hryEugp5Llnxuva/AJZXMFDuyBLF0uLCwAslHK3RRlbqSzt2GNTUNbxSLroaJPIv2zU2ZNMnV/5QNavU%203Sdcg1TnR8HrzcNC5s6Jrw4bryqfGX5jKFXC9flyBXv19basP7hiy3hrx0ZMlBrjd/mnLg94vTQnobZS2KgKSuxAJKzyNdSdbtyY/bT%20HzPvlULgAlg706v/Kn8aruOf4dcsGHjMMqn3X%20kEHH5wU70qVcp%20/jckCJ0ERq%20nOQ59qQdRtue%20hyK8hLgDO4eSHnJylIfFLIseeLrIvXorAgKYSSIVfkRa5OVv akq3pOp64v1aeesyE5z3PXmcIv39IrQV6aE/Tp07FEdtxu2/E6oJTTROSWfd8EaiN3G94%20dLkR8jrAGVzfkHO7ZBH8wn1RKPut1%20UoA7oiV0nW7aHjdcosP O0ai6JpnT3pyF7dGHO2paexp3Xsp%20NsMy5kgNxB92uUn6bxlgDNRe3cUQU/JRv0DZkaIW9yXoJ8z549VZrS40sukuNPcLEYJF8gLbb3pfIac06WPnQFSFp3W/h12ZI9yWmcJTmNS7n7wg919Wlcsp32txmXyxDRFfFlc57xlgDNQV6SLbX7NQ9RroW8jcMS5CnQu XoJ8jZ%20N7qMAzzGXPQBaB82ulzrwpCnTgGXT1MURyYg73abJuIrKqfzP1QdQEnr8XdkBoM8F7 nTtoB8Psg5YhHBx47iQ22csewOAjnwtk1jXWj4mW9DTWm%20eod8SpMT1zKNjRGQD/zXV7FRVn%20jBOQB%20bK/tpzipgzIA/KAfIo7O65p9Y8QY65BRPKI5BHJx9xx4WtjRdix1jsieUTyiORj7bbwE1F8KAZ6jeTHjx%20vHnz wweqOO%205YkWinf6gLCbuxSUoM9AY5YD/99NPVBx%20s/A%20weGaF9t27d8/gLw0m2gPUIRjoBfIrV67M4H3ooYdqIaefzdB0If4gEg8jtXniboiHloawmT5r7i9JMC8ln5oTfw 4%20N48l/ZzsRmnrBXIma9u2bdUbb7xR3X///SuOKoBN%208GDB6sdO3bUQi4IyLUIerhf9VyeLi4bg0dS0U1Byunn2lKbLlPX53Je1ksSDirj9P F1ses%20Svqldtedark3yHfu3FmdOnUqfZp2Wf3999%20fndnrJlNw1snk%20oZYxDqbdX258dG WuzZFaOl0sStd8pJ%20qd11p1ruDfKHH364AuK6z1tvvVU99dRTSxE6ndR0wdN%206pJh0YBGMr 6ILkO7v1bGy8C0pe3YUrvuIpJRuyKu6uS6y7hPH5fGp37VPUe%20ySfy%20MMOZdmjzf25DO2Mj zaltuP18a33cm%20Q86USiPX59NyZ6j9e%202X1v2dOq6l69dVXq7179y6BmU4eC%200LBlRaHC 0u/SrrOIKddHEFtmAgd3n3DfhafG/HJn20MTbq6nd/tJXGJXn8%207WpXboOuXz62JFznyV/ksGG5iDVlU/sUy7NC31TSL1B/uKLL1Yvv/zyDOjzf7hQ3f7MA9WTbx6s/n73rurM1%20dn7fv27ZuBXpo4LWrar4UTaNSVBEQq4za04LKviIyM2lxeZdnM1b2vblzSrfMDsA 45stLT2KnLZ50/ZNDxa3RdynX68julvDfIDx06NIvS0HzPr56q/vP4t1H90If/XW19/pHq6rVrs6PKkSNHlhYwN5G%204Or3xS1FQ5ehLF1yB4W67hAsdh18silbXvcydkrjki557tpS/24XHR%207%20ur8IYOf9M4kXWzW6ft4p1LuDfJjx45Vjz/CxiH/3od9UPHvrnpfTWyd/O2h944IHZub1u8rh1siAu4wtE2W/DkivJCCKPjugAuqIdUKgse%20RuM63TByySL41L/eS6Nh8Leu7b69inLvm0XDcPQO6gozvveH3s67ncG%20QnT56sdu3aNYO59Md9991XffLJJ0tglC ZOMLAwJF8sLXzaR10wkKufXIub2nX/OXm3iazXGRN1ja00LvdBOR1DCqpskpO8n7quseTPZdi8JPx2HW86/vVY7w3yL774orr33ntLfM/a77zzzur8%20fONkK/HiRxjzA7wGP6m4qM3yC9dulRt3ry5Onz4cPXxxx9XFy9enIFNTp32Nv/aOZWJ7fs6iOiKyn3bnrq93iBnooC4KU19Qvu%20Pj966ajSt4%20p2%20sV8hMnTsx%20OYt//dy6desM%20C1btlTU%20UUt%20qc%20oXF9a%20/v1nuFPBZ47S1wrMnVahNPEEaKOZgyAwF5bPLJB7mAPCAPyKd8G4tr2xjHtIjkEckjkke02xjRbs rrHJE8InlE8inv8Li2jXGXikgekTwieVO0a/vfppTkmuxH/8aItkOu88KRHHi7ftDNXRwvRfMiAX033nhjVobHTj1JPmev7zb87t%20/PzuuLr76ttdlDFPWmQtyFiOdDIf8Nx9%20Vv3tzoOzRLnpU4Kcx0oB3WFP/aZg8BhqaUO4bqrnfW3LfdhwX33bc9tRvtL%202RUWgpROmkP%20Vz/%20RfW925%20ZJcpNnxRy4JYfz3nPMfVLv0dTymlbqkO9jUxOz9v6sDGkPbcd5ZaQs6hK6aQ55H/9T/uWIKesT/of11Lnk0Iu24KayOwgq588BxrRnOhPPzY0ZkV41cnVps1BG/ryQd03nR%20H6vpyfjXeOnu6zrZ3JI0z8ubvLI3HFRbUUzqpDvkb752qiOAkyk2fJsgFe%20qTO mMSGOp3yNWWyqZ66MgOEAp%205OSfjUNdNr1Pm0Q2JJPzW2cPffoZg9uIcjPETXNUCzmLmabUoC D//enz1c079lefn/umOn32wuxc/tHnX804bxvJWeTUH/XcwtOeguWQe9REVhHe9QQvbUoC0eW4Zq97mT6Hs43fnD1s%20N0ineeod4e9CLkWPc3TyRbkAM5 5/N9/cbTa9cI7szJfQus%20uUgOJMBHqlv0FDQBy/gUXTVWh9/10KFPcp67HO1e9zJ9gryt35w9xqG7iI8jyt3h1twVIZdAUy7Iv7/5uaXzePrls20kxxcLDSwADoQl/w6a4FLER08RWfDLFnoqY5u69NyX25ccflTWBpR9%20ijX%20ZW%20bKguX1x7gL441L6OlHuDfO/h383O4g74L//rZF0gL37xTAeZqwOGJwcXeSIj/UDnkRyIaBdMglS21E5dEGLP69KXjm%20Skl/Xz9mTL/RJuWuOtm4boDfIa2kudOaOK7GQ3RYy5q08b71ADqxdUyxOeXFibvqZm4Uhj4XoZyFiHoebx4A8n kKc/Pk/IA/IA/K4jQ53G425HWduI5JHJI9IHtFmnGgT8zzcPEckj0gekTwizHARJuZ2nLmNSB6RPCJ5RJtxok3M8 3DzHJE8InlE8ogww0WYmNtx5naUSN714S3pBQzjwDDVeR4N8sLTto3NgD7v5Os5b%20V6wWFeOy E/jc01OuR9/TZLHYDpCwq8hKCXIebRq5ONvvWzAUaHfNHfZmkDVwo5b92kbTk7bWRyetG2toEfHfK%20fpulDq wcrERzvSLHK3HIkBThVfc2bQ7a/JU06rzyJp04DgXks7eGdPju67dZFoHcdQFV71d6GRnAVh9Q%204ZIX1h2m1FeW9CPGsn7%20G0W j64plIIr1%206R3KMwsorwrpe%204EyfwHY5fKZ12tqMU%20ONfNhNMSrkff02SxMUKXQC1uGTD Yff9dDxI4rkyV0uV3fZKA8LcJv5HRXyvn6bpenCHEJFVP1sBPAqIgt%20cmyip7Lq0nOfbl9yOt a4XJRXH3DWYFTIx/ptFiD05OBy0URo%20oHdIzlnbtp19tYmkC21U3eo03rAvTbg1jqMCrm%20fM6Td/nHIF1c5GsLttVaj9Eg1z/Rd8lXa3LC7zQ2ySiQByzTgGW9rmNAHo/azv1s0HqDPSAPyAPy9bZrY7xxNEoZiEgekTwieboroh6Rcr0xEJE8Ivn0I/nly5erSDEHU2Zg05QvLq4tNi8MBORxJ5v8nTwgD8gD8rjlxy1/vTMwSiTv8lCW66z3SY7xr26gWBjyzVvvarzdAWzXD7rzQqLnv5XzovG8NrrK4/Oll17qzV/f9rpe13rW6wXyJtAd8i6/uzLvBKdg8GIELzw02Un1muRz/X3YcLt923PbG6XcC%20RE6TrQHfIuv7sy72KkYBBZ07aczTYyOT1v68PGkPbc9kYp9wZ5HegOeZ ffXZl3MXKg6TU3bPHaGzIkRXjVvU2bgzb0NQ7qd99995INPw7V9eX8YrNOhz4df9rekTTOyL/9LtAr5CXQHfIuv7sy72I5GNJ1yNVG7rJepg8dAQbUviEAFhm9Byqb2FCfNolsSIbcfblOzh762G QMbiPK7b7Q9gp56cgiyLv%207oovpsABDAfFZXLtDrlHYWQBC33XE2y0KQlel0v10j6Hs43fnD1 s%20N3Cr7XNfLj8Riz3BnkJcCZVkHf93ZV5FyYFTcBiR1DIpsPveujQJznPXY52r3uZPkHe1m/OHuPQXcTHEeURI3kd4CyEIO/6uyvzLqaDJrh0qwdeRWTBT44P9FRWXXo%20BrcvOfyorKgr%20/RRrvMrfdlQXb6APEBvB7WvFeVeInlqNK0L8q6/u5Laa6oDhicHF10iI/1A55EciGgXTIJUttROXRBiz%20vSl45vkpJf18/Zky/0SU3XH/3LN8PCkLeZUEHe5R%20E0G3jI2SWL2zMx3fzMRrkwNo1xYJ9t2AxF/PPxSiQx8LMvzAxZ/3NWUAej9pO/jgYkAfkAXncNvu7bcZcrs5cRiSPSB6RPKLP6kSfmPf%205j0ieUTyiOQRUfqLKDGXqzOXEckjkk ckj%20izOtEn5r2/eY9IHpE8InlElP4iSszl6szl/wNqxUD/Rm5eVgAAAABJRU5ErkJggg==
The folder # Datenbank is in the main Tree!
and its Uerdefined - containing Contact Items (not Standard Folder)

http://www.vbaexpress.com/forum/image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKgAAACQCAYAAACcYiB0AAAV7UlEQVR4Ae2d789V VXbH/VPm/bxr38yLNpkXNpM0TWMycaZNnaZpYlKNJo1N5oWOKZGAbYdgHUMmDA0jU0CrEnFAAZ0xgBoNaB0U QemAwlQtICIgID8edvM55Huz7rp773POfc59OPfefZPj3nvttdZeZ /PWftc2Fduu3HjRihXmYO MnBbXwMrcZWHBgYKoGUH6fUOWgAtgBZAy3ZdtutxGZhIBr14fE84tfeRkWvcIIvd/ALeOaCCk9J ALaANr gjbv2A0CXr/yXVgAJxFimTMl8kLfffnuw1549e1rF4P3VtfHPeJMepy6O0t/8QR0CtA2kKQhzcr8wFpbHHnss3HHHHWMDan35cUq7ORB9m6shQNmSm0KaAzHV52/eQ XbXj/XXoxtzm/pu7VwjwDaFFL7fpmqe1D9YnuobFvbMTIuMqzs77rrrsGrAXLpUN57772VnrW3mRkdbfHyK/uHHnpoMMZTTz018Ivc2tnxNR6xjetP91XK0YchCmgK0jP7fjbyzdxDSBs9Pr7PL4BddCBg4aUDV IJSsFEis1BI3/pChr1AtDZWj7rGFJDyZ8f3gEqHsmt/1nepm79JYmvXJ7XNXz37cbjwPy OgGdBPH9ke0CvKaAsMJfNch4WFgqQAE2w2mznQZG9fFMKROoC19atD xtPLaPOnFY3 h7Hduu84duueJzMJJBU3AygadfXxmunvtD OqDp6OQnj2wIVw9dyKcfuMm7BZc6n4RPCDqF2BqUwpQyZTVYnDEgJCdHdPW6Vc7Zq8 PSDyB8ixGJr6k59SNgA0BycTCGRfvLkqXDv/afjq/U1DkJ793S8rOOlHr2kGVTbzCwQQZCrkgsLrAqkyKfoCBRtrb30LNOlYn75P/pQx0UWmbEzdjmvtvX rZ/3Z2Ep9FNKhDFo3QcqIZMgrZ46Ey//3u3Dug2eq8ptTB6vMKZ3FAiooWdjY4kqumHkvRab3U8EjPclpC0pbx49tCyJk8i07siZyQG2SQf Gd86d7KGUG0CaTI/hUnv/ohXD583fCuUPPDmVT pv4mxYdPSxdxdu1v67i6qOfQQZtEpzAbFI28TctOmRQbetdxNy1vy5i6quPAmjiG7S2cbZyrsUu YNf FhvPtNi3AnRabqrEOfouN61zUgBNZNBpXdBZi7sAWgBd9OvLJB KAmgBtAA6ySes J6d983YWpYMWjJoyaCxJ6PIZjvzdbW JYOWDFoyaFdPU/Ezf1m3ZNCSQecng167eDp88dbqkYMjs3Z4pGTypcvknWVQ4Dz95upw8cTr1VlQ 58C6NIt6Kw9PANA6w4rc MXjr4czY7jnm7SQQyVnJm81ROsc5sc7mgay7fu3hq4Nu/5uLL5zo93VW1kf73q9UpGKT1b3v L/QN50/HmSW8I0DpIm4CY0olNKmDqEHCsPyYbxwY/OljMUTeumG rl qPyQFOciAFOrXpE7iSUQKs4KVtfVi9ea8PAcq2nIM0Bt9iJnAc2MaxaRPjOP5zcJFNVz53cACsY vE2vi29eS9HAM1BmgL0gQceCLHr vWFsOq5d8Jf/POvw7a3jo0sUgoG5NpqqdvfHdHm0qFf 1qAXL8jsr8dQm4ztW3LF6W9lGV1 p2 1Lafg4s n0HJsDZ7AmHOxzxDGgU0BWkOUPulSPXzl66E 9bsDn/ 8AvhzhUvRQG1UAgiZDrBrt8WaZHokx5wCiTqACSYKQWvtcGPbVOXje jjc/YeIqHMgXX95a9OgIi tf/sItCkfdpx5rEcBTW3zbQBds 1AWPn0/vDV1zch/bdn34kCqsW3k28BQm7bto6tshqg2qwJ4PJtbXL fJ8eDux16cGx8cbgYmv3WRIbtnv6rD31mA vM4/tEUBTcDI5TQFd 9L7VdYkcwIpmZTt3k wB0f9Xm7bto6 QBSotC2o6Hgb27Z1r4sf VVssdLDlXrvxBZo7Zco fM JJ/3cgjQHJxMVBNA1 04OIATQH/b1qx cd1U 2h0P9Xm7b1AFHumzPQKlt2rfRAzJt95TenzIturZPbdlqTF9auICPrd3rqB3b3umzPqRbSve/vqmbkDpAf/nyoSE4aeuTAhQgdAmyGCSCiK2cfr17IqctaNWWPvckKGVn/ds6ur6NX2S6NK6dKwsXGZK2vSywVjflw8rnvT7IoE0mIgUotpeuXAsP/ rNAaBP7/5IbCYzaJMxp0EnBV2b2Lvw0Wa8adG9bWFhITS9YoBie/zkuXDHI9vDwsKNCtJfv3VsCE4aZNCm40ybnrIlf5zUNvb71u4bZNu2tvOg3wrQ1IT86jeHq8z5/eUvjoApwSwDmpqXIm e/FJz1Qmgf7lsW/ivPR FL85dqjIIMMauVBBFvviFnNU57ATQWZ2ccl 3/sEpgLZ4By/ALj2wBdACaOsvdkv5oBZAC6AF0KV84spYS78NT3LOSwYtGbRk0Ek YcX3bGVMv54lg5YMOj8Z9OrXp5I/O/ZPRmnPdubran07y6CCM/Wz464CLn7mC xWgJ7//a7omdDYIRIvK2DNF1hdrfcAUA4r1zn10LVpp3zr/KbOW3K4OKU7abnOgk5inM2bNw/OlDLOgw8 OHSfqbE1P5S5uFL2OZtUX p0Fmdd bUAdrFzr9h1fTprCNA6SNsA6XVjk6FFo1Q/B4JVX qyySI30fFxr169enAQWn08iBbScfzKF2XKPiW3tr4OaF5GG7kA9f0AyyV5yof6m5ZDgHI0Lgeph 65NOxYQi8TixfpuhazJYjbR8bHH7lOZUbrj JUtZco Jbe2vh6DSwCmAPU2vu3HaNoeATQHqQWy6QApPb9AMT3pMMl26 c3SMi4BHhKVzrSt1nL2iBHBxmx2D6NLR UyvQxPXsv6rcy1fGr3QOfyrTUbZy0c3Hhz rgl/iQ6WoaL748XBzEBswVz74fzaBs6zZ7xnzontuWUUBTkHpAY2c czIbHAujhUcuQPxEa2FYPCZZpfVFHV9eFzn AJq6Xilki40A1/jykfMnndy4GgNde5 Sy9YCqjixsfNg63Vx4UP3xBjWVmMq/tRcekD1Q78UoOq39 Z92L429SigqW0 BqhOzNeVgGsD0yJYGXVNqGCirYvJl53NMCld60/jWP8eHNunMVUKHungLzeuxlO8atuS8S2gAgcdC5rGzI2HDjZ2XvAjW o5exuXhYvMSIakPwZoTIau9WF9t62PAJqCE8dtAeVnx1x8PKD4swukwDWhTKYHSDqUynjo5XTlT 7Zqx2xyfd6edsyH9GwZu08PrsaWXQrQ1JxgT5 2cvmxfpvGa Gi7i8ypvxbgCWjtD6svG19CNAcnDjuGlC2GCbQBm0nlLrdrqwedSBVxkjpWn/Y2DZ1Fg25YlEWy/mTjfzlYoz5lp1i9238 zibxIUOgFpI7T1qnLp4U3DFsmVse2eclA/62lxDgNYZpgDdtm1b8Jff8mMZlPEEBhPJZSdXC2X7vL5ijunSh60W17etL8a1uil/0lOcKT3FpdKOxTi01ae45Nv3N4nL6pBJlWnls028KbhigKZ0U3J7z03qA0CbKKcA9TDG2ilAm4w 77zoWvqWYiy7g6sIH99oKUD85QMenLnuiUwBtt7Vprsm0yoaSTboELq4 /M6/E0BjGdPLCqDtAOW1hMy51Nlz0vC39b9oQAGv6dU2uKLfDupZnK9FATqLE1LuqV8PRQG05R97FIC XFuACaAF06I 7 vYAFkALoAXQvj2VJZ6l3aYXM98lg5YMWjLoYp6gYjs92W4Sa1UyaMmgJYNO4skqPucjs46dQQ8f Phw2bNgQli1bNnIhp79ANB8QTXKdxwIUKJ9//vlw7NjoP5bA38Ej37p1awXuJIMvvmf/AWgN6PXr1yvwNm7cmAWUfkCug8geiuBgRJOTO5M4QDEJn/6sqD2gzLykxtSc2HOssXlM2cd0p1XWGlBudNWqVeHtt98O69atG9negRL53r17w5o1a7KAagEpN YE6WKt2rPQLA9QcS8PWQxCzj8m8T6uT67N6tq4DyhYy4rTxjePXjpGyT8mt7bTUxwJ07dq14eTJ k/5E3VD76NGj1TtqbiIEVk4n1jeJBcj5zPXF4kMWuzdlRtmM41e2lCn7lNzaTkt9LEA3bdoUADD3e ffdd8OWLVsGmdFPiF8s309bOkw4Cy4duwBWB7n9KQU/PEPm5fiSXNlbOpIr06lNqexux7RxKT71q21L9OvGRJ/x8ENd/pDZ8awOcuJDpqtpvDa vtXHApQvQACoz6nzZ8N/vvlK N zpyUKb7zxRtixY8cAKn/jLJKdbIDQxGph6FddWzh /MIISi0kpdW3YwOtFs7K8UkfMmKjrX47HrJUXNJnfHtvksvWAqoxbezo2TFT40kHH5oDb6sx8U89 NS/09fEaC9BXX301vPbaaxWMF765FB5 4cnw3Dt7w0 2rg9nL16o5Lt27aogTd20FsT3a9IFCW1dWkyvY31oseRfmRAdyay 6vIZa9u XFyyzY0DbBZQdGWn2GlrzNx46GBj79HaUs/Za9w l2MBum/fvio7QuJjv9kSfnv4Zjbd9/GHYeVLm8PCjRvV9n7gwIHB5McmwS6W u3CpLKQ1aEuW0q7yLSVmVmoHDjyKV 2bev4ScUlW8rYvfnxrV9sbOzqy42HDuP4HUG2 MzZ23j7Wh8L0EOHDoVnnnmmypQHP/0k/MPGfx9c7574fSV/8sknq/fU3I2z3TCZVsdOLnW7dUkvpSMAbFbCBkiVZVhQ1eWP0vr0bfpYaOmn4lI/pe7NxoKdHdu28U9b r6emwcAtZBi2zZeG3uf6mMBeuLEibB /foKxNR/nnjiifD5558PFjV101pIJpXLTrQWzffR1kJSqp9SC P92vFj tYnurZNTLQVWyouOwZ1H4OHTD4puWw/bd1jajyrw4PHxbjjxuvj70N7LEC//PLL8Pjjj6fYrOSPPvpouHDhQi2gfZiEPsZg4etjfEsV01iAXr16NSxfvjzs378/fPbZZ HKlSsVlJS0kTf5W6SluslpG4dMqmw4bbF3He9YgBIEANZdXQc76/7s64q291m/57r7GxvQ48ePV/9HEf5WaeXKlRWsK1asCLT5P43QXzd46e/nnz32aV3GBrRPN1FimV3Qb N0UrnKHPSVgQJoeUB7naAKoAXQAmhft48SV/9fbUoGLRm0ZNCSqfqfqfq6RiWDlgxaMmhfn84SV/8ze8mgJYPOTgZt r/6TumVjNX/jNW3NRpkUP4Rr7rgAG/cD7Yx//wAj0O89N1zzz1RHY6e2Uv6MX9dyxh39 7d0bjGGatrf PEME02Q4DWQWoBfe/jL8I/rt1bXdTrPilAOVoGpBZUP4F UTmKloLZ2no729e03oUPO1bX/qzvWawPAQpkOUgtoH/zrzurf4eTf4uTet3HAwqYLJa/ F2On2i/qGQ0L/M2tJvoxOysrAsfk/Rnfc9ifQTQHKQW0B/9dNcAUOr6 H/UizYfD6gmU0CSEVNbaQwSsihZFz/4QIdLmVVtKxPYyLBXDLTtA2NfIXJ9sXHxmbOhT/fZdCdQnPNYRgEFqFgmtYC feRklTnJntTrPnWACtTYIthFVb8FVDJKq2vr9GEjOADSwqzxgR47 aSuPgEuH9KJjSubmD/s6ScG66PUR79ERgGNwcnkCdA/nL4Q7luzO5w5fzmcPnepeg/99MzXFaNNMygLxOL7K7Zo6HgoLKA2 6GrzGrtBIodTxBZvRhsdmwLVpNxY/7wYbN0AXMUTM3JCKApODEQoMDJu d/7DwY1r/8QVXnC1PuE8ugLDDgcOUWzAMk2IgJeOjXDVlwrR029EnPllYPuW3bOn0CtOm4MX/Eoext4yj1UVCHAM3ByeQJ0O8vf3Hw/gmo9otS0wyKP713AicApRbIQiIwlGmxUyYUuPKFner4pi07O5b1Lz1lTfr08Mg/fdRz48o 5o8 7r1AOgqkXRfqQ4D6Tt8WoDv2f1K9f1o4X/nvE7kEmvyS5MeItYHEXhY69MlI9AOMzaAAgFwgCDD5kpx2Dij5Qc8Cnhq3zp/Gwp4rds9FdhPeAaBNJkSAZklMdMa2 CZjFp36LDPLc9QaUEAb95rliSz3NpkHqRWgZREmswhlXtPzWgAtp5l6/Q5cAC2AFkDLFpbewsrc5OemZNCSQUsGLVkinyXK/KTnp2TQkkFLBi0ZIp0hytzk56Zk0JJBSwYtWSKfJcr8pOenkwzKCSbnPnzp29fhoLCGkQ jo3rQH98sCGcGrvI4MjIZcvXx76u3l13Fi4Vumh39ebL3H1H9jWgAKnAN2 ffsQnDpEwr8lz0e6BYT g9DXNRoAWndYWTcg6ABQQMZKMqt0ZZsqOcepw78pHS/nXCbnLhdzntKf2/RjLKb9rbu3Bq5Nu49VO8h3fryraiO7b 2 wa5CXbp/9dPXKrmVLSaGWbAdArQJpIJOW3mulG5uoji8q4O7Osib01cfNv7gsvqalpMG1MYhKFc8 34FpPosxLZOP23pzWs5BCiw1UEq6HJgLlw4V3VLNze5/JzCXjld29cFXF34sDHZeg4u9ZFdv33/9gGEZFkAlh/pqT2P5QigdZAKuhSgnzz89 Gjv/tuY0DJhGROsqHfrj1AalPq0s827M85AF66LCqvD14fOTK9KlDXb4/oIybZ2LhyNhagFFxkUkCULoDqNcDb LZs5qmMApqDNAfo6S3rwqE7/yh89vOb3/Klm5pQD6XftoHBbvu2bev4x1a/F/KA2vGtHXW9 wpIjYc/1fGrB8Ha6KGw/lX3cPF iczCiS5wIuey2ZM 70O 56mMAprb5gUdEJ/c LMAlHy OX4kHPrBH4ejD9xZtfmPdFMTyqLbrEVdIGBjYfJt2 dB97o2S2KHvtehDazoCjx0dQlkO27MBzKuFFx6BwVM6n6L17tqzofGmIdyBNAcnEyIoAPAo//0wypjnn1lS/jwb/80fPijPwkLly82BlSL70tNfA4G25cDVJlRPm2Wtj7ot4CiJxtbehvflm4KUPr1rklW1Td35MD5v WW/HYyb86FxZr0cArQOTibDAhquXQtH7v6zClKy5 WjhwZw1mVQMpWykp1kQYLMbtvKgtp2PRi0lRmtLjKNo8woPWyUwdVn/ePHxkY9Nq5srK6Fy27d2tIpAdJnUAus9WF9z1N9CNAmNz4EaAiBb xkzjMvbh6Csw5QC6Id14Ir0ICCrd/CYevY53QBHX3G9BlUfum3QApY5Fx69aBugfRt3YuFS9s6Mi4LLBlTcv9 an3I77yVA0Cb3rgHtKLy2rUROOsAbTreOHoABDjj2HZl0wVcXfjo6n5ulZ xARWoTcqlvjmynbb1pR5b4ykrspVL1rRk65d9U5tZ1ZsZQLWNkzlvdfacVVhuxX21BvTsexsHX5 SaZE/0b8WNlTFn44BKa0DLws/Gwk/LOhZAy08 er3DFUALoAXQadlOSpz9e335f5EQ9eukKwugAAAAAElFTkSuQmCC
27540http://www.vbaexpress.com/forum/image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKgAAACQCAYAAACcYiB0AAAV7UlEQVR4Ae2d789V VXbH/VPm/bxr38yLNpkXNpM0TWMycaZNnaZpYlKNJo1N5oWOKZGAbYdgHUMmDA0jU0CrEnFAAZ0xgBoNaB0U QemAwlQtICIgID8edvM55Huz7rp773POfc59OPfefZPj3nvttdZeZ /PWftc2Fduu3HjRihXmYO MnBbXwMrcZWHBgYKoGUH6fUOWgAtgBZAy3ZdtutxGZhIBr14fE84tfeRkWvcIIvd/ALeOaCCk9J ALaANr gjbv2A0CXr/yXVgAJxFimTMl8kLfffnuw1549e1rF4P3VtfHPeJMepy6O0t/8QR0CtA2kKQhzcr8wFpbHHnss3HHHHWMDan35cUq7ORB9m6shQNmSm0KaAzHV52/eQ XbXj/XXoxtzm/pu7VwjwDaFFL7fpmqe1D9YnuobFvbMTIuMqzs77rrrsGrAXLpUN57772VnrW3mRkdbfHyK/uHHnpoMMZTTz018Ivc2tnxNR6xjetP91XK0YchCmgK0jP7fjbyzdxDSBs9Pr7PL4BddCBg4aUDV IJSsFEis1BI3/pChr1AtDZWj7rGFJDyZ8f3gEqHsmt/1nepm79JYmvXJ7XNXz37cbjwPy OgGdBPH9ke0CvKaAsMJfNch4WFgqQAE2w2mznQZG9fFMKROoC19atD xtPLaPOnFY3 h7Hduu84duueJzMJJBU3AygadfXxmunvtD OqDp6OQnj2wIVw9dyKcfuMm7BZc6n4RPCDqF2BqUwpQyZTVYnDEgJCdHdPW6Vc7Zq8 PSDyB8ixGJr6k59SNgA0BycTCGRfvLkqXDv/afjq/U1DkJ793S8rOOlHr2kGVTbzCwQQZCrkgsLrAqkyKfoCBRtrb30LNOlYn75P/pQx0UWmbEzdjmvtvX rZ/3Z2Ep9FNKhDFo3QcqIZMgrZ46Ey//3u3Dug2eq8ptTB6vMKZ3FAiooWdjY4kqumHkvRab3U8EjPclpC0pbx49tCyJk8i07siZyQG2SQf Gd86d7KGUG0CaTI/hUnv/ohXD583fCuUPPDmVT pv4mxYdPSxdxdu1v67i6qOfQQZtEpzAbFI28TctOmRQbetdxNy1vy5i6quPAmjiG7S2cbZyrsUu YNf FhvPtNi3AnRabqrEOfouN61zUgBNZNBpXdBZi7sAWgBd9OvLJB KAmgBtAA6ySes J6d983YWpYMWjJoyaCxJ6PIZjvzdbW JYOWDFoyaFdPU/Ezf1m3ZNCSQecng167eDp88dbqkYMjs3Z4pGTypcvknWVQ4Dz95upw8cTr1VlQ 58C6NIt6Kw9PANA6w4rc MXjr4czY7jnm7SQQyVnJm81ROsc5sc7mgay7fu3hq4Nu/5uLL5zo93VW1kf73q9UpGKT1b3v L/QN50/HmSW8I0DpIm4CY0olNKmDqEHCsPyYbxwY/OljMUTeumG rl qPyQFOciAFOrXpE7iSUQKs4KVtfVi9ea8PAcq2nIM0Bt9iJnAc2MaxaRPjOP5zcJFNVz53cACsY vE2vi29eS9HAM1BmgL0gQceCLHr vWFsOq5d8Jf/POvw7a3jo0sUgoG5NpqqdvfHdHm0qFf 1qAXL8jsr8dQm4ztW3LF6W9lGV1 p2 1Lafg4s n0HJsDZ7AmHOxzxDGgU0BWkOUPulSPXzl66E 9bsDn/ 8AvhzhUvRQG1UAgiZDrBrt8WaZHokx5wCiTqACSYKQWvtcGPbVOXje jjc/YeIqHMgXX95a9OgIi tf/sItCkfdpx5rEcBTW3zbQBds 1AWPn0/vDV1zch/bdn34kCqsW3k28BQm7bto6tshqg2qwJ4PJtbXL fJ8eDux16cGx8cbgYmv3WRIbtnv6rD31mA vM4/tEUBTcDI5TQFd 9L7VdYkcwIpmZTt3k wB0f9Xm7bto6 QBSotC2o6Hgb27Z1r4sf VVssdLDlXrvxBZo7Zco fM JJ/3cgjQHJxMVBNA1 04OIATQH/b1qx cd1U 2h0P9Xm7b1AFHumzPQKlt2rfRAzJt95TenzIturZPbdlqTF9auICPrd3rqB3b3umzPqRbSve/vqmbkDpAf/nyoSE4aeuTAhQgdAmyGCSCiK2cfr17IqctaNWWPvckKGVn/ds6ur6NX2S6NK6dKwsXGZK2vSywVjflw8rnvT7IoE0mIgUotpeuXAsP/ rNAaBP7/5IbCYzaJMxp0EnBV2b2Lvw0Wa8adG9bWFhITS9YoBie/zkuXDHI9vDwsKNCtJfv3VsCE4aZNCm40ybnrIlf5zUNvb71u4bZNu2tvOg3wrQ1IT86jeHq8z5/eUvjoApwSwDmpqXIm e/FJz1Qmgf7lsW/ivPR FL85dqjIIMMauVBBFvviFnNU57ATQWZ2ccl 3/sEpgLZ4By/ALj2wBdACaOsvdkv5oBZAC6AF0KV84spYS78NT3LOSwYtGbRk0Ek YcX3bGVMv54lg5YMOj8Z9OrXp5I/O/ZPRmnPdubran07y6CCM/Wz464CLn7mC xWgJ7//a7omdDYIRIvK2DNF1hdrfcAUA4r1zn10LVpp3zr/KbOW3K4OKU7abnOgk5inM2bNw/OlDLOgw8 OHSfqbE1P5S5uFL2OZtUX p0Fmdd bUAdrFzr9h1fTprCNA6SNsA6XVjk6FFo1Q/B4JVX qyySI30fFxr169enAQWn08iBbScfzKF2XKPiW3tr4OaF5GG7kA9f0AyyV5yof6m5ZDgHI0Lgeph 65NOxYQi8TixfpuhazJYjbR8bHH7lOZUbrj JUtZco Jbe2vh6DSwCmAPU2vu3HaNoeATQHqQWy6QApPb9AMT3pMMl26 c3SMi4BHhKVzrSt1nL2iBHBxmx2D6NLR UyvQxPXsv6rcy1fGr3QOfyrTUbZy0c3Hhz rgl/iQ6WoaL748XBzEBswVz74fzaBs6zZ7xnzontuWUUBTkHpAY2c czIbHAujhUcuQPxEa2FYPCZZpfVFHV9eFzn AJq6Xilki40A1/jykfMnndy4GgNde5 Sy9YCqjixsfNg63Vx4UP3xBjWVmMq/tRcekD1Q78UoOq39 Z92L429SigqW0 BqhOzNeVgGsD0yJYGXVNqGCirYvJl53NMCld60/jWP8eHNunMVUKHungLzeuxlO8atuS8S2gAgcdC5rGzI2HDjZ2XvAjW o5exuXhYvMSIakPwZoTIau9WF9t62PAJqCE8dtAeVnx1x8PKD4swukwDWhTKYHSDqUynjo5XTlT 7Zqx2xyfd6edsyH9GwZu08PrsaWXQrQ1JxgT5 2cvmxfpvGa Gi7i8ypvxbgCWjtD6svG19CNAcnDjuGlC2GCbQBm0nlLrdrqwedSBVxkjpWn/Y2DZ1Fg25YlEWy/mTjfzlYoz5lp1i9238 zibxIUOgFpI7T1qnLp4U3DFsmVse2eclA/62lxDgNYZpgDdtm1b8Jff8mMZlPEEBhPJZSdXC2X7vL5ijunSh60W17etL8a1uil/0lOcKT3FpdKOxTi01ae45Nv3N4nL6pBJlWnls028KbhigKZ0U3J7z03qA0CbKKcA9TDG2ilAm4w 77zoWvqWYiy7g6sIH99oKUD85QMenLnuiUwBtt7Vprsm0yoaSTboELq4 /M6/E0BjGdPLCqDtAOW1hMy51Nlz0vC39b9oQAGv6dU2uKLfDupZnK9FATqLE1LuqV8PRQG05R97FIC XFuACaAF06I 7 vYAFkALoAXQvj2VJZ6l3aYXM98lg5YMWjLoYp6gYjs92W4Sa1UyaMmgJYNO4skqPucjs46dQQ8f Phw2bNgQli1bNnIhp79ANB8QTXKdxwIUKJ9//vlw7NjoP5bA38Ej37p1awXuJIMvvmf/AWgN6PXr1yvwNm7cmAWUfkCug8geiuBgRJOTO5M4QDEJn/6sqD2gzLykxtSc2HOssXlM2cd0p1XWGlBudNWqVeHtt98O69atG9negRL53r17w5o1a7KAagEpN YE6WKt2rPQLA9QcS8PWQxCzj8m8T6uT67N6tq4DyhYy4rTxjePXjpGyT8mt7bTUxwJ07dq14eTJ k/5E3VD76NGj1TtqbiIEVk4n1jeJBcj5zPXF4kMWuzdlRtmM41e2lCn7lNzaTkt9LEA3bdoUADD3e ffdd8OWLVsGmdFPiF8s309bOkw4Cy4duwBWB7n9KQU/PEPm5fiSXNlbOpIr06lNqexux7RxKT71q21L9OvGRJ/x8ENd/pDZ8awOcuJDpqtpvDa vtXHApQvQACoz6nzZ8N/vvlK N zpyUKb7zxRtixY8cAKn/jLJKdbIDQxGph6FddWzh /MIISi0kpdW3YwOtFs7K8UkfMmKjrX47HrJUXNJnfHtvksvWAqoxbezo2TFT40kHH5oDb6sx8U89 NS/09fEaC9BXX301vPbaaxWMF765FB5 4cnw3Dt7w0 2rg9nL16o5Lt27aogTd20FsT3a9IFCW1dWkyvY31oseRfmRAdyay 6vIZa9u XFyyzY0DbBZQdGWn2GlrzNx46GBj79HaUs/Za9w l2MBum/fvio7QuJjv9kSfnv4Zjbd9/GHYeVLm8PCjRvV9n7gwIHB5McmwS6W u3CpLKQ1aEuW0q7yLSVmVmoHDjyKV 2bev4ScUlW8rYvfnxrV9sbOzqy42HDuP4HUG2 MzZ23j7Wh8L0EOHDoVnnnmmypQHP/0k/MPGfx9c7574fSV/8sknq/fU3I2z3TCZVsdOLnW7dUkvpSMAbFbCBkiVZVhQ1eWP0vr0bfpYaOmn4lI/pe7NxoKdHdu28U9b r6emwcAtZBi2zZeG3uf6mMBeuLEibB /foKxNR/nnjiifD5558PFjV101pIJpXLTrQWzffR1kJSqp9SC P92vFj tYnurZNTLQVWyouOwZ1H4OHTD4puWw/bd1jajyrw4PHxbjjxuvj70N7LEC//PLL8Pjjj6fYrOSPPvpouHDhQi2gfZiEPsZg4etjfEsV01iAXr16NSxfvjzs378/fPbZZ HKlSsVlJS0kTf5W6SluslpG4dMqmw4bbF3He9YgBIEANZdXQc76/7s64q291m/57r7GxvQ48ePV/9HEf5WaeXKlRWsK1asCLT5P43QXzd46e/nnz32aV3GBrRPN1FimV3Qb N0UrnKHPSVgQJoeUB7naAKoAXQAmhft48SV/9fbUoGLRm0ZNCSqfqfqfq6RiWDlgxaMmhfn84SV/8ze8mgJYPOTgZt r/6TumVjNX/jNW3NRpkUP4Rr7rgAG/cD7Yx//wAj0O89N1zzz1RHY6e2Uv6MX9dyxh39 7d0bjGGatrf PEME02Q4DWQWoBfe/jL8I/rt1bXdTrPilAOVoGpBZUP4F UTmKloLZ2no729e03oUPO1bX/qzvWawPAQpkOUgtoH/zrzurf4eTf4uTet3HAwqYLJa/ F2On2i/qGQ0L/M2tJvoxOysrAsfk/Rnfc9ifQTQHKQW0B/9dNcAUOr6 H/UizYfD6gmU0CSEVNbaQwSsihZFz/4QIdLmVVtKxPYyLBXDLTtA2NfIXJ9sXHxmbOhT/fZdCdQnPNYRgEFqFgmtYC feRklTnJntTrPnWACtTYIthFVb8FVDJKq2vr9GEjOADSwqzxgR47 aSuPgEuH9KJjSubmD/s6ScG66PUR79ERgGNwcnkCdA/nL4Q7luzO5w5fzmcPnepeg/99MzXFaNNMygLxOL7K7Zo6HgoLKA2 6GrzGrtBIodTxBZvRhsdmwLVpNxY/7wYbN0AXMUTM3JCKApODEQoMDJu d/7DwY1r/8QVXnC1PuE8ugLDDgcOUWzAMk2IgJeOjXDVlwrR029EnPllYPuW3bOn0CtOm4MX/Eoext4yj1UVCHAM3ByeQJ0O8vf3Hw/gmo9otS0wyKP713AicApRbIQiIwlGmxUyYUuPKFner4pi07O5b1Lz1lTfr08Mg/fdRz48o 5o8 7r1AOgqkXRfqQ4D6Tt8WoDv2f1K9f1o4X/nvE7kEmvyS5MeItYHEXhY69MlI9AOMzaAAgFwgCDD5kpx2Dij5Qc8Cnhq3zp/Gwp4rds9FdhPeAaBNJkSAZklMdMa2 CZjFp36LDPLc9QaUEAb95rliSz3NpkHqRWgZREmswhlXtPzWgAtp5l6/Q5cAC2AFkDLFpbewsrc5OemZNCSQUsGLVkinyXK/KTnp2TQkkFLBi0ZIp0hytzk56Zk0JJBSwYtWSKfJcr8pOenkwzKCSbnPnzp29fhoLCGkQ jo3rQH98sCGcGrvI4MjIZcvXx76u3l13Fi4Vumh39ebL3H1H9jWgAKnAN2 ffsQnDpEwr8lz0e6BYT g9DXNRoAWndYWTcg6ABQQMZKMqt0ZZsqOcepw78pHS/nXCbnLhdzntKf2/RjLKb9rbu3Bq5Nu49VO8h3fryraiO7b 2 wa5CXbp/9dPXKrmVLSaGWbAdArQJpIJOW3mulG5uoji8q4O7Osib01cfNv7gsvqalpMG1MYhKFc8 34FpPosxLZOP23pzWs5BCiw1UEq6HJgLlw4V3VLNze5/JzCXjld29cFXF34sDHZeg4u9ZFdv33/9gGEZFkAlh/pqT2P5QigdZAKuhSgnzz89 Gjv/tuY0DJhGROsqHfrj1AalPq0s827M85AF66LCqvD14fOTK9KlDXb4/oIybZ2LhyNhagFFxkUkCULoDqNcDb LZs5qmMApqDNAfo6S3rwqE7/yh89vOb3/Klm5pQD6XftoHBbvu2bev4x1a/F/KA2vGtHXW9 wpIjYc/1fGrB8Ha6KGw/lX3cPF iczCiS5wIuey2ZM 70O 56mMAprb5gUdEJ/c LMAlHy OX4kHPrBH4ejD9xZtfmPdFMTyqLbrEVdIGBjYfJt2 dB97o2S2KHvtehDazoCjx0dQlkO27MBzKuFFx6BwVM6n6L17tqzofGmIdyBNAcnEyIoAPAo//0wypjnn1lS/jwb/80fPijPwkLly82BlSL70tNfA4G25cDVJlRPm2Wtj7ot4CiJxtbehvflm4KUPr1rklW1Td35MD5v WW/HYyb86FxZr0cArQOTibDAhquXQtH7v6zClKy5 WjhwZw1mVQMpWykp1kQYLMbtvKgtp2PRi0lRmtLjKNo8woPWyUwdVn/ePHxkY9Nq5srK6Fy27d2tIpAdJnUAus9WF9z1N9CNAmNz4EaAiBb xkzjMvbh6Csw5QC6Id14Ir0ICCrd/CYevY53QBHX3G9BlUfum3QApY5Fx69aBugfRt3YuFS9s6Mi4LLBlTcv9 an3I77yVA0Cb3rgHtKLy2rUROOsAbTreOHoABDjj2HZl0wVcXfjo6n5ulZ xARWoTcqlvjmynbb1pR5b4ykrspVL1rRk65d9U5tZ1ZsZQLWNkzlvdfacVVhuxX21BvTsexsHX5 SaZE/0b8WNlTFn44BKa0DLws/Gwk/LOhZAy08 er3DFUALoAXQadlOSpz9e335f5EQ9eukKwugAAAAAElFTkSuQmCC

That's my problem

somwhere here?:
ns.GetDefaultFolder(olFolderInbox)

gmayor
12-04-2020, 09:31 PM
Change
Set folder1 = ns.GetDefaultFolder(olFolderInbox).Parent.folders.Item("Datenbank")
to
Set folder1 = ns.GetDefaultFolder(olFolderInbox).Parent.folders.Item("# Datenbank")