Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
  Advanced Search
  HOME    TRACKER    Excel


Word Art Will Not Delete

There is a word art pic in my excel file and i tried all options to get rid but could not do it.

View Complete Thread with Replies

Sponsored Links:

Related Forum Messages:
Delete Everything In Cell Beyond First Word
I'm trying to figure out the best way to pull information from different worksheets. One field which I require has slight alterations between the sheets. I'd like to delete everything in the cell except for the very first word.

Here is a simple example (and I'd have this all through column A for instance)

Cell A1 = Multiple words here

Lets say I want to delete everything in the cell except the word "multiple"

View Replies!   View Related
A Macro To Delete A Row That Does Not Contain A Given Word
I am trying to find a macro that deletes a row that does not contain a given word or string.

For example, if a row does not contain the string -> then delete it or even better select and move all such rows to another worksheet so that the main worksheet is left only with rows containing the string.

View Replies!   View Related
Delete Specific Word From String
I want to delete a specific words from string but i have a problem with the code below. For example, i wan to delete the word "Inc" only but the problem with my code is that it is deleting from "Incorporated" too and i want only the code to delete only if it finds the word "Inc" only.

View Replies!   View Related
Delete Row When A Selected Word Is In A Sentence
i have this macro that currently looks in column J and if a cell contains "Total" it deletes the entire row.

Now what i need is to check in same column but i need it to delete the entire row if any part of the sentence in a cell within column J contains "Main Total"

Sub Macro1()

'this deletes all rows if cell in column J says "total"

Dim DeleteValue2 As String
Dim rng2 As Range
Dim calcmode2 As Long

With Application
calcmode = .Calculation
.Calculation = xlCalculationManual
.ScreenUpdating = False
End With

View Replies!   View Related
Automatically Delete Rows That Contain A Certain Word
I can trying to let the user type a word in to cell A1 and then have Excel remove the rows that contain the word. But VBA below just seem to delete all nonblank rows?

sub delete2()
For Each cell In Selection
If cell.Value = A1 Then
End If
Next cell
end sub

how I can update this code?

View Replies!   View Related
Delete Entire Row If Specified Word Exist
In range A1:A300 I have a lotof words. What I want is to delete entire row if the cell value is Open date

View Replies!   View Related
If Cell Contains The Word Delete Entire Row
Looking to write a macro to delete an entire row if the word GROWTH is found in any cell under Column C.

View Replies!   View Related
Macro To Delete Merged Rows According To Key Word
I have got an excel sheet with 2 columns A and B.

Column A's rows are merged according to column B. E.g.

Column A:

Row 1-7 (merged) Ron

Column B:

Row 1: New Jersey
Row 2: New Delhi
Row 3: New Jersey
Row 4: New York
Row 5: New York
Row 6: New Jersey
Row 7: New York

My result should be like:

Column A:

Row 1: Ron

Column B:

Row 1: New York

and similarly for other rows also.

PS: The no. of rows merged for column A can be different.

Also the keyword that should be present in Column B should be according to hierarchy, New York, New Delhi and then New Jersey i.e. first the macro should check for New York, if its present (in 1st 7 rows according to example given) then New York should be written in Coulmn B, if New York is not present then it should check for New Delhi and New Delhi should be written in Column B and if New York and New Delhi both are not present then it should check for New Jersey.

There are only 3 keywords which need to be checked i.e. New York, New Delhi and New Jersey.

If these 3 keywords are not present then the macro should not do anything.

View Replies!   View Related
Delete Rows :: Where Specific Word Appears
I have a spreadsheet that I need VBA Code to do the following

1) Delete all rows where the word totals appears in Column B for eg "Totals for Vehicles Stocked in 0706" "Totals for Vehicles Stocked in 0707" etc

2) Delete all rows where the value in col m is less than 45

I have written the code, but cannot get it to work-see my code below

