Pick Word From Excel Search In MS Word And Replace All

Jan 4, 2012

I am trying to automate the below process:

1. I have a excel file with Japanese words in column A and their English equivalents in column B.

2. I am trying to create a Macro and assign it to a button. On pressing the button Macro should be able to:

3. open a form where I can enter location of a word file.

4. Macro should open the word file specified in (3).

5. Macro will pick up first Japanese word from excel file (Sheet 1 - A1)

6. Search for that word in Word file

7. Replace the Japanese words in Word file with their English equivalent from excel (B1)

8. Then it should search for second word (A2) and replace with its equivalent (B2) and so on till it reaches last filled cell in excel file column A.

After a lot of search I could find a code from net (Below), made a few changes, but it is not working.

========================================================
Private Sub OK_Click()
' Requires a reference to Microsoft Word xx.x Object Library
Dim sFile As String

[Code]....

View 1 Replies


ADVERTISEMENT

Replace Word In MS Word With Varable From MS Excel

May 1, 2009

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 11 Replies View Related

How To Search For A Word In A Column And Have Entire Row Opaque Once Word Is Found

Sep 3, 2009

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 14 Replies View Related

VBA - Find / Replace Excel Variable In Word

Apr 7, 2012

I have never used VBA in word before, so I am assuming I am making it more complicated than it needs to be. I have a macro that stores 20 excel values as variables, then opens up a word document. I want to replace values in word with my values in excel. I keep getting an error with the replace part. I do not want to use bookmarks or mail merge. MSWord is a reference in excel VBA.

Code that stores excel variables (Example: Var1=Data1 and Var2=Data2)...
'Opening up the correct word document
Dim WdApp As Object, WdDoc As Object
Set WdApp = CreateObject("Word.Application")
WdApp.documents.Open ThisWorkbook.Path & "" & Range("D1").Value & ".doc"
WdApp.Visible = True

[Code] ..........

View 9 Replies View Related

Excel 2003 :: Use Find And Replace To Delete Word?

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

Excel 2003 :: Count How Many Times A Word Is In A Range / Word Can Be In Cell More Than Once

Feb 16, 2012

I need to count how many times the word Test is in the range B4:H9 with

Range N2 = Test the formula below works if Test is only in the cell once.

=COUNTIF($B$4:$H$9,"*" & N2 & "*")

But I have data in cells like below, this is all in one cell, so how would I have it count all the times test is in the range when some cells have test 2 or more times in a single cell?

5
Test
8am-2pm
Test
5pm-10pm

View 5 Replies View Related

Search Word In Given Column In Excel

Apr 27, 2012

I want to search value from given column "D" in Column "A" and want to give numbering to similar value.

Any Macro/Formula for this.

Name
Num

Search value
Index NO
wer
123

[code]....

View 2 Replies View Related

Opening Word & Count Word Instances In A Word Document

May 26, 2006

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
'or
Dim doc As Word.Application

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

View 2 Replies View Related

Find Word And Pick Up The Code?

Jan 18, 2014

I have codes (of three, four, or five digits) in Column A,names in column B, and names in column G.

