Delete The Original File

Jun 21, 2006

I am writing a macro that copies a pdf from a temporary directory to a permanent directory. After the copy is complete, I want to delete the original file. Looking in Visual Basic Help, it appears that I need to create a FileSystemObject, but I have no idea what that means or how to do it. sDirectory is a string variable of the path of the file and sBatch is a string variable of the name of file. This isn't working.

Set fs = CreateObject("Scripting.FileSystemObject")
sDeleteFile = (sDirectory & sBatch)

Set a = fs.CreateTextFile(sDeleteFile, True)
a.DeleteFile.sDeleteFile

View 4 Replies


ADVERTISEMENT

Macro To Save Worksheet As New File Then Return To Original File

Mar 14, 2014

I have a macro which successully saves a worksheet as new file to another file path....(below)...but I can't figure out how to close this new file and return to the original file...

Dim myPath As String, fName As String
myPath = Sheets("Date").Range("C8").Text
fName = Sheets("Date").Range("C9").Text
Sheets("Sage CSV File").Copy
With ActiveWorkbook
.SaveAs Filename:=myPath & fName
End With'

View 2 Replies View Related

Delete Both Original And Duplicate Rows?

May 25, 2014

My worksheet that will have duplicate data inserted into it. Once inserted I need to delete the new duplicate row and the row it duplicated. The attachment is a copy of what the data looks like with the first tab showing what it will look like with inserted data and the second tab is what I want it to look like at the end. I will not need the deleted data again so it does not need to be on a new sheet, that is just for an example. The name of the tabs will also be different so I want to be able to run it on any worksheet. This is the code I am using to find and delete the duplicate but I can't get it to delete the original. I used "First, MI, Last, and DOB" because those are the ones that won't be duplicated where others will. This is a list of about 15,000 entries. There should never be an incident where there is triplicate data but I can't say for sure.

[Code] .....

Attached File : Practice.xlsx‎

View 2 Replies View Related

Delete Original Workbook After Save As

Mar 21, 2008

I don't believe this is possible but I've been wrong before.. Is it at all possible to Kill the current workbook using VBA? I " saved as" in another location and do not wish to keep the current workbook.

View 3 Replies View Related

Save CSV As New Copy & Delete Original

Apr 20, 2008

I was wondering if it is possible to have a macro running that will automatically save a .csv file to specific location and close the file. I would like to have the macro running so that as the files are opened they will be automatically saved to this location.

View 2 Replies View Related

Move Files To Another Folder Delete Original

Sep 8, 2009

i would like to be able to move files from one folder to another then delete the original files.
I dont think im passsing the variables to the functions corectly.

View 8 Replies View Related

Delete Duplicate Rows :: Including The Original

Jan 15, 2010

I have a large worksheet with over 8,000 rows and about 5 columns. In several instances, I have several rows that are all exactly the same. It could be 2, 3, 4 or even more rows that are duplicate to one another.

I would like a macro that deletes ALL rows that are duplicates, including the original.

For example, let's say, rows 3, 4 & 5 are all exactly the same, I don't want to just delete rows 4 & 5, I want to delete row 3 as well!

View 9 Replies View Related

Save As With New Name - But Keep Old File Intact - With Original Name

May 7, 2013

How does one do a save with a new name while keeping the original file intact - with the original file name? Would a macro be required?

View 1 Replies View Related

Compare The Two Lists And Then Delete The Cleared Checks Off The Original List

Mar 18, 2008

I am trying to create a way to easily maintain a list of outstanding checks. I am able to import cleared checks into the spread sheet but cannot find a way to compare the two lists and then delete the cleared checks off the original list.

View 2 Replies View Related

Export Csv Without Changing The Format Of The Original File

Nov 20, 2013

In any other software, when I save a copy, or export to a different format the original file remains unaffected but in an excel it seems to work differently...and I end up having to save my file back to the xslx format. this extra time wasted when I am regularly exporting but it also makes me a bit nervous that I might accidentally not save back to the format with all my worksheets etc etc..

View 1 Replies View Related

How To Disable Macro When File Is Copied From Original

Mar 8, 2014

