Recent content by framednlv

I really would like to do this, so perhaps one step at a time. How can I add a second column to the listbox, current code for the list box (thank you Diane): Private Sub UserForm_Initialize() Dim fn As String, ff As Integer, txt As String fn = "H:\Software\OutlookVBA\project_list.txt" '<...

Ok, I hacked pieces and part and came up with this: Sub SentSave() Dim objOL As Object 'As Outlook.Application Dim objFolder As Object 'As Outlook.Folder 'get current folder Set objOL = CreateObject("Outlook.Application") Set objFolder = objOL.ActiveExplorer.CurrentFolder Set...

I have a listbox using the code form Outlook VBA: Use a Text File to Populate a ListBox . It populates the listbox with job numbers for saving emails to the server. I would like to add a text box to enter a keyword to filter the listbox. The only examples I can find are for excel, such as...

This is what I have so far: Sub ChangeCurrentFolder() Dim myolApp As Outlook.Application Dim myNamespace As Outlook.NameSpace Set myolApp = CreateObject("Outlook.Application") Set myNamespace = myolApp.GetNamespace("MAPI") Set myolApp.ActiveExplorer.CurrentFolder =...

How can I save the current folder, change to sent items folder, do some stuff (from userform) and then change back to the original folder when done? Thanks, Chris

I could use some help with creating a routine that writes a new sub routine to a module. What I looking at doing is use the browse folders to get a file path and set the sub routine name. Here is an example of what I need to create: Public Sub 16001 My_Job_example() 'sub is from mypath below...