Rename Worksheet With Opening The File

Dec 12, 2008

I have the following code, which I use to open up a .xls file generated from Crystal Reports:


Application.ScreenUpdating = False
Application.DisplayAlerts = False

Dim fexport1 As String ' variables for the exported file
Dim fexport2 As String
Dim wb1 As String 'variables to change between the opened workbooks
Dim wb2 As String
strTemp = "Please Choose The Exported File"
MsgBox strTemp
fexport1 = Application.GetOpenFilename("Excel Files (*.xls), *.xls)")
If InStr(fexport1, "False") = 0 Then
Workbooks.Open fexport1
wb1 = ActiveWorkbook.Name

Else
strTemp = "Operation Canceled"
End If

The problem is that Crystal Reports generates the file with an invalid worksheet name (it contains a backslash) and I do not have access to modify the Crystal Report. Althought the file can be automatically repaired by Excel when manually opened, the macro chokes and the "Application.DisplayAlerts = False" does not fix it. The only solution I can think of is renaming the worksheet without opening the file.

View 9 Replies


ADVERTISEMENT

Copying .xls File Numerous Times And Rename Each File From .xls Spread Sheet

Nov 24, 2009

I have an excel template that needs to be copied multiple times and each sheet needs be named according to a list in an excel spread sheet. I also have a formula in the template that needs the value copied instead of the formula.

I got this script from an site and tried it. It runs but I don't see any spread sheets.