How to disable a macro when the workbook opened is a copy ** the original, the only difference between the 2 files would be the date created, could it possible to use some VBA to check for this "Date Created", and if the date is different from the original, then the copy will not able to run the macro or some sheets will be hidden in the copied file?

View 5 Replies View Related

Saved File Size Not Reduced To Original

Apr 26, 2009

I have an Excell 2003 workbook with 6 worksheets and some VBA programmed macros in it.

With a small amount of data the .xls file size is 150k. Then I tested it with a much larger sample of data, which goes into one of the worksheets, resulting size 3MB. Later on I reverted to reading in the original small amount of data but the file size stubbornly sticks to 400k instead of reverting to 150k.

The old data is definitely not there anymore - I used this code to clear it:

View 13 Replies View Related

Change File Original Creation Date

Mar 22, 2004

I am wondering how you can change Excel's original file creation date. You can find it by right-clicking on a speadsheet icon then going to:

File - Properties
Custom Tab
Click on Advanced
Look for a field called "Date Created"

Some dates you can edit/change, but I haven't figured out how to change this one yet. I'd like to know because I have a need to change the date on a particular spreadsheet.

View 9 Replies View Related

Highlight Entire Row When Cell Selected Without Losing Original Formats And Color Of Original Row

Sep 5, 2012

The problem is when I highlight a row with some color the original color of the row is gone, so I tried this code, and again, it's removing the original format and color for the row This is the code from McGimpsey & Associates : Excel : Highlight row with background colors

Code:
PrivateSub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Const cnNUMCOLS AsLong=256
Const cnHIGHLIGHTCOLOR AsLong=36'default lt. yellow
Static rOld As Range
Static nColorIndices(1To cnNUMCOLS)AsLong
Dim i AsLong
IfNot rOld IsNothingThen'Restore color indices

[code].....

How can I retain the range's historical color so that when I deselect the row it reverts properly?

View 4 Replies View Related

SaveAs Worksheet To Another File / Folder While Keeping Original Open / Active?

Apr 15, 2014

