I am trying to do the following:
I am creating an order checklist in Excel. I want it that if the sales rep clicks on a certain field that a macro will populate the form that is needed. If the rep does not click on that box then the certain form will not be populated. Is this possible?
I have data in a single Excel worksheet, single tab, columns A:C.
I want to move that data into Word.
The format in Word:
Contents of A1
Contents of B1
Contents of C1
Blank Line
Contents of A2
Contents of B2
Contents of C2
Blank Line
etc, etc, etc, etc....for all rows in Excel.
I have two files, a workbook and a document, and both are macro-enabled files. The workbook is my main file for my project and the document is my template. The workbook is basically my database with vba program that populate data to Word document. My word document is a template that has macros saved in a module. Aside from populating the data, workbook also create formfields on to the document and assign macro (ExitMacro).
However, i'm getting Run-time error (4210): Bad parameter message when i try to assign the macro to formfields. I noticed that this happened when the macro was saved in the module of the document. The workbook program works fine if the document macro was saved in Normal.dot, which i don't want to do.
I am trying to build a word document from an excel macro (with some success) and I am running into some issues with excel not understanding some of the word macro commands. An excellent example of this is when I am trying to insert a page break as seen in the below code snippet:
'open word and create a new document
Dim wdApp As Object
Set wdApp = CreateObject("Word.application")
wdApp.documents.Add
'put some text into the document
wdApp.Selection.typetext Text:="Document title"
wdApp.Selection.TypeParagraph
'insert a page break
wdApp.Selection.InsertBreak Type:=wdPageBreak
I know the insert break command works fine because I can get it to work within a word macro. When trying to get excel to run it in word is another story. I get the following error message:
run-time error '9118':
Parameter value was out of acctable range
Debug
wdPageBreak = empty
This macro, enabled in Excel, is part of a chain of macros and will open Word, run the mail merge, save and close Excel. However, there is a macro in Word that I need to run but don't know how to activate it. Is there a code that I am missing that can be added to the end of the macro included?
VB:
Sub Mailmerge()
Dim wd As Object
Dim wdocSource As Object [code].....
What I want to create is an excel file such as:
A
B
C
1
File
Qty
Yes/No
[Code]......
Where Qty sets how many copies for that particular doc, and Yes/No determines if it needs to be printed at all.
Each file will be in a subfolder relative to the excel file.
So it would work like this (somehow)
If Cell, C2 = 1, then print CurrDirSection1examplefile.xlsx, qty= B2 , defaultprinter
If Cell, C3 = 1, then print CurrDirSection2examplefile.docx, qty= B3 , defaultprinter
If Cell, C4 = 1, then print CurrDirSection2examplefile.docx, qty= B4 , defaultprinter
and so forth.
Currently I am going back and forth between an excel document and a word document cutting and pasting values from the excel spreadsheet into tables in word. The task is a regular occurance therefore I wish to create a Macro that can automate this procedure. Both the excel and word documents are fixed templates therefore once a Macro is created it can be applied to all future work of similar nature.
Each table in the word document contains 6 rows of values in a single column. The excel data is arranged in a table that is 6 rows by x number of columns (how ever many sets of values there are for the particular job) therefore x determines how many tables must exist in the word document. I move between the excel and word document cutting and pasting each column into each table. This is not so time consuming if x=10 however on occasion x=100+ and it does take time.
Creating a macro that updates and copies part of a worksheet in Excel 2003 and pastes it in MS Word. The sheet I have is a sheet that updates some prices etc and after it updates I usually select a square (part of the sheet), press CTRL+C to copy it and paste it as a picture (paste special ) in word. Is there a way to automate the process?
I am thinking a macro that updates the sheet, copies and pastes iit on word??
Basically I have manually generated word documents based on a spreadsheet. Now, I need to countercheck the contents of the word documents with another spreadsheet i.e. make sure the courses in the word document for a particular student is same as that reflected on the spread sheet. Is it possible to write a macro for this? I'm a beginner and I'm waaay out of my depth. I have attached sample documents and spreadsheets.
The link to the documents are as follows: Macro to check data from Word documents against an excel spread sheet
I need in XL for a macro to run, open my word file, copy the entire thing and then paste it back in XL.
So leaving it general, Word.doc and Excel.xlsx
It's all because my company's POS system will only export to Word but everything we do is in XL.
if there is a way in VBA to copy a macro from range of cells in Excel and insert it into the normal module in word? I have a macro in excel that copies cell's, paste them into word and then calls a macro in word which does some find and replace functions. Users have to manually add the word macro and I was hoping they could just click a user button and it would automatically open word, add the macro and close it.
View 8 Replies View RelatedI am trying to take multiple tables from a Word document and import them into an Excel worksheet. Currently I have found two versions that when combined, could yield what I am looking for. The first one imports the table's data from Word, but does not maintain formatting of the table (font, colors, rows/columns etc.):
The next code maintains formatting, but only imports/pastes one table:
[Code] .........
For the second one, I do not like the fact that it is calling a specific Workbook to paste into. If I could somehow maintain the ability to import/past multiple tables while keeping formatting that would be perfect. An extra bonus would be to import each table within the Word document into individual Worksheets in Excel. I am also using Office 2010.
References: [URL] .........
VBA - How to preserve source formatting while copying data from word table to excel sheet using VB macro? - Stack Overflow
I have a macro set up in Excel that formats and deletes rows matching a citeria. Once the macro runs I then manually copy the data across into Word. I would like to automate this.
I would like the macro to copy over any cells containing data iinto a new word document. I also have standard text that I would like to include at the beginning and end of the word document. With the excel data being placed in the centre.
I have searched the web and tried a couple of macros with no luck. All the macros state "' requires a reference to the Word Object library: ' in the VBE select Tools, References and check the Microsoft Word X.X object library"
I am unsure how to reference this - but I have checked and found that the object library ticked is Microsoft Word 11.0 Object Library.
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
All I want is to generate a word document with built in word header and footer (header and footer style name is "alphabet") based on the values which i mention in excel(path,word file name and header content.
View 1 Replies View RelatedI 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]....
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:
---
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.
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 14 Replies View RelatedI have this excel sheet which I want to export to a word document. The following code has been used:
[Code].....
It creates a word document but it only copies and pastes a picture of the excel sheet. I want for the user to edit the word document values that are pasted from the Excel sheet. I know I need to change somewhere in the:
[Code] .....
How can I paste values from excel to word that can be modified inside of word?
ALSO:
How can I change the layout of the word document, for example if I want to add a header and a footer?
I have a database list, and run a bunch of formatting, inserting, formulas etc., to be able to have a Word Mail Merge be able to run against the data when finished. I'm automating the process and want to be able to open the Word document when the Excel piece is done, so the user doesn't have to navigate to the file manually.
Since Excel doesn't seem to automatically 'see' Word docs in the Open File dialog list, my Open File code below is getting an error of "File Format is Not Valid":
ChDir "O:UAIBDCustomer RelationsIDHome Office Indexing"
Workbooks.Open Filename:= _
"O:UAIBDCustomer RelationsIDHome Office IndexingID Home Office Indexing Mail Merge Template TESTING.docx"
I'm writing a spreadsheet which performs automatic reporting in Word at the moment and, having done this once before I thought it would be simple... Unfortunately however I seem to have run into the following problem:
I'm trying to have Excel paste in a table, then move down one line, enter a page break and then repeat for all of the tables it needs to paste.
Among a rather large sub which I re-used from another project is this bit of code which is relevant to this part:
Dim AppExcel As Window
Set AppExcel = ActiveWindow
Set appwd = CreateObject("Word.Application")
appwd.Visible = True
Set appwd = CreateObject("Word.Application")
appwd.Visible = True
appwd.Documents.Open Filename:=FileToOpen
'select test bookmark
appwd.activedocument.Bookmarks("test123").Select
The key bit is this segment, which is the part repeated for each table (it all works up to here)
For K = ActionFrom To ActionTo
Cells(3, 2) = K
Call SelectNode
LR = Sheets("Data_Entry").Cells(Rows.Count, "B").End(xlUp).Row
Worksheets("Data_Entry").Range("B7:I" & LR).Select
Selection.Copy
With appwd
.Selection.Paste
.Selection.MoveDown Unit:=wdLine, Count:=1
.Selection.InsertBreak Type:=wdPageBreak
End With
Next K
The two bits in red are what I am trying to now do, but Word keeps returning the error 'bad parameter'. I've tried doing it both in and out of the 'with' function and I can't seem to make it work...
I need to read A1 Rows and if it's values is bold letters then i have to add from top of it's above un bold members like that the should work for 2000 rows Like below Ites income - (A) vlues need to be added from row 3 to row 9
A) ITES
ITES Income
B P O - Domestic
4000101
[Code].....
I have a very indepth spreadsheet at work. We also have a form that was typed up in word that uses some of the information from the spreadsheet. I was wondering if there is a way to have the information from the spreadsheet autofill the form that is in word?
View 14 Replies View RelatedI am exporting data in from a different program (Results Plus), into a Word 2010 mail merged document with a header file attached. The header file is an Excel table of my merged fields. I have gone through all the steps to make sure it's not that software. Now I still cannot figure out why all of my months are turning into "00" in a Word mail merge. I have tried @ "MM/dd/yyyy" and it end ups flipping the month and day around.
For example: it should be January 8, 2013. It shows up originally in my document as "00 8, 2013". When I add the [switch] @ "MM/dd/yyyy" it shows up as, "08/01/2013". When I tested it out and put "MMMM/dd/yyyy" it shows up as August 1, 2013 instead of what it should be, January 8, 2013.
I have checked my default language (English US).
How do I stop this?
I am having a formatting issue within a cell. I would like to accomplish a TAB space between to words so they always have the same space between, no matter how many characters the words or numbers have.
Example: I insert text and numbers from different cells in to one.
Formula: ........
It looks like this... so far so good.
25.02.2014 EUR 5'600.00 1.2177 CHF 6'819.12 Withrawal
But if i insert multiple lines with higher or lower amounts the formating goes wrong.
25.02.2014 EUR 5'600.00 1.2177 CHF 6'819.12 Withrawal
26.02.2014 EUR 10'000.00 1.2212 CHF 12'212.00 Deposit
The target would be to keep straight lines like with the TAB in Word.
snap-tab.jpg
I know there is no TAB whitin excel cells, but maybe there is a way to set a default charachter lenght that can be forced even if the amount or the text is shorter.
I would like to extract some text from a word file and transfert it into an excel spreadsheet.
My text is always presented in the same way. First there is a line with some data (see exemple bellow). I have no problem to extract them using the macro bellow even it's not perfect.
My problem is on the main text. I weed to keep the format or at least the different paragraphes as when you copy text in word and past it in the formula bar (or press F2).
Here is an exemple of my word file
Code : XXX1- Abrege : DGS45 - Type : D - ADICAP : PHXT5847
TITRE
Text Paragraph 1
Text Paragraph 2
[Code].....
I have to write the word "hyllvagn" in column A in every fifth row starting with $A$2.
The range should be $A$2:$A$100.
here is my excel file data
excel2a0cf9.jpg
now i want display result in ms word 2010 like this
world.png
The following code is used to export values form Excel into a word document:
The report obtained then looks like this:
Excelforum.jpg
How can I make the values fit within the margins of the word document?