Sub Del_TOTALS_Underaged()
FinalRow = Cells(65536, 2).End(xlUp).Row
For i = FinalRow To 1 Step -1
If Cells(i, 2).Value >= "Totals" Then
Cells(i, 1).EntireRow.Delete
If Cells(i, 13).Value < "45" Then
Cells(i, 1).EntireRow.Delete
End If
End If
Next i

End Sub

View Replies!   View Related
Macro To Look For A Specific Word And Delete Rows
I need to build a macro which will look for a specific word say :"ABC" in a particular column say "B" and delete 5 rows including the row containing the word "ABC"

View Replies!   View Related
Delete Range Names Containing Specific Word
the active sheet contains a number of defined named ranges. i would like to delete range names beginning with "Sales", yet the number of defined ranges changed from sheet to sheet = for example, Sheet1 may have 3 defined ranges (Sales1, Sales2, Sales 3), Sheet 2 may have 1 (Sales 1). Is it possible to included a wildcard search in the following code?

Sub DeleteRangeNames()
Dim RangeName As Name
For Each RangeName In Names
Next RangeName
End Sub

View Replies!   View Related
Opening Word & Count Word Instances In A Word Document
I 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
Dim doc As Word.Application

as shown in some of the forum posts, but an error user-type not defined keeps displaying.

View Replies!   View Related
Delete The Rows Until It Meets A Cell With The Word "Date"
I am trying to make a simple program that will go down column A deleting the rows until it meets a cell with the word "Date" in the A column. When it has found that row I want it to delete that row also and then stop.

This is what I have so far

Sub FindAndDelete()

Dim row As Integer
Dim col As Integer


If Range("a1") "date" Then Rows("1:1").Select
End Sub

I tried defining row =1
col = 1

and then going if range ("rowcol") but no joy.

View Replies!   View Related
Export Cell Contents To Word Fields In A Protected Word Document
Is it possible to export Excel cell contents to Word fields in a protected Word document? For example...

What code would be needed to tell Excel to open up, copy and export the contents of A2 in the active sheet of a workbook to "Field 2" in a Word document named "Report 01" and then put the contents of B2 to "Field 2" etc?

Do both applications have to be opened up at the same time or is Excel able to open up Word on its own? Will the macro be able to....

1. Automatically open up the correct Word document?

2. Look ONLY in a certain folder for the "Report 01" Word document?


Bring up a "selection" box that allows you to select the document you wish Excel to export it's data to?

3. Close and save the Word Document without any user intervention?

View Replies!   View Related
How To Search For A Word In A Column And Have Entire Row Opaque Once Word Is Found
I need my macros to search for the word "Cancel" or "Cancelled" in columns "T" and "U". Once found, I need the macros to make that entire row an opaque shading.

There will be other wording in these cells that contain "Cancel" or "Cancelled". Is it possible for the macros to search in the sentence and find the words "Cancel" or "Cancelled"

I started on the code below but am stuck.

View Replies!   View Related
Using The IF Function, To Make Entering A Word, Space Then Word Correct
How can I use the IF function, to make entering a word, space then word display correct and incorrect if not.

View Replies!   View Related
Find A Certain Word In A String Then Return The Number Associated With That Word
Have problems using find and the Dictionary
What Im trying to do is find a certain word in a string then return the number associated with that word

View Replies!   View Related
Replace Word In MS Word With Varable From MS Excel
I am in the middle of automating a process here at work, the program takes a word, "pencil" for example, from excel. It will then open up a word document with content already in it (premade template). The program will then find all instances of a string, "placepencilhere" for example, and will replace that instance with the string from excel.

Basically I want to be able to take a variable that has a stored string value from excel and use it to replace another variable in a word document.

I tried recording a replace (ctrl+f, replace tab) macro, copying the code, and inserting it into the excel vba code.. but I get a error message. Here is what I have:


View Replies!   View Related
If Word Is Contained Within A Cell, Ouput That Word In Another
I have a bunch of cells in column b that have products.