I have an Excel Worksheet (let's call it "AA.xlsm") which uses VBA code to loop through column A, update column B with some results/values, and then (for each value in column A) SaveAs the worksheet into a different filename/path as a ".csv" type file.

My line of code for the SaveAs is as follows: Workbooks("AA.xlsm").SaveAs LEpath & CurrFldr, FileFormat:=xlCSV

My problem is that my original worksheet, AA.xlsm, gets closed whereas I need it to stay open/active after each SaveAs iteration.

View 3 Replies View Related

How To Delete Copied Rows And Update Original Tab Without Empty Rows

Apr 3, 2014

In my excel I'm copying rows upon specific criteria to another tab.

The question is how I can delete copied rows and update the original tab without empty rows? (N of rows is always changing)

View 14 Replies View Related

VBA Code To Require Fields - Temporarily Save File Email It Then Delete Temp File

Apr 9, 2014

I have a spreadsheet where I want to require certain fields to be completed then I want to have that file auto emailed. I have learned that I do need to have the file saved before sending otherwise the data will not appear in the email, so with this I want to have the file temporarily saved emailed then the temp file deleted.

Here is the code I have so far but it errors on the blue text, I did change the TempFileName from = "Copy of " & wb1.Name & " " & Format(Now, "dd-mmm-yy h-mm-ss") to = [C16] & "_" & [B6] & "_" & [D6]

Private Sub CommandButton1_Click()
If Range("B6").Value = "" Or _
Range("d6").Value = "" Or _
Range("f6").Value = "" Or _
Range("E9").Value = "" Or _

[Code] ......

View 1 Replies View Related

Delete Row If File Exists?

Aug 22, 2014

I have a list of numbers and I have corresponding text files which I named by using these numbers as reference

is there a possible macro to delete those rows which have corresponding text files by checking in a specific folder if that file name exists

View 2 Replies View Related

Delete The .xlb File In 2000

Dec 2, 2008

I have created an AddIn with code for menu buttons. When I delete the .xlb file it is replace with one about 12 KB. After some use it starts growing. One station had it to 1 meg. Could this increasing file cause problems for the code? If so, is there a way to keep it from growing?

View 5 Replies View Related

VB Code To Delete A File

Mar 25, 2009

VB Code to delete a file. I have the following code that creates a file.

View 4 Replies View Related

How To Delete Theme From File

Aug 24, 2012

I was given a file to edit. This file was created with a theme "Classic Office 2" using Arial fonts. I cannot copy and insert new lines into the file. How do I edit the theme or delete this theme in order to get an editable file?

View 1 Replies View Related

Delete File Macro

Sep 19, 2007

I have created a macro that saves a file then emails it out through lotus notes..
The problem is that how to i kill/delete the file that i have just made without it prompting me whether i want to or not? Or is there a way of only saving the file temporarily untill the macro has finishing running then it deletes the temporary file?

View 6 Replies View Related

Delete Lines From A Text File

Sep 7, 2009

I'm writing a macro in excel that edits a text file runs another program that uses this text file as its input and then stores the results. Perameters are then changed in the input file and it is then repeted over and over again. One of the parts I am stuck on is I need to delete the last 5 lines in the input file called INPfile.txt. See below:............

This section is always at the end of the file, is 5 lines long and always starts with [DEMANDS] and always ends with [END].

View 2 Replies View Related

Delete Code When Saving The File

Jan 23, 2010

I have posted already the problem to delete the code when sending a sheet via email and I have found the solution to the problem.

I tried to do the same when saving the file to specific folder, but i am facing problem.

View 6 Replies View Related

Macro To Delete File Duplicates?

Feb 5, 2013

I have a macro at work that shows which files are duplicates (same name plus file size) it then produces a list of this with 3 fields file path(excluding file), file name and ext, and size. it produces a duplicate of the file for example:

file a
file a
file b
file b

i would like a macro to delete just 1 of theese (as deleteing both would be bad!! haha) and have no idea how to start this. other than going through all 1679 files that have a duplicate.

View 9 Replies View Related

Delete Any Macros Which Exist In File With Vba

Oct 15, 2004

Is there anyway in which I can open a spreadsheet and then delete any macros which exist in that file with VBA?

For Example
Workbooks.Open "\sysdevwebwCorpAcctSuiteReportsNetProfit.xls"
''Delete Any Existing Macros Code''
Activeworkbook.Save
Activeworkbook.Close

View 9 Replies View Related

Delete All File-references/links At Once

Jun 9, 2006

we work in a group on different excel worksheets. now we want to combine this sheets and get the following linkages in the files:

= 'I:[versuch_joe.xls]Koeffizient'!C156+'I:[versuch_joe.xls]Koeffizient'!C157*B25+'I:[versuch_joe.xls]Koeffizient'!C158*(LN('I:[versuch_joe.xls]Daten'!Y17)-LN('I:[versuch_joe.xls]Daten'!Y16))+'I:[versuch_joe.xls]Koeffizient'!C159*'I:[versuch_joe.xls]Daten'!R17+'I:[versuch_joe.xls]Koeffizient'!C160*('I:[versuch_joe.xls]Daten'!AE16+'I:[versuch_joe.xls]Daten'!AE15)

how can I delete all "[versuch_joe.xls]" that are not needed anymore? i got hundreds of them in my file.

View 3 Replies View Related

Delete Last Line In Text File

Jun 19, 2007

I use the Append command to write a line to a text file. I have about 3 excel files appending data to the same text file.

If someone were to write a line in error I would like to have the ability to delete it.

View 3 Replies View Related

Huge Data File Delete All Rows With X Value?

Jul 21, 2014

I have a huge data file. I would like to have excel automatically delete all rows with the value of 7 in column b. Can I do this without manually selecting all of the rows (I can sort by that value, but there are 120,000 rows).

View 6 Replies View Related

Write A Macro To Delete Columns In A CSV File

Dec 27, 2006

I have a CSV file with the following columns:

column1, Column2, Column3
A, B, "C,D"

I need to write a macro to :

1. Delete column2

2. Save the CSV file. At the time of saving I need to supress all default messages.

View 9 Replies View Related







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