The names in Column B and Column G are the same ones, but not in the same order, and they do not repeat exactly the same (e.g. I can have "Peter" in A10 and "Peter Jr." in A62, but not "Peter" and "Peter" again.

Each code belongs only to one name and never appears twice.

In K I want a formula that does the following:

K1: if the name in G1 is found anywhere in Column A, then bring the code that belongs to that name in G1.

(E.g.: If I have "Peter" in G1, and then "Peter" is found in B16 with the code "100" in A16, I want the code "100" of the A16, to come to K1).

View 2 Replies View Related

VBA: Search Function: Which Shows An Input Box Where You Can Enter A Word To Search For

Sep 9, 2003

I'm from Bavaria, Germany. Right now, I am doing an internship for my studies. my problem: I need a search procedure which shows an Input Box where you can enter a word to search for. It should work like the original Excel search (Ctrl-F), but with a simpler design, like with my own Text "Enter your Query" and a Button "Submit Query" / "Quit search". Is there the possibility to Highlight the Search Target? The problem hereby is that this highlighting should not be permanent. That means the user sees the target for which he searched for, the cell highlighted in a different color, etc. But as soon as the user clicks onto another cell, etc., the highlighting vanishes. If there is no fitting match, there should be a MessageBox like "Sorry the Target xyz cannot be found"

View 9 Replies View Related

Replace A Letter With A Word

Aug 10, 2009

Column A has cells showing either Y or N I want Column B to take a Y and convert it to a Yes and N to No. I tried an IF statement but it wont seem to work.

View 2 Replies View Related

Replace Word In A Sentence?

May 14, 2014

I use the following code. I want to make Replace only in the case which there is a whole word in a part of a cell, but not in part of specific characters.

Example: In the code i want to replace the word "to" but replaces all the words that contains "to". For example in the word together lets only the characters gether, and in the word tonight lets only the characters night etc.

[Code] .....

View 4 Replies View Related

VBA To Replace One Word In A Cell With Another

Feb 26, 2014

I found the below code and have tried adapting it without success.

Code:
Sub Colorize_Word()
Dim Found As Range, FirstFound As String
Dim FindWhat As String, MyColor As Long, Counter As Integer

MyColor = 3

FindWhat = LCase(InputBox("Find what word?", "Color word"))

[Code] ..........

This code finds any string in a cell of your choice and colors it red. I would really like to replace the string with my own string of text. I couldn't use the simple find and replace function as this replaces the WHOLE cell content not just one word.

I believe the line of code that needs editing most is this one

Do
Found.Characters(Counter, Len(FindWhat)).Font.ColorIndex = MyColor
Counter = InStr(Counter + 1, LCase(Found), FindWhat)

But I cannot figure out how to use the replace function with this.

View 7 Replies View Related

Find And Replace Whole Word?

Mar 31, 2014

Looking to build a simple find and replace with an added condition that it must match the whole word since some of my data appears as below:

abc.abc_no

I am trying to replace abc with alphabets and I need the result: alphabets.abc_no not alphabets.alphabets_no.

What do you think the best approach to this would be? All my data that I need converted is in one column (Column C) which are thousands of rows long and on another sheet I have a list of the conversions I need to do (about 150 - columns A and B) setup like:

A |B
abc|alphabets

View 1 Replies View Related

Replace Second Word Of A String

Dec 9, 2007

I need to replace the second word in a cell with another,

eg in cell AI1 I have Black Box.

Which formula would retain the first word, before the space and replace it with another, eg

View 3 Replies View Related

Search Word For Text And Send Values Next To Text To Excel File

Apr 30, 2009

I am using Windows XP and Office 2003.

I am looking to automate a process where information is sent to someone in a text format and they in turn transfer that data to an excel file. It basically looks like this (but includes a lot more info):

Service Request #: 123456
Instrument Type: New Instrument
Lot/Serial #: 123456
SR Type: Product Complaint
Service Coverage: Maintenance Agreement

The info on the left (text preceding the colon) is always the same but the values following the colon can change. The excel file has all of the text before the colon and they just enter the information into the cells. I am looking to make it so that an Excel macro (or maybe a word/outlook macro) automatically scans the text document and sends this info to the exact same cells in excel every time.

The text file is actually a message from an Oracle database and I am not going to be able to make any changes to the way the data comes in.

View 9 Replies View Related

How To Replace Repeated Word In Same Sheet

Jul 16, 2007

I create a monthly excel sheet regarding customer & their payment
like this..
Suppose..

Month January 2007
Customer A 2000
Customer B 2000
Cust C 3000

Feb

Cust D 3000
Cust E 4000
Cust A 2000

Mar

Cust B 2000
Cust A 2000
Cust G 4000

Now, I want to do somthing like that If a customers Name repeat in another month, I mean Cust. A name has been already entered in Month January & if it comes again in february then it should be automatically replaced or highlight with red line Or something like that.

View 10 Replies View Related

Macro To Replace Word In Formula

Jun 24, 2014

I need to replace part of a formula. I need to delete the workbook reference: "[Combined Flow2.xlsm]". I need to do this for range A1:Z100 and this is what I record when deleting them one at a time:

[Code] ........

How can I do this to delete it from all worksheets for the range A1:Z100 besides one at a time.

View 4 Replies View Related

Replace Some Of The Text In Word (Docx)

Oct 29, 2011

I have a VBA that opens a word document where I have a standard text, and some of the words are ment to change depending on who customer we have in mind.

It seems a bit unstable, sometimes it takes half of the words, if I add a sign like a comma after the word it seems to catch them better and manage to replace them.

Right now it doesn't change any of the words....

This is is:

Code:
Option Explicit
'the document
Dim Inv_doc As Object

[Code].....

View 5 Replies View Related

VBA Macro To Find And Replace In Word

Jul 22, 2009

The error is a Run-Time 450 (Too many arguments or invalid property assignment), when I click debug it highlights With Selection.Find

Sub TestTemplates()
Dim s1 As String
Dim s2 As String
Dim s3 As String
Dim appWD As Object
Set appWD = CreateObject("Word.Application")

Sheets("Sheet1").Activate
s1 = ActiveSheet.Range("Name")
s2 = ActiveSheet.Range("Add1")
s3 = ActiveSheet.Range("Add2")

appWD.Visible = True
appWD.Documents.Open Filename:="C:UsersRemy LabueDocumentsCareCore WorkTest Letter TemplatesTest Letter 1.DOCX"

Call DoFindReplace(FindText:="(1)", ReplaceText:=s1)...................

View 9 Replies View Related

Replace Part Of The Word In Cell

Apr 16, 2007

I have a worksheet - sheet 1 like below:

00001 - $2000
00002 - $3150
00004 - $2010
00001 - $1011

I would like to look up customer number (such as 00001) and replace to Peter

sheet2 like:

00001 Peter
00002 Marry
00003 John
00004 Mac

Expect Output:

Peter - $2000
Marry - $3150
Mac - $2010
Peter - $1011

View 8 Replies View Related

Formula To Replace One Word With Other (IF Condition Not Working)

Feb 24, 2014

I want to change country name 'California' and 'Belziuma' with new country name as 'USA' in column B2.

Similarly change country name 'Moscow' with new name 'Russia'.

If cond not working.

View 1 Replies View Related

Replace Cell Text Leaving 1 Word

Jul 10, 2007

I am looking for a syntax or function wherin i can replace all lines in different cells containing specific string or text in it. e.g. Few cells in sheet contains " This guy is for deployment", other few cells may contain "guy is for core deployment" and other cells may have " project is specific deployment". I want to replace all such lines which contain a word "deployment" with ony one word "Deployment".

View 7 Replies View Related

Export Cell Contents To Word Fields In A Protected Word Document

Jul 6, 2009

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?

or

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 2 Replies View Related

Using The IF Function, To Make Entering A Word, Space Then Word Correct

May 6, 2009

How can I use the IF function, to make entering a word, space then word display correct and incorrect if not.

View 13 Replies View Related

Replace Like Words In Column To Make Word Cloud?

Jun 21, 2013

how to accomplish more work quickly is proving difficult. I am making a word cloud of survey responses for my boss and he doesn't like to see similar words in the cloud (like Ease and Easy or even Fast and Quick). I have several hundred of these responses that are open ended answers that say one or many of these terms. Any way I can separate all the words and have them in one neat column? If I can get to that point, replacing those words will be simple enough.

View 2 Replies View Related

Find A Certain Word In A String Then Return The Number Associated With That Word

Jun 9, 2009

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 7 Replies View Related

Search Word Within Cell

Jan 30, 2009

I have a set of data which contains " Account Heads" in Column "A" and "Data" in Column "B", "Data" contains "Account Heads" with some other text as well, i want to have the Account Head in Column "C" based on the "Account Heads" from "Data"

View 6 Replies View Related

Search For A ”Word” In Cells

Jul 10, 2008

Is possible to make a script that search for a ”Word” in cells with more than one word?

View 9 Replies View Related

Partial Word Search

Jul 25, 2006

Is there a command out there that i can use to search a cell or textbox for part of a word, eg. my word being phone, and for it to look at cellphone and recognize it.

View 4 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved