excel vba - VBA code to reference my inbox in my archive - CLOSED -


i have code can used folder in primary inbox or inbox subfolder.

does know how reference archive folders or sent items? archive folder saved "my personal folders"

thank much

sub listallitems()      dim olf outlook.mapifolder, curruser string     dim emailitemcount integer, integer, emailcount integer     application.screenupdating = false       cells(1, 1).formula = "subject"     cells(1, 2).formula = "recieved"     cells(1, 3).formula = "attachments"     cells(1, 4).formula = "recipients"     cells(1, 5).formula = "sendername"     range("a1:f1").font         .bold = true         .size = 14     end     application.calculation = xlcalculationmanual     set olf = getobject("", _     "outlook.application").getnamespace("mapi").getdefaultfolder(olfolderinbox).folders("toastmasters")     emailitemcount = olf.items.count     = 0: emailcount = 0      ' read e-mail information     while < emailitemcount         = + 1         if mod 50 = 0 application.statusbar = "reading e-mail messages " & _         format(i / emailitemcount, "0%") & "..."         olf.items(i)             emailcount = emailcount + 1             cells(emailcount + 1, 1).formula = .subject             cells(emailcount + 1, 2).formula = format(.receivedtime, "dd.mm.yyyy hh:mm")             cells(emailcount + 1, 3).formula = .attachments.count             cells(emailcount + 1, 4).formula = not .unread             cells(emailcount + 1, 4).formula = .recipients.count             cells(emailcount + 1, 5).formula = .sendername          end     wend     application.calculation = xlcalculationautomatic     set olf = nothing     columns("a:f").autofit     range("a2").select     activewindow.freezepanes = true     activeworkbook.saved = true     application.statusbar = false end sub

2st. set reference of archive folders should set follows:

set olf = getobject("", "outlook.application").getnamespace("mapi").folders("my personal folders")

where, optionally, instead of 'name' of folder use index number (usually 2 , more if have more archives).

1st. i'm not sure mean 'sent items'. asking folder sent items:

set olf = getobject("", "outlook.application").getnamespace("mapi").getdefaultfolder(olfolderssentmail)

Comments

Post a Comment

Popular posts from this blog

asp.net mvc 3 - Using mvc3, I need to add a username/password to the sql connection string at runtime -

i see how build string using stringbuilders (sql/entity framework); do cause connection string used in dbcontext? example context: public class pophistorydbcontext : dbcontext { public dbset<pophistory> histories {get;set} } public class pophistoryrepository: ihistoryrepository { private pophistorydbcontext context = new pophistorydbcontext(); public iqueryable<pophistory> histories{ {return context.histories;} } } example usage in controller: public class historycontroller : controller { private ihistoryrepository repository = new pophistoryrepository(); var histories = h in repository.histories (h.modifytimestamp > today) select h; if (!string.isnullorempty(searchstring)) { histories = histories.where(h => h.dn.toupper().contains(searchstring.toupper())); } thank you
Read more

kineticjs - draw multiple lines and delete individual line -

i can draw multiple lines on canvas; added layer using drawscene dlayera1.add(line); line.getpoints()[0].x = mousepos.x; line.getpoints()[0].y = mousepos.y; line.getpoints()[1].x = mousepos.x; line.getpoints()[1].y = mousepos.y; moving = true; dlayera1.drawscene(); http://jsfiddle.net/user373721/xzead/1/ . is there way delete individual line? currently, you'll have modify points array this: line.getpoints()[0].splice(index, 1); since arrays modified reference, modifying returned array modifies "source of truth" points array attr
Read more

thumbnails - jQuery image rotate on hover -

any chance change image src on hover , count 10 , again first? this need, default thumb, flv-3.jpg ! <img src="/thumbs/e/b/d/6/d/ebd6d2d6d99e/ebd6d2d6d99e.flv-3.jpg" /> on mouse hover need change number flv-1.jpg flv-2.jpg flv-3.jpg flv-4.jpg etc.. up 10, , again , start number 1, when move mouse thumbs need default thumb flv-3.jpg this im use not solutions, var _thumbs = new array(); function changethumb(index, i, num_thumbs, path) { if (_thumbs[index]) { document.getelementbyid(index).src = path + + ".jpg"; preload = new image(); preload_image_id = (i + 1 > num_thumbs) ? 1 : + 1; preload.src = path + preload_image_id + ".jpg"; = % num_thumbs; i++; settimeout("changethumb('" + index + "'," + + ", " + num_thumbs + ", '" + path + "')", 800) } } function startthumbchange(index, nu
Read more