strComputer = "."
Set objWMIService = GetObject ("winmgmts:\" & strComputer & "
ootcimv2")

View 9 Replies View Related

Opening A File Without Opening A Workbook

Apr 17, 2007

I have a need to open a file from my companies intranet. My current method was to open said file via the method that the recorder gave me. However, I would like ot be able to open a said file without having to start open another workbook.

This is the path:
[url]

So the command is this:
Workbooks.Open [url]

Links are not actual links

So what I need to know. Is how can I open this file without opening a workbook. I haven't been able to use the VB "Open Statement" to open a file and I don't believe that I've been successfull using the Filesystem object either.

View 9 Replies View Related

How To Set SAVE AS File Name To Equal A1 Contents When Rename File

Oct 19, 2005

How can I set the SAVE AS file name to equal A1's cell contents? (More specifically, when I need to rename an existing open file and place my cursor in A1 and hit Save As, I need to new file name to automatically populate A1's cell contents so I don't have to retype the contents of A1.)

View 1 Replies View Related

Opening Excel File From List Of File Names Located In Single Sheet?

May 31, 2013

loop and range function to apply in the below code through which I can avoid writing code for all the rows.

I am trying to open excel files located in single folder from files name (along with the path) in single worksheet (Column B and Row 1 to 500).

I have created follwing code which opens the file and then runs a macro in it.

a Sub Test()
Dim strFName As String
strFName = Sheet1.Range("B2").Value

[Code].....

View 4 Replies View Related

VBA Code For Opening File With Variable Version Number In File Name?

Jan 29, 2014

I have a file that I save with a new version number each time I make major changes. The file name currently is: "Telephony Equipment Inventory v26 (Summary).xlsm". The "26" is the variable number. give me the vba code to ensure I open the file with the highest version number?

View 6 Replies View Related

Rename File When Copied?

Jul 8, 2013

I just copied and modify this code; What I want is to add sumting on the file name, without changing, file path, original file name and file extension

Say : I get the file

D: DocsMemo.docx

I can paste it to the fnpath with a changed filename

C: \_Temp Memo_BPMC-0001.docx

Heres the code

[Code] .....

View 3 Replies View Related

Move & Rename PDF File

Jun 26, 2008

I've written most of the code that I need... the problem is that I don't know how to properly select, move and rename the pdf from excel.

I have a popup to select the file, and I know what I want it to be called, what I need is the code to move and rename a non-excel file from inside a macro.

Here is what I have so far:

Sub AttachPDF()

Dim LastName As String
Dim Street As String
Dim callDate As String
Dim FilePath As String
Dim HouseNumber As String
Dim FullFileName As String
Dim FileName As String
Dim Scan As String

Range("D32").Select
'Ask user what file they want to attach.
Scan = Application. GetOpenFilename(FileFilter:="Follow Up Scan, *.pdf", Title:="Please Choose A PDF To Attach")

If Scan <> False Then

View 5 Replies View Related

Copy File And Rename It Using Input Box?

Mar 15, 2014

I am using this code for 2nd coping my file and rename it automatically......

[Code] .....

I want when i want another copy always my path should be "C: estabc.xlsm"
and
For new file in same path "C: estdef.xlsm" an input box ask for the name("def.xlsm") "what new name u want for this new file".

And I input the new name for my file and done.

View 4 Replies View Related

Apply Functions To Rename File

Sep 24, 2009

I've found these functions to assist in renaming a file.
However, I'm not quite sure how to apply to code.

View 2 Replies View Related

Excel VBA Rename Existing File

Oct 17, 2011

I have some code which will look for a specific file in a given location. Is it possible to use VBA to rename that file without opening/re-saving and killing the specific file?

View 8 Replies View Related

VBA To Rename File With Date As Part Of New Name

Feb 22, 2012

I am trying to write a VBA that rename an Excel file by adding todays date at the end of the file name. For example rename the file

C:Documents est.xls to C:Documents est020221.xls 020221 is todays date

View 3 Replies View Related

Rename File With Date In A Cell

May 3, 2012

how to write a macro in excel to rename a file with a date in a cell (A1) from that file?

View 5 Replies View Related

Rename A File That Is Being Pumped Out By Another Program

Jan 25, 2008

I am using the following code to rename a file that is being pumped out by another program.

Sub CopyAndDelete()
Name "C:Program FilesPATH1234567890_3.tvr" As "C:Program FilesPATHNEWNAME.tvr"
'
End Sub

The problem I have is the the file being pumped has a varible name. The nly constant is the _#.tvr. The first 10 digits are random numbers.

I have persued the "rhymn and reason" for the file name with the vendor and have been told it can not be changed and is random. The "_#.tvr" piece comes from the number of reports I have generated for the day. So I have 5 prefined reports that run each day and can recreate the _0.tvr through _4.tvr but the first 10 are random each time.

I would like for the rename to "ignore" the first 10 digits then looking at the file name.

View 9 Replies View Related

Macro To SaveAs And Rename A File

Oct 15, 2009

I think my code is close but I keep getting an error "Run-time error '1004': Application-defined or object-defined error"

I am trying to rename the active workbook by appending yesterday's date onto the filename, using the Save As.

I might be going about this all wrong anyway. My user needs the macro to save, rename, and close the renamed copy of the workbook but to leave the original workbook open. I'm trying to do it in steps so I might be doing this the hard way. However, my code to Save As is below:

Sub SaveAsRename()

Dim CurrentPath As String
Dim CurrentFileName As String
Dim NewFileName As String
Dim Today As Date

Today = Int(Range("A3") - 1) 'Cell A3 contains the =Today() formula
CurrentPath = ThisWorkbook.Path
CurrentFileName = "QU Backhaul Dispatch "
NewFileName = CurrentFileName & Today & ".xlsm"

ActiveWorkbook.SaveAs Filename:=CurrentPath & "" & NewFileName

End Sub

My Locals window has all of the correct values right up to the ActiveWorkbook.SaveAs which is where it fails.

View 9 Replies View Related

Rename Worksheet Name By VBA

Aug 29, 2013

I have came up with the following code , i want all the sheets renamed but except for sheet("PRODUCT")

i tried with if not and somehow it did not work.

Code:

Sub ChangeWorkSheetName()
Dim WS As Worksheet
i = 1
On Error Resume Next
For Each WS In Worksheets
WS.Name = "CUSTOMER" & i
i = i + 1
Next
End Sub

View 4 Replies View Related

Rename Tht Worksheet

May 13, 2007

I renamed a sheet and for some odd reason excel added .xls] before the name of the sheet. So the name was now .xls]Sheet 1. I tried to rename the sheet again to get rig of the .xls], but the program didn't allow it and said that I "entered an invalid name". Now when I'm trying to make links to cells on this sheet, excel says that my "formula contains ans ivalid external reference to a worksheet". The worksheet is now unusable and copying the sheet and updating all the links on other worksheets is a lot of work.

View 6 Replies View Related

Rename Worksheet Cell Value In Another Worksheet

Aug 29, 2011

I have renamed worksheets according to a cell value in the same worksheet, but now I need to rename the worksheet according to a cell value in another worksheet.

Here is the code I tried:

Code:

Private Sub Worksheet_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Sheets("Set-Up Page").Range("B2").Value "" Then
'rename the worksheet to the contents of cell B2
Sh.Name = Sheets("Set-up Page").Range("B2").Value
End If

End Sub

I have pasted that code into the worksheet that needs to be renamed, but it doesn't work. I have also tried:

Code:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address = Sheets("Set-up Page").Range("B2") Then Sh.Name = Target
End Sub

I like the first one because it checks for a blank value. There will be blank values depending on how many worksheets each teacher needs, so it will just rename the ones that have values filled in. Each worksheet will have the code referencing to a different cell on the Set-Up Page worksheet.

View 9 Replies View Related

Move / Rename File On Mapped Drive?

Jul 25, 2014

I am trying to move and rename an excel template file using a macro. My code works fine when it is moving the file locally on my C: drive. However, when I try to do it on a mapped network drive I get a Path/File access error. Here is the relevant code:

[Code] ......

I tried it both ways that are commented out - both give me the error. I have permissions to read/write in all relevant folders. What am I missing here?

View 2 Replies View Related

File Rename From Values In ColA To ColB

Jan 24, 2008

I have the following

1) directoryA
2) ColA - Contains oldFilename
3) ColB - Contains newFilename

I simply need to rename files from values in colA to colB working with directoryA with the extension of .jpg

View 9 Replies View Related

Rename Word Object File Icon

Oct 19, 2006

I've added an word object to my excel sheet as an icon. The only problem is that it shows the word icon then under it says 'Microsoft Word Document'. This might be an obvious and silly question. But how do I Rename the 'Microsoft Word Document' to a title of my choice?

View 2 Replies View Related

Duplicate And Rename Worksheet

Dec 11, 2008

I have what should be a simple question. I have a button in a form that needs to duplicate a sheet and rename it. It will duplicate but i am having problems with the renaming. The name of the sheet is coming from a userform text box. Here is the code i am trying.

View 2 Replies View Related

Rename Worksheet With Cell Value

Jun 26, 2012

I need to rename the sheet5 with the value in E3 of Sheet2.

View 1 Replies View Related

Rename Worksheet By Code Name

Dec 5, 2012

I have a worksheet named "TEMPLATE", it's codename is Sheet10.

I want to rename "TEMPLATE" using the codename for the worksheet.

How would I go about doing that?

View 4 Replies View Related

Possible To Have A Macro Rename A Worksheet?

Aug 2, 2008

Is it possible to have a macro re-name a worksheet. The context I want to use it would almost as a conditional formula.

Example: IF A1 = "time sheet" then sheet1 is then re-named to "time sheet"

View 9 Replies View Related

Insert New Worksheet And Rename

Jun 24, 2009

Can I get a macro to insert a new worksheet each time it runs and rename it to a value held in a cell on another tab eg Sheet1, cell A1 - this value will change each time the macro runs so there wont be any duplicated tab names ?

View 9 Replies View Related

Rename Active Worksheet

Aug 25, 2006

I'm looking for a macro to automatically rename the active worksheet to Sheet1.

View 3 Replies View Related

Rename Worksheet Code

Dec 13, 2006

I currently download a report and it has a different worksheet name everytime. Is there any way using a macro to change the worksheet name? (My macro extracts data from worksheet a and copies into worksheet b) Hope I've provided enough info.

View 7 Replies View Related

Copy And Rename Worksheet

Feb 16, 2008

Z = Sheets.Count
I = Range("a65536").End(xlUp).Row
Range("a" & I + 1) = I
Worksheets("MASTER").Copy After:=Sheets(Z)
Worksheets("MASTER (2)").Name = I

the probelm is it asks the user to accept or enter there own name for the copied sheet. how can i do this without it asking the user

View 9 Replies View Related

Copy Worksheet And Rename It Using A Userfom

Feb 9, 2009

When I press "commandbutton1", I need "userform1" to view and insert a name in the text box. When I press OK in "userform1" I need a macro to copy worksheet "s0" into a new worksheet and rename this worksheet with the name typeed in "userform1". Also I need to view the name of all worksheet copied using "userform1" in column H in worksheet final.

View 4 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved