I've got a long sheet that I imported that contains a column consisting of a URL - something like this for an example:
http://www.example.com/images/imageone.jpg
http://www.example.com/images/imagetwo.jpg
http://www.example.com/images/imagethree.jpg
Is there a formula that I can use to strip off the ...
I would like to find a text string in the column A and index the value after the string.
For example: somewhere in the column A is a text "value: 800 USD" , so I would like to find the text and index the characters after the ": " in the cell C5. Therefore in the cell C would be "800 USD"
I am including sample file here: smpl.xlsx
I have a sheet with ascending week-ending dates in the row at the top.
Next row is the man-hours worked for each week.
Next row is the # of First Aids for each week.
Not every week has a first aid and I want to sum the number of hours worked since (not including) the week of the the last First Aid.
There is a summary sheet which pulls the data from any selected week via a HLOOKUP function. So, I'm thinking I'll add a hidden row with the new "Hours since last FA" under the # of FAs row and insert the magical formula into each cell in that row.
The dilemma is I can't come up with a formula/function to calculate the "hours since" data.
Hi, i need to change the second and third character from a 3 character word..
I need to change it into 2 characters with double Alphabetical order (TAA, TAB, TAC...TAZ, then TBA, TBB, TBC... TBZ, and so on).. kinda hard to explain.. it's like this:
I am having a hard time understanding why the following code (i am avoiding the select procedure on purpose) doesn't work:
Code:
Function APMS_Border(Namesheet As Variant, Mode As Variant, RowStart As Variant, ColStart As Variant, RowEnd As Variant, ColEnd As Variant, LeftBorder As Variant, TopBorder As Variant, RightBorder As Variant, BottomBorder As Variant, InterColor As Variant)
Dim BorderMatrix() As Variant
[Code]....
it only draws the left border of my range, am i missing something?
I can extract unique values from the list but thing is I need extracts only those values which match partially below is scenario
Column A has values ----
Column B has Countries..
so I need extract only those values which eg : Contry is "*Ind*"
Code:
=INDEX($A$2:$A$15,MATCH(0,COUNTIF($C$1:C1,$A$2:$A$15),0))
above formula I used to get unique values I need to add one more criteria which gives only matched.
I've got a named range which defined using a custom function. Lets call this named range [range1] which is defined by:
View 14 Replies View RelatedI have a list of jobs over a 24-hour period, that looks like this:
job1: 03:00am, duration 10 minutes
job2: 04:00am, duration 20 minutes
job3: 09:00am, duration 04 minutes
job4: 01:00pm, duration 65 minutes
Now I want to make a horizontal bar, that divides the bar into a 24-hour period (e.g. gray background) and fills the gaps that the system is in use with green parts, so in this example, the whole bar is gray and the part from 03:00am-03:10am+04:00am-04:20am+09:00am-09:04am + 01:00pm-02:05pm is filled in with green.
I have a list with about 300 of those jobs, so it would be nice if I could automate this. How to do this in Excel/VBA ?
I have an formula if statement that returns "deletethisrow" if the test is true.
For every occurence of "deletethisrow" I want to delete the row. The number instances will be variable each time I run the file. So maybe it will find that string, maybe it will find 10 instances. I want to do some kind of loop that won't error out when it cannot find "deletethisrow", but will delete the rows for each instance where it does find this string.
I know it was verbose, but if I just do a loop for a fixed number of loops it will error out if it runs out of rows to delete.
My task is to combine two large databases into one spreadsheet by extending the number of columns. The data from each database is 90% matching based on an identification number, however occasionally there are additional rows or unmatched identification numbers that need to be kept for analysis.
When this happens, there needs to be a blank row inserted to represent the missing data in the rest of the corresponding row.
I am having trouble finding a quick way to do this because I have approximately 12,000 rows (and columns up to DV when combined).
for example:
p1
data
data
data
data
p2
data
data
data
data
[Code] .....
needs to become:
p1
data
data
data
data
[Code] .....
I am guessing I will need a macro of sorts, So far I have made one column that tell me if the ID's are matching or not (1 or 0) and if they are not matching (0) I manually insert the rest of the row that is missing or make space for the duplicate data (which needs to remain).
I have a column of data with letters in each cell, no numerical, only alpha. Now, some of those cells contain the letters "adj sub" as part of the text string in each cell. "Adj sub" is always at the beginning of the text string. As an example, a cell will look like this - "adj sub mhm". I want to delete rows whose cell description does not contain "adj sub" as part of the text in the cell.
View 5 Replies View RelatedHere is what Im trying to do: I have a VERY large excel file (15,000+ lines) that has groups of text (this is all in one column)
I want excel to search for the cells with "UID" and delete that row plus every non-blank row above it. (so it deletes the entire "group") Here is example layout of what Im working with. The end result should be only "groups" without the text "UID" following it.
ExampleCell1
ExampleCell2
ExampleCell3
UID = example
ExampleCell1
ExampleCell2
ExampleCell3
ExampleCell1
ExampleCell2
ExampleCell3
UID = example
Now Im thinking this may be impossible, but I've seen some crazy things done with excel macros and was really hoping someone can help me out. Otherwise Im doing this manually for 15,000 lines of text.
"Is there some VBA code which could delete all first, second or third
characters of a text? Could it be done to the three last characters
from this same text and these be displayed on reverse order?"
Example:
AAAASAHDASK
AAASAHDASK
AASAHDASK
ASAHDASK
SADHASAAAA
ADHASAAAA
DHASAAAA
From the names listed in column A, in the table listed below, I wish to delete everything
to the right of the first two characters.
So the new column A would look this.
A
1
E HAZARD
2
F LAMPARD
3
F MALOUDA
[code].....
solve this thing.
how can I delete text after a comma.
from this 638264,1 to 638264
another question. this "&" is to join two or more cells. what is the opposite of that function?
A
B
C
1
8768,1
,1
8768
2
1683,34
,34
1683
A-B=C
I'm trying to write a line of code in my VBA macro that goes through all of column B and if there is text in the column to go to the next cell down and if there is no text to delete the entire row. I have the bricks I just cant build the house. I need the macro to do this for rows 8 to 500.
View 5 Replies View RelatedI have a spreadsheet which is created 2/3 times daily and I need a macro to do the following;
The columns are A To AJ, I need to delete all columns with the exception of columns M, N, R
Column M contains currency (GBP, Euro)
Column N contains dates
Column R contains various agent log ins, such as LI111222AB, LI222111JM, IFCTest & HOTAYLORL
The row number can vary (Average 1,000), I need to delete all rows that do not contain a log in which begins with LI in column R
Once this is done, subtotal by column R (agent log in), column N, & column M
I use the code below to delete the entire row that has the Text "Pc." in it. How can I make this delete the row with "Pc." plus the next row?
Sub PL()
Dim i As Long
For i = Cells(Rows.Count, "A").End(xlUp).Row To 1 Step -1
If InStr(Cells(i, "A").Text, "Pc.") Then
Cells(i, "A").EntireRow.Delete
End If
Next i
End Sub
I need search and clean the entire cell, with the word "MENOR". (in english is Minor). The problem is: The cells can contain the word "es Menor" or "Menor de edad" (the macro is in spanish) in english is "is minor" ". "You are a minor"...(I try but my english is not very good,)
View 4 Replies View RelatedWhat i'd like is a macro that will delete all cells that don't contain the word pagelibrary somewhere in the cell. As these are weblogs, pagelibrary can be in many different places in the link due to redirects etc, so the macro would have to be flexible with that word. All cells are only one column, in column A. Also if it is possible to delete everything before the word pagelibrary that would be helpful as well as some of these links are very long (and possibly duplicates due to capitalization and redirects).
I've done some searching and this code is the code that closest matches what I want to do. I am by no means a VBA expert; I can decipher a little of what code does, I just can't write it .
Sub DeleteRowEqualTo()
‘Hold Shift Key To delete rows Not equal To
Application. ScreenUpdating = False
Dim currentRow As Long
Dim lastRow As Long
Dim activeColumn As Long
Dim activeValue As String
Dim currentValue As String
lastRow = ActiveSheet.Cells.SpecialCells(xlLastCell).Row
activeColumn = ActiveCell.Column
activeValue = ActiveCell.value ................................
I am trying to write a code that would remove rows with any sort of letters in them. I have looked up other ways of deleting rows, but I cannot find the script that would encompass all (alphabetical) letters.
I want to have a function or macro that if cells have mingled bold text, that only the bold text shall remain in the cells, and all the rest of the text must be deleted.
View 4 Replies View RelatedI need a macro in excel which work like that "To delete all rows without specific text". and following macro for this;
What I need in this is that i have more than one values (highlighted with red in formula) so how i will do in this?
Sub DeleteRows()
Dim lRow As Long
Dim lLastRow As Long
'Change "A" to suit
lLastRow = Cells(Rows.Count, "A").End(xlUp).Row
[Code] .....
I have inherited a spreadsheet that has a text box and a radio form that I cannot delete for the life of me. I can't click to select either one nor right click to do anything. I have an "Approve" and "Reject" button on top of them and those work great. But how do I delete the others?
View 1 Replies View RelatedI need a code to delete all rows with "Complete" in Column D below Row 7.
View 2 Replies View RelatedPlease refer to attached file.
Column A have data and i need VB Code (Not formula) to check each cell in column A and delete any spaces and make sure that there is no spaces after end of the text.
As an example you can see Cell cell A15 thru A22 have spaces after the text so need to delete those spaces
Book1.xlsx‎
I am trying to delete part of a text string for a range of cells. The code I have so far deletes the first set of letters but is looking in every cell in the range.
Ideally I would like it to only look in the cells of col B where there is data then only delete the first 10 letters if the cell begins with "Service ID"
Sub DeleteServiceID()
Dim c As Range
For Each c In Range("B1:B1000")
c.Value = Right(c.Value, 10)
Next c
End Sub
i would like to be able to use a macro that will delete all columns in the sheet that do not contain one of 5 pieces of text in cells 1 to 20.
It is driving me mad, i have managed to find macros that delete empty columns, but they do not remove the columns that do not contain any of the 5 words. often the cells are empty down to row 5, when the data starts
I have put together a macro that will delete rows (called DeleteUnwantedRows) in a spreadsheet that contain the phrases "no further action" and "not applicable" ... However the macro does not appear to be working.
View 2 Replies View RelatedNote: The "Bread Type" column will ALWAYS be in row 1, BUT will ALWAYS be in a different column letter, so I would like this macro to find the "Bread Type" column by name rather than by column number. All criteria should NOT be case sensitive.
In the example below, rows 2, 4 & 5, have the text "Wheat" or "Rye" in the "Bread Type" column, therefore, all 3 of these entire rows should be deleted. Yes, I do mean the ENTIRE row, wipe these rows off the face of the earth