How To Add Counter And Change Replace To Delete Cells
Apr 11, 2014
I have a macro which will search a document in specific range and find specific cells if found = replaced to data from my list ...
I want to change it to: if found = delete cell + delete 4 cells on left...
+
At the end I want to see msg bog saying how many time it find the spec cells... (not how many cells has been deleted.
Sub Find()
Dim myList, myRange
Set myList = Sheets("sheet3").Range("A1:A10")
Set myRange = Sheets("sheet3").Range("D1:F100")
For Each cel In myList.Columns(1).Cells
myRange.Replace what:=cel.Value, replacement:=cel.Offset(0, 1).Value
Next cel
End Sub
View 2 Replies
ADVERTISEMENT
Jun 29, 2006
How can I write a For-Next Loop and have the counter skip values in between. For example:
For i = 8 to 17
When that is completed, the counter jumps to 21:
For i = 21 to 30
When that is completed, the counter jumps to 34:
For i = 34 to 43
View 3 Replies
View Related
Jul 21, 2009
How to replace a tag with a new one; for example, replacing "something with something
I mean how to replace the surrounding tags without touching the in-between text.
View 9 Replies
View Related
Aug 11, 2014
I have an excel spreadsheet with a list of numbers in column A. These are all "random" numbers in that they don't follow an order, but they mean something elsewhere.
The rest of the columns have other information that is related to the number in the same row.
I have another list of random numbers which is much smaller than the original, but all of the numbers on the smaller list (which is in a different excel document but can easily be put in its own column) are in the larger list as well..
I want to compare the two lists, and if the number from the smaller list is found on the larger list, I want the entire row deleted and all the remaining cells shifted up. I do not want any blank rows between the data.
View 7 Replies
View Related
Oct 25, 2012
what I am doing is running a parameter query. Based on the users selection it pulls in and embeds a pdf file based on a link put into cell A1. The problem is when the user selects another file. My current process deletes all of the oleobjects on the page (because I couldnt figure out how to just delete this pdf embedded object as it is named differently each time it is pulled in) My current process worked fine up until I needed to add some controls (radio buttons) now when it loads the next file it deletes the radio buttons. Is there a way to name this embedded pdf file so that I can then delete only that object? or is there a fundamental better way to handle this?
below is the section in question
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
Set KeyCells = Range("A1")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
Dim wsh As Worksheet
For Each wsh In ActiveWorkbook.Worksheets
wsh.OLEObjects.Delete
Next wsh
ActiveCell.Offset(0, 0).Range("j1").Select
ActiveSheet.OLEObjects.Add(Filename:=Range("a1").Value, Link:= _
False, DisplayAsIcon:=False).Select
View 3 Replies
View Related
Jun 14, 2013
Can you cut out part of a number and replace it in another cell. For example
A1 come in as ###+### and it will not always be a three digts all the time but I would like to keep the number in front of the "+" in A1 and the number behind the "+" into A2 cell.
Can you do this my a SEARCH("+",A1)LEFT("+)
View 3 Replies
View Related
Jul 21, 2014
I have a data range with just under 100,000 lines by about 60 columns. In one of the final columns I used the formula =IF(COUNTIF($A$2:A2,A2)=1,1,0) in order to set a flag the first time that each unique value in Column A appears. (I know about the remove duplicates function but the data was sorted in a certain order and I needed information specifically from the first row in which each unique value appears.) The formula works - it's not very quick, but it works.
The issue I'm encountering though is that now I want to remove that formula so it doesn't keep recalculating and every technique I use either takes forever or stalls Excel entirely. I've seen the same issue in two different spreadsheets where I used the same technique. Techniques I've tried: selecting and deleting the entire column, copying and pasting values over the formula, Selecting all the cells and pressing delete, copying and pasting an empty cell over them, Selecting and cutting and pasting the cells to another workbook. I've done these while disabling automatic recalculation and even turning off Data Filtering. I just can't understand why a simple delete operation should take so long, it shouldn't matter what is in the cell because all I want to do is delete it.
View 3 Replies
View Related
May 28, 2014
I am working on a spreadsheet that will be referencing approximately 20-30 separate workbooks which all have identical sheet / column structure and have a consistent file naming convention. ("###-YYYY") Since, this is referencing separate files and not sheets with this workbook, I cannot use INDIRECT. However, I should be able to use index / match referencing provide instructions for users to copy a set of cells down and the globally change the file name. The problem is that the file directory pops up with each instance and the user has to manually select or confirm the file.
There would be approximately 15 cells with a formula similar to this example and would want to change the two instances of "403" to a new 3-digit code, say "444". Then as each year cycles over, we'd want to change all instances of 2014 to 2015.
=INDEX('C:Users
lagraffDownloads[403-2014.xlsx]Forecast Budget'!$D$15:$D$48,MATCH($P$2,'C:Users
lagraffDownloads[403-2014.xlsx]Forecast Budget'!$B$15:$B$48,0))
Any settings in Excel, or known tricks, so the user won't have to continuously click on the file and the find/replaces executes at each instance?
View 1 Replies
View Related
Dec 29, 2009
I have about 40,000 lines in Column A that have text like so...
13HMPS32TRE600001OP000000601
13L9KUPSOTE600001OP000000601
I need a formula to change all TR and OT to characters QT. I did a find and replace but its changing other columns of text that I don't need changed.
View 9 Replies
View Related
Dec 1, 2005
I'm looking to simply delete certain words that are in cells, without having to delete rows, columns or the entire cell. I can use 'find and replace' and replace the particular word with a space, but I really want to delete the word. I'm using both Excel 2003 and 2000.
View 4 Replies
View Related
Sep 9, 2013
Here is the situation:
- Large block of text in one cell (1000+ words).
- I use the Find & Replace function (from the top menu) to find a specific word that may appear several times within the cell.
- Excel "highlights" the cell... but not the word specifically so I have to read all the text to find that word throughout the cell.
View 5 Replies
View Related
Jun 26, 2013
how to write macros. Here is what i need:
-I need the macro to only search within column "B"
-There is both a date and time within the cell, the time is always " 00:00:00" and I need it to be replaced with blank/ ""
- The date is represented "1/1/2013" and i need the "/" to be turned into "-"
- and i need the number format to be changed to a custom format of "m-d-yyyy"
View 1 Replies
View Related
Feb 3, 2010
I want to use the macro to run an XML file but I would like the images to run from 001 to what ever say 300 is this possible? So rather that 1,2,3 the counter would be 001, 002, 003 etc.
View 3 Replies
View Related
Apr 28, 2009
I would like to put a counter (number) in my excel sheet. Consider that like a bill number. Any time I open my Excel I want to have new number on top. For example 201, 202 so on and so forth. I would appreciate if anyone had this project before and willing share it with me.
View 9 Replies
View Related
Apr 13, 2007
I am using excel with system called PI, where i can retrive datas from network
I have proble with calculating day (With sum) becoz date is virying daily and data changes accordingly
Example
22-Mar-07 23:40:101
23-Mar-07 23:40:101
24-Mar-07 23:40:101
25-Mar-07 23:40:101
26-Mar-07 23:40:101
27-Mar-07 23:40:101
28-Mar-07 23:40:101
29-Mar-07 23:40:101
30-Mar-07 23:40:101
31-Mar-07 23:40:101
01-Apr-07 23:40:101
02-Apr-07 23:40:100
03-Apr-07 23:40:100
04-Apr-07 23:40:100
05-Apr-07 23:40:100
06-Apr-07 23:40:100
07-Apr-07 23:40:100
08-Apr-07 23:40:100
09-Apr-07 23:40:101
10-Apr-07 23:40:101
11-Apr-07 23:40:101
For this example Now i want to start counting from 9th April.
Sure i dont want to calculate from 22 march to 1st april
Sure this wont be same every time, becoz after 10-15 days this figure will become zero and stays for 0 for 10-12 days and again become 1 and keep continue
So every day automatically 1 day go out from top and 1 day will add on bottom with either 0 or 1 (But if zero it will continue for few days or 1 than also case is same)
So i like to start counting from where it changes from 0 to 1 again
Hope i explained question properly
View 7 Replies
View Related
Sep 15, 2014
Reset Counter to Zero:
I have Record ID on Column A: Auto Increment
I have a vendor Name on Column B: Vendor 1, Vendor 2, Vendor 3
I have a Code on Column C, Code A, Code B
What I want to happen is the Counter to count +1 each time. it sees the same vendor, same code and only to count to 4. As soon as it counts to 4; the next counter should be 0 (Zero).
Col A Col B Col C Col D
======= ====== ===== =======
Record ID Vendor Code Counter
======= ====== ===== =======
1 Vendor 1 Code A 1
2 Vendor 1 Code A 2
3 Vendor 1 Code A 3
4 Vendor 2 Code B 1
5 Vendor 1 Code A 4
6 Vendor 1 Code A 0
8 Vendor 2 Code B 2
9 Vendor 2 Code B 3
10 Vendor 1 Code B 4
12 Vendor 1 Code A 1
13 Vendor 1 Code A 2
14 Vendor 1 Code A 3
15 Vendor 2 Code B 0
It can be either in VBA or formula...
View 2 Replies
View Related
Mar 28, 2008
we have a spreadsheet which we encourage our employees to use but not sure if they are or not. is it possible to put a counter onto the spreadsheet so we can see how many times it is being opened
View 10 Replies
View Related
Jun 11, 2009
I'm copying values from one workbook to another. Each value has to be checked, so I do this in two steps.
View 2 Replies
View Related
Sep 22, 2011
I have a input worksheet and in this user have to manually enter the sequence no. The sequence no. heading is not always in one cell that can be in any between any cell from D14 to D21.
I need some code which start the sequence no. with 1 and everytime I click add button. It find the sequence no. in range between D14: D21 and add 1 in the relavant adjacent cell (which can be in from E14 to E21).
See Table below
Start withColumn DColumn ERow No. can be any from 14 to 21Sequence No.1Clicked AddDesiredColumn DColumn ERow No. can be any from 14 to 21Sequence No.2DesiredColumn DColumn ERow No. can be any from 14 to 21Sequence No.previous val +1 and so on
View 2 Replies
View Related
Feb 5, 2014
I am trying to use the sumproduct as a counter. I have done it numerous time with success; however, I am trying to use it where it incorporates a wildcard text to include or exclude as part of my count criteria:
=SUMPRODUCT((Sheet1!$A:$A=Sheet2!$A9)*(Sheet1!$C:$C="Fixed")*(Sheet1!$AG:$AG"*CCAP"))is
My issue is that it does not recognize the wildcard, and does not return the correct item.
View 7 Replies
View Related
Apr 23, 2008
I will include the macro that I have completed so far. The problem is that Each time the macro is run, I need it to place a number next to the info in consecutive order. This should make sense after you run the macro.
Sub MacroIllinois()
'1 a Number
'2 Text (a string)
Dim i As String 'Give me a variable to save the name in
i = Application.InputBox("Enter your name please", Type:=2)
ActiveCell.FormulaR1C1 = ActiveCell.Value & Chr(10) & i
With ActiveCell.Characters(Start:=1, Length:=17).Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 11
.ThemeColor = xlThemeColorLight1
.TintAndShade = 0
.ThemeFont = xlThemeFontNone
End With
End Sub
View 9 Replies
View Related
Sep 21, 2009
i have this formula in cell C14
="Today Is The "&U3-V7+1&"th Day Of "&IF(VLOOKUP(U3,AC10:AD17,2)="winter","Winter","")&IF(VLOOKUP(U3,AC10:AD17,2)="Fall","Fall","")&IF(VLOOKUP(U3,AC10:AD17,2)="Summer","Summer","")&IF(VLOOKUP(U3,AC10:AD17,2)="Spring","Spring","")
it returns " Today is the 92th Day Of Summer " *number and "Season" changes*
i want changing the 92th when the number changes.
so if it was 1 it would be "1st"
2 would be "2nd"
3 would be "3rd"
than 4-9 would be "4th,5th,6th..etc (as normal)
also counts for double digit number
21st 32nd 43rd
and also counting the days..today is the 92 day of summer but when it gets to the 1st day of fall it going to say 94th day of fall..when i want it to say 1st day of fall... than start counting the days of fall than so on for each season..
here are the dates for the seasons
3/20 is spring
6/21 is summer
9/22 is fall
12/21 is winter
3/20/2010 is spring
6/21/"" is summer
9/22/"" is fall
12/21"" is winter
View 9 Replies
View Related
Jun 20, 2006
I am not experienced at all with Excel, here is my problem: In column "A": I have 288 rows and has nothing but numbers in them. Row 1 is the lowest number, row 288 is the highest number. In each row the numbers typically increase; every once in a while the numbers may stay the same, but the number will never be lower. The numbers range from 0 through 600,000.
What I want to do is have column "B" follow column "A" until the cell total reaches 12000. The next cell in column "B" would then reset and start all over from "0". I want it to keep on reseting every 12000 counts. Another potential problem is that a majority of the time the cell value will not be an even 12000, 24000, 36000 etc. They may be more like A40: 11742 A41: 13201 etc.
View 5 Replies
View Related
Sep 17, 2006
I have this in J22 (a counter that starts from the value of the cell):
=IF(B37=4;J22+1;J22)
We know that J22 value at the start is 0 (by excel default)..
Is it possible to change the value of J22 (using VBA) without losing the formula in the cell (for instance sometimes I need it to start from 3 and other times from 7..) ? I can't change it using another cell, I need to use only J22..
View 3 Replies
View Related
Feb 28, 2007
I am trying to find out how to get a "counter" of sorts so i can tell how many times a certain word shows up in a given column.
View 9 Replies
View Related
Feb 12, 2010
Is it possible to delete a column of numbers then replace those numbers from adjacent columns and the adjacent columns are then filled with the numbers adjacent to them
View 9 Replies
View Related
Feb 18, 2014
I have a workbook that uses the values that a user had entered into 3 cells to calculate multiple other charts/diagrams on multiple sheets within the workbook. Each sheet would show what the user had entered in the 3 cells to allow them to see what is being used to calculate each table. Is it possible to link these cells so that the user can change the 3 values without having to go back to where he originally entered the 3 values?
For example, a user has entered in 3 values in Sheet 1. A formula in Sheet 2 displays what is entered by the user and uses these calls in Sheet 2 for calculations. When the user wants to change the three values, he would have to navigate to Sheet 1 and enter in the new values to have the workbook recalculate all the tables. Is there a way to link the three cells from Sheet 1 and Sheet 2 so when the user is on Sheet 2, he has the opportunity to change the values on the current Sheet without having to navigate to Sheet 1 to do so?
View 1 Replies
View Related
Nov 5, 2011
Have been searching the forums for an answer but to no luck very new to excel. What i hope to try and do is change amount in numbers in cell range E4 to L23 which might include a decimal place to the text value in cell F1 leaving all blank cells blank.
I would if possible like to apply this macro to many sheets with lots of different titles in the same workbook
These are 2 examples of is the sort of thing i have been playing around with the bits in red are what i think i need to fill out hopefully i will be able to find some code to appy it to all sheets and add it on. Am I going down the right route
Sub replace1()
Dim rep As String
Dim newrep As String
rep = Dont know what to put here to make it apply to ant number
newrep = Dont know what to put here to make it contents of cell F1
[Code]....
View 6 Replies
View Related
Apr 1, 2013
I am trying to attach a counter to a variable. I am trying to attach the counter "k" to the variable "A", instead of separately writing code for A1, A2, A3, and A4. Each variable corresponds to the same worksheet function calculation (such as average in this case), but refers to a different set of data. So, if I run the following code, it does not work. I know how to do it using an array.
VB:
Option Explicit
Dim A1 As Double, A2 As Double, A3 As Double, A4 As Double
Dim k As Integer
[Code] ....
I have attached the excel file : Book1.xlsm
View 7 Replies
View Related
Nov 27, 2008
I have a rather big worksheet with lots of sheets in it. I need to see in the frontpage how many sheets there are in total (-2, the frontpage & end sheet don't count) and how many sheets are currently shown (ie. not hidden, as there are vba-filters which sheets to display).
I don't really mind how it is shown, it could be one cell with 14/53 meaning 14 sheets shown of a total 53 or in seperate cells.
View 4 Replies
View Related