I have macros that creates several pdf files at specific folder.
The file names are as follows:
The files are always in pdf format
The location is always C:\Temp
The filenames are always the same
In another words the...
I'm working on VB file that determine specific content based on cell value, queue it, update in separate tabs copy&save those tabs into new workbook. Workbook name is define by cell and for every data individual. Everyting works for me perfectly correct, but new woorkbooks (even when they have...
I have been struggling to get a macro working all day and wanted to see if anyone had any advice. Basically, I have a macro that copies the active sheet and saves it as a .txt file. Right now, when the Save As prompt opens, it autofills the file name with a value from a specific...
Can someone help me with below requirement. I have a macro work book with data in the sheet "Source". this data has multiple columns and in the column "N"(which is last column which contains data) i have manager names along with blanks and "NA".
I want to filter each Manager and copy the...
I am currently managing an order form in Excel, where people download it and then they go in every day, fill out the details and submit the order through a macro. They will just need to download it once and then do this whenever they have an order.
However, is there any way in...
Hi All, not sure if this is even possible but I'm trying to save a file from another workbook and then ensure that nobody can update any links in it, etc. upon opening, and so I'd need to insert the below two lines of code under 'Workbook_Open' but I'm unsure how to this, so I'd greatly...
I have a problem with Save As dialog. I wrote a code that saves excel file with predefined name and path on Desktop, which works fine. When I change Path in code to One drive folder, Save As opens in that path but, name is not defined.
Dim Path As String
Dim filename As String
The code below returns an error -Run-time error '1004': Document not saved.
anyone know why?
(Error on line .ExportAsFixedFormat...)
Private Sub CommandButton1_Click()
If IsError(ActiveCell) Then
I would like to get some help in how to automatically assign the classification as internal document.
At my company we use some classification tool in excel called Secure Islands Classification, and whenever create new file it pop ups asking to set the classification, usually...
This thread is related and inspired on an old one: Force users to save as .xlsm or xltm only.
In any case, I tried to replicate the code for XLSM and PDF format only. No luck. Although the two options are available, the PDF one didn't produce any good file. I would like to...
I have the following code:
Sub VisibleSheets(Optional ByVal Control As IRibbonControl)
On Error Resume Next
Dim ws As Worksheet
Dim wbNew As Workbook
Dim WSHShell As Object
Dim DesktopPath As String
Dim VendorName As String
Dim StoreName As String
VendorName = Range("I2")
A project I'm working on has a button that is supposed to create a static, macro free copy of the workbook and save it to the folder which is located on OneDrive. This button will be used by multiple users, not just me. I have this coded and it works perfectly whenever I test it, but...
I am working on a macro that makes users click "Enable Content" mandatorily to access the workbook, works like a charm, except I have a macro which does a .SaveAs under a different name, and it automatically closes my original file, but doesn't initiate the "Workbook_BeforeClose" code I...
I want to disable both Save and Save As - I have VBA that saves the document specifically for the user and I don't want them to try and save it as their own file.
I have this:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If SaveAsUI = True Then...
I'm currently trying to copy certain worksheet in my workbook and then save it as new excel file in download folder.
Dim FName As String
Dim FPath As String
FPath = "C:"
FName = "ResultsLessThan" & Format(Date...
So currently my code has vbQuestion & vbYesNoCancel. I am trying to figure out if I can replace Yes No Cancel with my own options. Preferably (not necessarily) without editing code too much.
If Dir(FPath & "\" & FName & FExt) <> "" Then
wAns = MsgBox("The file already exists. Do You...
My file is saving the entire name when it converts to a PDF. I am simply trying to get the .xlsb part to drop off. Can anyone help me understand how to code the removal of the .xlsb from the Filename or Populate the save as name as one I choose?
I want to use this base code.
I have the Following button code that saves my workbook at a desired location (Save As) with a desired name without including the pages "Main" and template".
Right after I save the copy, I have another button that when clicked, it closes my "Master" workbook without any changes but keeps excel...
I am looking to create a loop to execute on a specific set of files inside a folder that contains 30+ files.
Dim wb As Workbook
strFileName = ThisWorkbook.FullName
Workbooks.Open Filename:= Folder & "File Name 1.xlsm"
Set wb = Application.ActiveWorkbook
So my code works differently in a the same file, but in a different file path
Dim FName As String
Dim FPath As String
On Error GoTo Handler:
FPath = Sheets("Setup").Range("A1").Text
FName = Sheets("Setup").Range("G1").Text...