thisfile

Hi, i have saved almost 500 mail copies in a folder. the task is to open all the mail copies and save them as pdf. the below code loops through the folder. however, i need help so that i can save each mail item as pdf. help would be highly appreciated Sub bla_OK() Dim objOL As Object Dim Msg...

I am working on a process to import a folder of .msg files into excel. Each file contains a single serial number (only thing in the body) that needs to be placed on a new row. The macro below seems to work for all parts of the message except for .Body. Goal: Loop through folder, copy body of...

Hello. I am trying to create a macro that every time I close the file the macro makes a copy of that file. So far I have this but it still does not work well. Someone can help me? Thank you, Isabel Sub auto_close() If ThisWorkbook.Path = "\\Servidor\servidor\ORÇAMENTOS\orç - A Fazer"...

Hi, I'm getting an error when calling a SaveAs sub at the end of another macro. The save as is not executing, but I've had success using a similar code before. Is there anything obvious wrong with how the code is written? I've made sure that the network files path names are correct in the code...

Hello, I am a basic excel user who is just learning to do a few simple things in VBA and only through information I have found in searches (like adding auto-complete to a dropdown list). My company just moved their server and now a form a previous employee wrote is not functioning properly. I...

I saw another thread here about saving excel spreadsheets as PDFs and tried to modify the code (with my woefully lacking VBA skills) into an existing code I received help with here before and I'm having trouble getting the macro to do anything. I previously received help to get my excel...

Hi , I'm having trouble creating a check box to "save as" for one of my excel projects. I want the VBA to generate the name of the file based on some cells within a sheet of the workbook. Also,some of the save path on my network can be determined by data within some cells on the same sheet. I've...

Heya, Does anyone know how to change instead of prompting to save the file as to just save it without prompt to a location that is set in "ThisFile"? Code I have now: FileName = Application.GetSaveAsFilename(InitialFileName:=ThisFile, filefilter:="XML (*.xml),*.xml") Code for ThisFile...