sname

Hey community, I use following formula, to fill blank cells with value above. I wanna know how can i start this code from 5th row and end in 1000 row? in second column? Sub FillBlanksValueAbove()Dim sName As String sName = ActiveSheet.Name Dim ws As Worksheet Dim lastRow As Long, lastCol As...

Hello! I am just new to this site and new to VBA. I have two listboxes (Months and Product Names). I set these to 1-fmMultiSelectMulti. What I wanted is that every time I click OK button new sheets will be added with names as in the listbox(Months) and the selected items from listbox(Product...

Hi I have part of a macro shown below that moves files into a new subfolder that ive created in a folder called backup. It saves the workbook as NEWSUMMARY1.XLS no problem but im then trying to break the links after the file moved. Any Ideas? Sub PERIODEND() Dim sName As Variant...

Hi I have the following macro and keep getting a compile error. Any Ideas? Sub test() Dim sName As Variant, bFolder As String, dest As String sName = InputBox("Subfolder name") If sName = "" Then Exit Sub bFolder = "X:\backup" If Dir(bFolder & "" & sName...

Hi, I'm looking for some help, I want to ultimately create an area where I can drag emails into a window within a user form, and then they get automatically copied to a specified directory. I have been trying for days and searched the web but fail every time. I have the following using...

I am not very savvy with the coding. I found one and lightly modified it to save attachments using the subject name for me. I need assistance on getting it to save the attachments as only part of the subject name. Subject name, "[EXTERNAL] APLORD:214 File for admission 0220X0119AO002198" Needed...

Hi Guys, At wok ad we just upgraded to Office 365, the code below worked great before upgrade, but now I get a compile error to find the project or library on the word "Format" on the "sname" line. It basically formats the date (A4) in a cell copies it and merges it with AM or PM from B4 2 on...

So i have these 2 macros codes that work separately (if i delete one and keep the other): This one is to save incoming messages automatically as they come in. Option Explicit Private WithEvents Items As Outlook.Items Private Sub Application_Startup() Dim Ns As Outlook.NameSpace Set Ns =...

I'm trying to assign a VBA script in MS Outlook so that I can get all emails saved in a newly created folder (named by date, files also named by date). I create a folder and assign name to it: strNewFolderName = Format(dtDate , "yyyymmdd", vbUseSystemDayOfWeek, _ vbUseSystem) sName =...

So this is the code that I am using. Sub SaveCount() Dim sName As String Dim i As Integer i = ActiveWorkbook.Worksheets.Count sName = Application.InputBox("Enter a name for the new sheet", "Add sheet") If sName = "" Then Exit Sub Worksheets(2).Copy after:=Worksheets(i) ActiveSheet.Name =...

Hello, I have this VBA in outlook which is exporting email to PDF format, but there is an issue. If there is image or table in the letter, it does not fit into the PDF page. Maybe someone has an idea how it could be fit? Maybe there is an option to set boundaries? or at least maybe it is...

I'm trying to save a sheet in the spreadsheet as a PDF, when it's ran I get the grant permission dialog box as well as the dialog to set the location and specify the file name. The file names are pre-set based on the FN value passed. Example: FN = test.pdf I want to completely bypass the both...

Hi everyone, I have a working macro for import of csv files where they are presented on different worksheets. In the macro the directory where the csv files are is hardcoded ("fs.GetFolder="). This is the working code: Dim fs As New FileSystemObject Dim fo As Folder Dim fi As File Dim WB As...

Hi everyone, As part of a bigger macro I want to create sheetnames based on imported filenames. I use this code: Dim fs As New FileSystemObject Dim fo As Folder Dim fi As File Dim WB As Workbook Dim ws As Worksheet Dim sname As String Sub loadall() Set WB = ThisWorkbook Set fo =...

Hi all, been struggling with this one and could use some help. Im trying to pull data from a closed workbook. I have a code that has worked for me in the past. All I have done is edit the path to accommodate for the new workbook, however I keep receiving an error. (1004 unable to set the...