I have a workbook "Budget 2009"
I would like to save a copy of the workbook that I am working on from time to time with the date and time added i.e. Budget 2009_YYYMMDDhhmmss but I need the original document Budget 2009 to continue to be active and displayed not the date/time stamped backup copy.
1) I need to add an edit check
2) have a copy of Active Workbook Path stamped onto spreadsheet with date and time to create a visual record of where the file has been saved (described after the code below).
1) I need to verify that two cells (S7 and S9) are not blank before running my code below (=IF(OR(S7<>"",S9<>""),RUN CODE,"You must select your Provider or Division before you can save this document")).
- If both of these cells are blank a message box should notify the user that they must select the provider and/or division before they can continue with the save.
- If one or more of these cells are not blank the code below should run.
I have ever changing numbers being displayed in cells from say E2:E2000. Is there a way to copy the figures and then paste them every 1 minute into an adjoining cell or preferably into the J column.
So every 60 seconds a copy is taken of say E2 and is pasted into J2, E3 is copied and pasted into J3 and so on all the way down the 2000 cells.
XP2 EL 2003
I have a userform with a label that displays a message using the 'Mouse Move' event. Is there any way to show the message for a specified period of time & then fade out?
View 3 Replies View RelatedI have the following macro to recalculate the time every second on opening a spreadsheet
Sub Auto_Open()
Calculate
Application.OnTime Now + TimeValue("00:00:01"), "Auto_open"
End Sub
Looking for the code I need to add that will stop the macro when the file is closed.
with a macro. I am looking to copy row 2 to the last row and past the copied rows directly below the copied contents.
View 9 Replies View RelatedCurrently i have a spreadsheet with realtime data feeds from Bloomberg (or reuters). What i would like to do is:
a. Fill a vector/column of data values every minute until we have 30 observations i.e. from 9.00am till 9.30pm
b. This will then allow me to calculate a moving average of the last 30 (1 minute) observations.
c. At 9.31am, the 9.00am value drops out of the column and is replaced by the observation at 9.31am. This results in a constantly updating column of the last 30 minute observations and will allow me to have a realtime moving average.
Just finished amending a piece of code to enable me to search for an agents name in a list of files. This is then copied to a new worksheet (named by the name entered in the search). What I need is to cut(or delete) the row from the original sheet (sheet 1 in this case) thus leaving me the remaining list of files.
Below is how the code is setup at the moment....(just copies the row)
I have copied a colorindex UDF from here and went to VBE, inserted a new module in my Personal project, pasted the UDF and expected to be able to use it in any excel file. It's not working though. I have used this particular UDF before, but on a prevous computer that is not around for me to look at.
My goal is to use =IF(colorindex(J2)=colorindex($K$1),J2,"").
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] .....
Macro on copied sheet. I have a macro using the following to bring a shape to the front:
View 4 Replies View RelatedI'm working on this sheet and i'd like to copy information from row "i,i", insert a new row below it and copy that information to the new empty row.
View 6 Replies View Relatedfind the attached sheet. I want advice for the VBA Code I used in this sheet. I am simply using nested if. advice me any other solution for the same as I want data to be copied from Jan to Dec ? I am beginer in VBA coding.
View 3 Replies View RelatedI have a spreadsheet model I want to give to my students. I do not want them to be able to copy the spreadsheet.
Know of a product which can protect a spreadsheet from being copied and distributed to non intended users.
Something like "pairing" to a computers ID.
I need formulas to be automatic added when i insert row
View 2 Replies View RelatedI have this bit of code which is working perfectly. Now I need it to delete the rows it just copied. How would I go about doing this?
Sub TESTMonthEndReport()
Dim x As Long, y As Long
y = 2
Application.ScreenUpdating = False
For x = 1 To Worksheets("January 2013").Range("K276").End(xlUp).Row
If Worksheets("January 2013").Range("K" & x) = "Waiting" Then
Worksheets("January 2013").Range("K" & x).EntireRow.Copy
Sheets("February 2013").Range("A" & y).PasteSpecial
Application.CutCopyMode = False
y = y + 1
End If
Next x
End Sub
After using a vlookup formula, and a if then statment I found out that there are duplicates on my other sheets. I want to use a Macro to use the duplicate value in search and find to locate the item and highlight it on my other sheet. I have searched the web but can't find anything on this.
I can't seem to paste my coppied cell into the what in the find.
Sub Macro15()
'
' Macro15 Macro
'
'
Selection.Copy
[Code]....
I've been trying to copy and drag formulas on my spreadsheet by the references are not working. Example. I have =$B1 in cell A1. If I copy and drag that to A2 it remains =$B1. And it should change to =$B2, correct? Same as if if make the column absolute.
View 9 Replies View RelatedI have a spreadsheet that is controlled solely by userforms. I have a search button that finds all cells that match the query and copies the whole row into another sheet, often about 10 rows appear. What I now would like to happen is that these rows are then copied into a list box for viewing in the form apposed to in the spread sheet.
I have a sample spreadsheet to show how the data would be set out.
original thread 2. Originally Posted by Dave Hawley
Private Sub Worksheet_Change(ByVal Target As Range)
Dim wSheet As Worksheet, wSheet2 As Worksheet
Dim strNum As String, strNum2 As String
If Target(1, 1).Address = "$J$5" Then
If Target = vbNullString Then Exit Sub
If IsNumeric(Target) Then
strNum = Target + 1
strNum2 = Target
On Error Resume Next
Set wSheet = Worksheets(strNum)
Set wSheet2 = Worksheets(strNum2)
On Error Goto 0
If Not wSheet Is Nothing Then
Application.EnableEvents = False
Application.Undo......................
What I would like to do is after the new sheet is created it would make cell j5 on the newly created sheet the same name as the sheet itself. I've tried to do that but the above code tries to activate. Is there a way to have the above code only work on the very first sheet and for the cell naming code to work on only the created sheets
I'm attempting to copy some data from one spreadsheet to to a workbook in another spreadsheet. However, when I do my copy, I lose all of the formating of the intial data. Does anyone know if there a way that I can keep the the format of the original to the new spreadsheet?
View 5 Replies View RelatedUsing Excel 2007 I duplicated a worksheet by right clicking the worksheet tab and selecting Move or copy... with the Create a copy option. Of the six comments on the original worksheet only one appears in the duplicate.
View 2 Replies View RelatedI have a problem in copy formulas form one cell to another, my formulas are writen in one workbook in this way... '=Dog+Cat.
The problem is that I did a looking table code (vlookup) and when it shows the formula I have #żName?.
I would like to knw if there is a way to fix this using the vlookup or I'll be obligated to use special Copypaste
when I cut or copy a range - and then select a different area - how do I reference to the original cut or copied selection, i.e. the "marching ants" range?
View 3 Replies View RelatedMy boss sends me emails with people's information, which I then reformat to put in invoices in word, save as PDF, record in excel, and send out with an email from Outlook. I would love to find an easier way. I'm wondering about putting the info in an excel table so that I can then use a mail merge to create an invoice with the address--unless it turns out to be more work than to format each one (I'm newish to Excel).
The info I get is listed in the following way:
First Name: Mia
Last Name: Kant
Email Address: mika@gmail.com
Country: Afghanistan
[code]....
I need to use some but not all of the info, but if I could get it to format into a table, I assume I could then pick and choose.
I'm trying to copy the a name from cell X2...JohnDoe and rename the current sheet with the contents of X2. I'm using the following code and getting my sheet named as "True"
Sub SheetName()
'
' SheetName Macro
'
Dim ShName As String
ShName = Range("X2").Select
Selection.Copy
Sheets.Add.Name = ShName
End Sub
I copied a list of data from Vendio Counters for pages in my website, which includes a check Box in their 1st column.
When copying the list, you automatically get the check box plus the data.
When I paste it into my counter tracking spreadsheet, the Check Box is also pasted into one of my columns.
The problem is that I only want 1 column which is the actual count.
I have tried everything to delete the Check boxes to no avail. I've even tried to delete the column and it won't delete.
All the other extra columns can be cleared or columns deleted
It's been a long time since I have worked with Excell, it use to be the " $ " that made things absolute or relative.
I have this formula:
='1'!C194+C193 on sheet 1 named "1" without the " ". I need to copy it across 31 sheets. I thought that it was the " ! ", without the " ", that makes the address absolute so I took it out and then attemped to copie it to other sheets. The idea was that the formula would then read: ='2'!C194+C193 on sheet 2, and ='3'!C194+C193 on sheet 3 and so on. The formula is in the exact same location on each sheet, C194. But this won't work. I am at this time doing each formula one at a time. I have many workbooks that will use the same style of copy and paste; about 15 workbooks each with 31 sheets.
It would help if someone could explain how to save time. I do know how to use the Ctrl to select different cells and how to use Ctrl+Page UP/Down to change tabs. I just have to get the formula correct.
I have a formula that basically copies a cell into another workbook if 'other' is entered into the column to the right. i,e cell A1 has 'other' B1 has '100', the figure in B1 is placed into another workbook cell. The results are only shown if a month is selected from a drop down on the 1st workbook with the meta data.
What I want to do is to add a command to the formula below so that it will recognise that after the first item is entered it will look for the next data item and not just repeat the first….
{=IF($L$92:$L$580="","",INDEX($L$92:$L$580,MATCH(1,(TEXT($C$92:$C$580,"mmmm yyyy")=TEXT($E$5,"mmmm yyyy"))*($L$92:$L$580<>""),0)))}
In the attached worksheet is an example of what I want (table 2) and what I'm currently getting (table1)…
I made some graphs in Excel and then copied them to a Word document. Everything seemed fine, but when I printed the document some graphs had a white square under the numbers and some hadn't. I can't find out where I can change this so that all of them would be without that white background under the numbers:
http://www.shrani.si/f/B/8T/22dMjbNF/img0944.jpg
http://www.shrani.si/f/2Y/bv/1sSyqpAw/img0945.jpg
how can I change that so that all graphs will look the same (without that little squares behind the values).