In cell A1 I would like to have a formula that indicates the number of times the word "Yellow Pages" appears in cells C10:C1000. The C column inidicates a referral source. So some of the cells will have "Yellow Pages" and some wont. In cell A1 I would like to have it tell me the total # of referrals from the lead source "Yellow Pages".
View 12 RepliesI want to pull data from my excel file (using VBA) into Ms Word. I created a template in Word and wrote a macro to do this, it worked, however, anytime a new row is inserted or deleted in my excel spreadsheet my macro produces wrong results in my Ms Word template because the cell position has shifted, thereby producing the wrong result. How do i make it that my result remain the same when new row is added to my spreadsheet.
Example:
Excel row1: vicky 528
row2: sam 532
row3: john 092
row4: Own 211 word template: 092
This is what happen next:
Excel (New row added) Macro: ThisDocument.ScreenedPatients.Caption = wb.Sheets("CSAs").Cells(16, 1)
row1: pat 542
row2: vicky 528
row3: sam 532
row4: john 092
row5: Own 211 resulting Word template(running macro): word template: 532
But I want John to automatically go on the Word template without going into macro to change it all the time when a new row is added.
I'm using the record macro function to make a code that is concerned with formatting information generated in excel by another software program.
My original idea was to replace the information in column F with the concatenated info of column F-L, but I couldn't get this to work either. So now I'm looking for a work around for my work around.
I can get the macro to work just fine with "Macro 1" below, but unfortunately when I use the entire column range, it populates thousands and thousands of rows below the (around 50) lines of information I have. However, the populated information in my sheet is completely variable - it could be 1 line or 5000 lines. These will also be printed, so I cannot just cap the range at 5000 because then it would print all of the blanks.
I tried several work-arounds after googling. I tried to leave the blanks and then delete them once they were populated - messy, and it crashed excel. I tried End(xlUp) and I tried using lngLastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
how to only copy the formula in Column M to the last row of information (which would be the row with the last value in Column A).
MACRO 1:
Columns("M:M").Select
Selection.FormulaR1C1 = _
"=CONCATENATE(RC6, "" "", RC7, "" "", RC8, "" "", RC9, "" "", RC10, "" "", RC11, "" "", RC12)"
Range("M:M").End(xlDown).Select
Columns("M:M").Select
Selection.Copy
Columns("F:F").Select
[code].....
MACRO 2 (Only the Changes):
ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Select
Range("M" & lngLastRow).Select
Selection.FormulaR1C1 = _
"=CONCATENATE(RC6, "" "", RC7, "" "", RC8, "" "", RC9, "" "", RC10, "" "", RC11, "" "", RC12)"
Range("M" & lngLastRow).Select
Selection.Copy
So I'm trying to create a macro that will simplify dealing with a file we receive at work pretty often. I've enclosed a spreadsheet that shows a very basic example of the files we receive. What I need to happen is this: On the rows that have only the Company # in column A and Total $ in column D (ie. rows 5 and 6), I need the Total $ amount moved up one row and then for the row it was previously in to be deleted (at that point that row should only have the Company $ and no other data in it so it's basically useless). The problem I'm having is that if any rows are added to the file (for instance if an row was added between rows four and five) it would throw off my macro.
View 3 Replies View RelatedI created a macro to save my spreadsheet into another book, but I first want to check if cells Z2 & Z3 are blank, and if Z4 = "$--k". If any of those conditions are true, I want a messagebox sent to the user to please fill in data in those cells, and exiting the sub( ) preventing the save from happening. The messagebox would say "Blank Info", vbOKonly button, Title would be "Fill in data".
View 2 Replies View RelatedI have an excel program that is supposed to count word instances in a word document. I can't seem to find the right declaration for a word document.
For example to declare a workbook in excel its
Dim wb As Work Book
I've tried
Dim doc As Word.Document
'or
Dim doc As Word.Application
as shown in some of the forum posts, but an error user-type not defined keeps displaying.
I have 5 columns set up: A,B,C,D,E
D is the sum of A and B
E is the sum of A,B,and C
As I add in a new column to the right of C (call it C2), I need D (which has shifted over one) to sum A,B, and C.
I also need E (which has also shifted over one) to sum A,B,C, and C2.
Essentially I need a function in a cell that will be able to reference two cells to the left even as more cells are added.
We have created a macro that basically looks for rows that contain an "H" and hides the row if it does.
Users can add new rows throughtout the year to this spreadsheet. and based on certain criteria, an H or U will be placed in a hidden column which the macro looks at and hides any row it finds an H.
The user has to click on the button that has the macro assigned to it once they have finished working on the spreadsheet.
The problem we're finding is that for users who insert/delete rows, once they click the button it takes up to 15 seconds to run through macro (which is ok). However, users who haven't added or deleted any rows and who click the button, they have to wait upto 5 minutes (which isn't ok) for the macro ro run.
We can't figure out why the macro takes longer to run when no changes have been made?
See the attached sheet. I am trying to add together two figs which are linked to calculations which have formula built in to stop error messages when there is a 0 / 0 = #value type error. However when these two cells are added, if the cells are blank I get an error message. And if only one cell has a value, I get "" with my existing formula. what I need to do to get a result of 7 if for example cell A4 = "" + B4 =7. At the moment my formula shows "" in the sum total of these cells
View 5 Replies View RelatedI'm trying to create a formula that will added the correct amount in the correct cells, I have create a dunny sheet in trying to achieve this. If Cell B8:B11 = ABS or Dum that any points won should be added to Cell L8:L11 right now its adding it into K8:K11. If Cell B8:B11 = is Blank any player points should be added to cells K8:K11. I'm using this formula throughout cells K8:K28 =IF(J8>J25,1,IF(AND(J8<>0,J8=J25),0.5,0)) Any thing in red is incorrect anything in blue is what I'm trying to achieve.
View 4 Replies View RelatedI am setting up a charity accounts sheet, that will also calculate money raised from Raffles, so each raffle will have a name, I can do this by matching the amount with a description but wondered if I could calculate it by looking for specific words or reference in a cell
Sum all cells that the adjacent cell contains the reference "Raffle 0001" but not "Raffle 0002" this needs to be calculated on another cell
Sum all cells that the adjacent cell contains the reference "Rescue" this cell could contain other text as well, so could say "Rescue for Sweetie by Laura Herarty" or "Rescue for Bliss by Jane Telford" all need to be calculated.
I'm trying to write a word or more but i want it to be in different cell.
Like: this sentence "Excel Program" write it in cell a1 but it slip to the cell a2. (so in cell a1 adn a2 this sentence).
I have hundreds of lines with unique tasks in each cell. I wanted to add 'P&C- ' to the front of each task and do not want to go through and add individually as it will take take.
Is there anything that can place in one cell and just drag to the last cell and complete?
E.g.
Current Cell: Task A
What I need: P&C- Task A
I cannot add attachments as my work seems to have a restriction on doing it and always asks for admin password
Is possible to make a script that search for a ”Word” in cells with more than one word?
View 9 Replies View RelatedI would like to automate this process that I'm doing currently through the "Text to Columns" function.
Basically I have various cells that contain many worlds such as:
FRESH LUNETTE SOLEIL REES 1'S
INFOKUS SOLEIL LECTURE LUNETTES 1'S
KENSIE LUNETTE SOLEIL ELEORA 1'S
KENSIE LUNETTE SOLEIL ELIZABETH 1'S
KENSIE LUNETTE SOLEIL JAMES 1'S
KENSIE LUNETTE SOLEIL VESPER 1'S
KIDS LUNETTE SOLEIL HOUSTEN 1'S
KIDS LUNETTE SOLEIL MINNIE 1'S
My goal is to separate the first world from the rest of the words in one cell.
Since all of the words are seperated by space, I use the the "Text to Columns" function and separate the words, so that I can get the first word into one column. The rest of the words have to be merged again through "Concatenate".
What I'm looking for is a VBA code or Excel function that can identify the first world (which vary in character lengths) and put it into one column.
I am trying to find a formula that will give me a word count in specific cells.
View 14 Replies View RelatedI would like to do a text split for the name only in cells where contains the word "Name". For example: Name A&A Enterprize
Text split function for it is =MID(A1,FIND(" ",A1)+1,255)
so it only recognizes A&A Enterprize.
How would I add an IF, Then function (If the any cell contains the word Name, apply the text split function, for cells don't have the word Name, just leave it blank) if i have to do this for a large data file so i dont have to copy this function for every cell that contains the word Name.
This does not seem to be working and I do not know why.
If Range("T3:T999").Value = "Duplicate" Then
MsgBox "It did work"
Else
MsgBox "What happened??"
End If
How can I delete all rows that have a cell that starts with the letters APP
View 3 Replies View RelatedI need a macro code that will edit cells containing links similar to this one "[URL]..." by adding "/current" at the end of them. There shouldn't be any space in between. There are over a thousand of them, and I think this would save me time,
View 9 Replies View RelatedI have a range of cells that contain numbers. In column a, row 3 is where the numbers start and they populate over to column f. I normally have 7 or 8 rows of numbers but this can change. The last row in the first cell has the word 'analysis' I need to copy each row, columns a to f, until I hit the word 'analysis' in the cell which will be in column a. I then need to paste these cells data into another sheet.
View 9 Replies View RelatedI am trying to figure out a formula which will search the contents of 6 cells (o2, p2, q2,r2,s2,t2) for the word "sugar". If it is found in either of these cells, I would like the formula to result in "true" or "yes", if not, "false" or"no" would be the result.
Cells (o2, p2, q2,r2,s2,t2) contain text which can include the word "sugar" but will never contain only the word sugar.
I want code to count cells that contains only specific word like ( do)
View 4 Replies View RelatedIn my column B, I have different words like Balance, Notes, Expense, etc. Is there anyway I can look into column B, and if I get the word Expense, then take the number directly to the right of it (from column C) and SUM it? Not sure if it matters, but let's say I want to put it in cell C2. I figure this will allow me to do this like insert, delete rows in the future, but my equation in cell C2 will still add up what I need.
View 2 Replies View RelatedHow can I sort across 2 columns?
As an example.. If I have the word "Text" placed in columns A and B at various rows (mixed with other words)
What sorting order can I use that will sort the entire row, based on both columns A, B. ( would like initiate via vba script)
Begin with this:
A , B
.....,.....
.....,.....
Text,....
.....,.....
.....,.....
.....,Text
.....,Text
Text,.....
.....,.....
.....,.....
.....,Text
.....,.....
Text,....
After sorting order:
Text,.....
.....,Text
.....,Text
Text,.....
.....,Text
Text,....
.....,.....
.....,.....
.....,.....
.....,.....
.....,.....
.....,.....
I try to search for only one word/phrase in range of cells. I would like formula to return the cell value that contains work/phrase I asked to look for.
For example: A1 contains "Apple", C1:3 contain "Cherry juice", "Apple pie", "Orange bonbon". I want D1 to check which cell from range C1:3 contains word/phrase from A1 and show it to me - "Apple pie".
I have a column for "Comments". Is there a way to make each cell work more like a word document? ie. paragraph formation, tabs, etc.
View 2 Replies View RelatedIn the attached workbook the classify macro reformats data. Can a line of code resize the cells to the largest word in the cell?
Example.xlsm‎
I need to find the word 'numeric' in the merged cells of first row (always first row) and to select its corresponding 2nd row data using macro. In the attached file, M2 to P2 data to be selected.
View 3 Replies View RelatedI am drawing a total blank here, lets say I have a column of cells:
A1 ("Word")
A2 ("No")
A3 ("No")
A4 ("Word")
A5 ("Word")
(they all have words in them). How can I return all cells (an array?) that contain a specific word?
=COUNTIF(A1:A5,"Word")
returns: 3
That function is almost perfect, except that returns a number - I need this to return an array of all of those cells that contain the word. Because I have another function to run after that takes in cells and THEN counts how many are a certain color (this one already works) - so it obviously cannot take in a number, it needs a list of cells
So it should return:
A1,A4,A5
But I'm not sure in what format