Column B
Dell 24" lcd
vaio sony laptop
8.0 mpxl kodak camera

Basically in Column A I want a formula that'll say.

If the word "dell" is somewhere in cell b1, then put the word "Dell" in cell a1.
If the word "sony" is somewhere in cell b1, then put the word "sony" in cell a1.

And then so on and so forth down through column A. The brand names are potentially endless, so is there a easy way to on like a seperate sheet make a list of brand names and have it pull from there?

Originally I made a if function that said if the brand name was contained in the cell then output the brand name, but that caps at 7 for the amount of brands i can use....

View Replies!   View Related
Word 2 To Be Bumped Over To The Next Column And Word 3 To The Column After That
I've imported a lot of data and it looks like this:

blahblahblahWord 1 Word 2 Word 3

First, I want to erase the "blahblahblah"

Second, I want Word 2 to be bumped over to the next column and Word 3 to the column after that.

Is there a formula to do this? There's so many rows of data that it will take a long time to do it manually.

View Replies!   View Related
Delete Multiple Columns By Column Name No Criteria Need, Just Delete Them
I would like a macro to find the columns named "apple" and "peach" and delete them. These would always be in row 1 but would always be in different column letters which is why I want the macro to simply find these columns by their name and not by their column letter.

And yes, I do mean the entire column altogether, shifting entire columns to the left. Wipe it off the face of the earth

View Replies!   View Related
Delete & Merge Columns,Delete Rows With Filter, Etc
1. Remove J,K,N,A Columns,

2. In the last O (TIMESTAMP) column, the date is 14-Jul-09 format change it to 07/14/2009 (this format mm/dd/yyy

3.Filter L column (VAL_INLAKH) Remove all rows from whole sheet which has 0 value

4. Column C (EXPIRY_DT) date format is 24-Sep-09 , "dd-Sep-09" change to "Sep" only

respectively )

View Replies!   View Related
Search For Text Delete This Row And Delete The Row For Every Instance
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.

View Replies!   View Related
Delete The Columns First Then Rows Will Not Delete
Is there a limit on the number of rows and columns that can be deleted in a macro on Excel 2003? I am trying to create a macro that, amoung other things, delets 1119 rows and 54 columns. If I delete the columns first, the rows will not delete. If I delete the columns first, the rows will not delete.

View Replies!   View Related
Delete Duplicate Entries, Keep Last And Delete First
I found this sample code that works from top to bottom of a spreadsheet. But I need something that will delete the first entry and keep the last entry. My data is sent from one spreadsheet to a Master and sometimes the details can be sent twice, if the responsible person forgets to enter one line of production. The criteria should be the first 5 Columns of the sheet.

Sub Dupe_Killer()
Dim str As String
Dim str2 As String
Dim c As Integer
Dim i As Integer
Application. ScreenUpdating = False
Application.Calculation = xlCalculationManual
rw = Cells(2, 1).End(xlDown).Row
'Sort Data by Date, Location & Number
Range(Cells(1, 1), Cells(1, 14)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Sort Key1:=Cells(1, 1), Order1:=xlAscending, Key2:=Cells(1, 2) _
, Order2:=xlAscending, Key3:=Cells(1, 3), Order3:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ ....................................

View Replies!   View Related
How To Take The First Word / Name
How to get the first name or word from "Jake Madrigal Cortez"...

View Replies!   View Related
Remove The Word
how to automatically remove the word " Total" that Excel puts beside what you are totalling while using a subtotal?

For example, I am totaling a value of orders for one company and Excel puts "COMPANY NAME Total". Or is there a way to use the Right function to delete the 5 last letters of text in a cell? I've tried using the right function but can't seem to get it to work to delete text...

View Replies!   View Related
Word Substitution
I have a list of abbreviated words in product descriptions (about 6,000 items), need to replace with proper words. I am now doing this with Edit, Find, Replace and I check the list manually with my eyes in order to avoid replacing wrong words. It is very, very time consuming (I've already spent 2 days on this job).

Just wonder if there is any way to do this faster and more accurate.

View Replies!   View Related
Extract 2nd To Last Word
How do I extract the second to last word from a string of text in one cell and put it another.

View Replies!   View Related
Extracting The First Word
How do I extract the first word of a cell contents?

For example, cell A1 has "John Smith"
I want cell B1 just to show "John"

Obviously, the first word would be of varying lengths, so I'm guessing the formula would need to find the space.

View Replies!   View Related
Excel To Word
i have a set of data in excel.. i want that, when i click a command button on an active worksheet, it will be transferred in ms word all the data found in excel.

View Replies!   View Related
How Numbers From A Word
Well it look pretty simple but is it possible.

What I have is a list of code.


All the numbers at the end is unique. So what was planning to so is just take the numbers out. As you can see is range from 3 to 5 number. Is there a formula to just pull the numbers out? max

View Replies!   View Related
Un-scramble Word
I have one alphabet in each cell (assume 5 rows and 5 columns has different alphabets).

The VBA code should suggest all the possible words which can be made using these alphabets. Words can be formed only if the letters are in a contiguous chain (up, down, right, left, cross) - any contiguous combination. The word should be a valid english words.

View Replies!   View Related
Link Between Word
it's possible to create a LINK btwn Excel & Word.

For example: If i create a worksheet with Product Prices, i would like to reflect the same product prices on the MS Word. (so that i don't have to manipulate Word doc.)

View Replies!   View Related
Generate A Word Doc
I have a macro here that is not working becuase User-Defined Type not Defined. I think i understand it but i want to make sure and if there is any advice for the macro below even better.

what is in red below is what i think i need to identify as Type /end Type.

these are named cells from my data page.

Sub Makeworddoc()
' create a word doc
Dim wordapp As Object
Dim data As Range, message As String
Dim Notes As Integer, i As Integer
Dim Participant As sting, POC As String, phone As String, Email As String, Staff As String
Dim Contact As String, When As String

The rest of the macro is

' Collected information from worksheet
Set data = Sheets("data").Range("A13:G13")
Notes = Sheets("data").Range("notes")
' updated status bar
Application.StatusBar = "Creating Word Doc."
' assign current data to variables.............

View Replies!   View Related
Extract Nth From Last Word
I have a cell with a postal address.

eg -

cell a1 = 'offices, 89 high street, anstey, leicester, leicestershire, le7'
cell a2 - 'flat 41, first floor, 21 church lane, quorn, loughborough, leicestershire, le12 7zx'

i want to be able to extract the county name, which always appears between the penultimate and last comma.

I have tried
=LEFT (a1, FIND(",",a1)) which gives 'offices'
=RIGHT (a1,FIND(",",a1)) which gives 'le7'

View Replies!   View Related
Put A Word In A Cell
Using the IF function in cell B1, if a condition is true in cell C1, How do I get Excel to put the word "Leave" in cell A1

View Replies!   View Related
Extra Word
How do I trim an extra word. I downloaded a list with an address field and it has an extra city in the address. Ex. 908 Taylor St_Wake Forest_Wake Forest
How do I get rid of the duplicate state?

View Replies!   View Related
Embeded In MS Word
I have written some VBA that trigger on different events that happen in Excel. Things are working fine. But I face some issues when the excel is embeded in a Word Document.

Actually I dont even want these events to be triggered when the excel is inside a word.

How to I identify from the Excel, if the current instance of excel is inside a Word object so that I can stop the execution of all my code.

View Replies!   View Related
Writing To Word
if I have another instance of word open my macro will not work correctly. I am at a loss on how to figure this out. Also some times I get the error of virtual machine is not available when getting

Sub TestTemp()
Application.ScreenUpdating = False

Dim bname as string

bname = Range("B6").Value

Dim WdApp As Object, WdDoc As Object
Set WdApp = CreateObject("Word.Application")
WdApp.Documents.Add "C:TemplatesTest"
Application.Visible = True
WdApp.Visible = True

AModDoc = ActiveDocument.Name

Documents(AModDoc).Bookmarks("Line1").Range.InsertBefore bname

Application.ScreenUpdating = True
End Sub

View Replies!   View Related
Get All The Characters In Between The Word EA
cell A1 contains:

001001 28 EA 12 CATALOG #: 9358171

I would like to get all the characters in between the word EA and CATALOG and put them in B1 and so on....

View Replies!   View Related
Word - Charts
Excel / Word 2003.

I am exploring yet another avenue of vba coding that i am not familiar with.

I have a template word document that i am wanting to fill with items (be it cell values or charts) from an excel file.

I am looking at the coding examples on the net and i am slowly getting there. However i seem to be unable to copy a chart from my excel file and copy into word. I need to be able to specify a specific position on the word document too.

View Replies!   View Related
Give A Word A Value?
Im trying to figure out to give a certain word a numeric valuve in excel?. Lets say that the word "car" has the valuve of 10, and the word bus has a value of 20. Have found one possible way to get around being forced to give a certain word a value by doing alittle macro, but havent got it to work yet (and im not sure if its even possible to get it to work), I have a post in the macro section about it.

View Replies!   View Related
Word After Last Specified Character
I am new to Excel and just starting with formulas. I am wondering if a formula can handle the following:

We have a column that has a url in each cell. Example (I removed the http:// before it so that all the words show up and it doesn't change to a clickable link):[/url]

We would like to tell it to copy the portion after the last forward slash and until the period and put it in another cell. In the above example it would give us sylvantropicalbirdi. We then would want to append a _t to it.

Is this possible or am I just wasting my time trying to figure it out?

View Replies!   View Related
Count Same Word
how do i find the number of times the same word is used in cells from C3 to

View Replies!   View Related
Open XL From Word
I've took on a task that I stupidly volunteered myself for since no one else will.. including our development or IT team will seem to get completed.

Here's my dilemma:
User has information in Word that needs to go to XL WorkSheet. It has been formatted with tabs so that the information is copy and pasted into individual cells. To avoid human error, I want XL to open with a fresh workbook so that the information can be pasted into it with the Macro being run from Word.

I've searched everywhere to look for code to open XL up from Word and cannot find anything.

Will it be possible to open a new workbook and paste that information all with a macro from Word? Or will I need to trigger a macro in an already saved workbook?

View Replies!   View Related
Print To Word
I would like to be able to take an Excel file (which is a shipping summary) and print whatever is in designated cells to a Word file and then print from Word - all by adding a "Print" button at the end of each row.

I have attached the file for viewing... The idea is to create addresses from the spreadsheet to fill an 8.5 x 11 piece of paper (just to give you an idea of size). I would like the layout in word to be landscaped and centered.

For example:
I guess I would need a way to pick multiple cells if needed in the future and some code to format the text, etc..

I have stumbled around a little bit but not acheived a fully correct macro..

View Replies!   View Related
Save To Word
I have on sheet 1 of my workbook titled "Self Audit" two pages that have been formatted with questions, and a comments page to put reasons for any descrepancies. Since everyone in my department seems to be more familar with word documents I was wondering how to via VBA put these two pages into a word document that they can type into. Is there a way to do this? I tried a simple copy paste just to see how it would work and I can type but it stretches it into 3 pages.

View Replies!   View Related
Get The Last Word In Phrase
I'm doing a macro to get the last word in a phrase

View Replies!   View Related
Remove First Word In A String
How can I remove everything to the left of the first space in a String? For exapmle - 'Mr Adam Bill' should become 'Adam Bill'

View Replies!   View Related
Copyright 2005-08, All rights reserved