Paste Information Into Word
Jan 7, 2009
I have some excel files that use VBA to paste information into word which worked fine with older versions of Office. Now I am on a new computer with Office 2007 and everything got hosed. The file is still being created on the desktop, but now there is nothing in it. If I try to paste into notepad a blank line shows up with nothing else, however if I try to paste back into excel the data is there.
Dim appWD As Word.Application
Set appWD = CreateObject("Word.Application.8")
appWD.Visible = False
Sheets("Calculator").Select
Sheets("Template").Range("A2").Value = Range("J1").Value
Sheets("Template").Range("A39").Value = Range("J20").Value
Sheets("Template").Select
Range("A1:A49").Copy
appWD.Documents.Add
appWD.Selection.PasteSpecial DataType:=wdPasteEnhancedMetafile
appWD.ActiveDocument.SaveAs FileName:="C:Documents and SettingsAll UsersDesktopcans.nc", FileFormat:=wdFormatText
appWD.ActiveDocument.Close
appWD.Quit
Sheets("Calculator").Select
View 9 Replies
ADVERTISEMENT
Sep 21, 2006
I have a form in Word that I go through and fill out different fields in the table with text. I need to be able to copy each specific field to an excel spreadsheet so we can have a database of the info. So far I am just recording a macro and trying to modify it. I can get excel to open.
Sub Testing()
Selection.HomeKey Unit:=wdStory
Selection.MoveDown Unit:=wdLine, Count:=2
Selection.MoveRight Unit:=wdCell
Selection.Copy
Set appEX = CreateObject("Excel.Application")
appEX.Visible = True
appEX.Workbooks.Open FileName:="D:/AE Service Session/macro.xls"
End Sub
It needs to take the value that it copied and paste it into the first blank cell in column A.
View 9 Replies
View Related
Aug 8, 2014
I have been looking for a forumla that will put an 'and' between the last two bits of information.
Joe Bloggs
Peter Smith
Matt Jones
I have list of names in individual cells like above. I have figured out a formula that will put them into a single line (Joe Bloggs, Peter Smith, Matt Jones). But what I need is a formula that will put it into single line and insert an 'and' ALWAYS between the last two people. So it should show like (Joe Bloggs, Peter Smith and Matt Jones) but if I remove Matt Jones it should now display as (Joe Bloggs and Peter Smith).
View 11 Replies
View Related
Jul 17, 2014
I'm trying to get certain Excel cells (varies by column and row) to populate different areas in a Word document. I've tried using both Word bookmarks and form fields and have defined the Excel names with the Word bookmark names as well as using Word's generic terms (Field1, Field2, etc.) with no luck. The VBA code I'm using now is for word forms and will open the Word document but seems to delete the form fields. I don't know if I'm not coding the cells correctly or what.
Sub CreateProposal()
Dim wdApp As Word.Application
Dim wdDoc As Word.Document
Set wdApp = CreateObject("Word.Application")
' Open word document
[Code] ........
View 3 Replies
View Related
Jul 2, 2014
For Example...
In Excel:
Question Answer
What is his Name? John
How many apples did he buy? 8
How much did the apples cost? 50
In Word: John is in cell b2, 8 is in b3, 50 is in cell b4
John bought 8 apples totaling $ 50 dollars.
Based on the information typed in the answer column (excel spreadsheet) I would want a word document to automatically generate a sentence.
View 1 Replies
View Related
Jan 16, 2014
I am a complete amature at Marco's and formulas. I have been trying to create what i need but i am unable to get it to work. I have a worksheet named "Course dates incl. pursuit" which has a table which runs from B7 to J144 in the table it has date, number, name, location, job, area, notifified, on system and passed?. in that order. I want if the passed column which is in J if that has a Y in it to copy and paste into another worksheet on the next avaliable line, worksheet name "Master."I would like it in a slightly different order if that is possible they have the same titles on the table but would like it to go number, name, location, job, area and date. Running from B5 to G(end of spreadsheet). That is the main part i would also like to to copy and paste into another worksheet if the answer is "N" but the above part is the most important part. Due to the computer settings i am unable to attach it
View 6 Replies
View Related
Aug 13, 2014
What I would like a macro to do is take information from cells A1 to P1 on sheet1 and add them to the table in sheet2 and then I can save the workbook. The information in A1 to P1 is taken from other cells around the workbook. Once the information is in sheet 2 I can delete or change the informtion in sheet 1 without it affecting the copied information in sheet 2.
The next time I open the workbook I can enter the information in cells A1 to P1 on sheet1 then run the macro again and will then take the information and add it to the bottom of the table in sheet2 underneath the previous information that had been added - obviously the source of this information will now be deleted.
I will need to do this again and again building up the table in sheet2. The table will also use columns A to P like in sheet1.
View 7 Replies
View Related
May 19, 2009
I want to insert some data in a number of cells (e.g. A1, B4, C4 and H8) on a worksheet ('Sheet 1').
I then want to press a button and have some code that:
Looks at column B on 'Sheet 2'
Finds the next empty row Copies and pastes the information from Sheet 1 into specific cells in that empty row.
View 2 Replies
View Related
Apr 2, 2003
I am having problems finding a way to copy the contents of a cell and paste the content to a different worksheet on the first blank cell at the end of a column/row.
View 3 Replies
View Related
Jun 8, 2007
I have a long list of addresses in excel. I need the postcodes to Georeference them but the addresses are all in one cell (seperate cell for each address). For instance:
Cell A1:
My house, Whalley New Road, Lancashire, BB4 9TP
I need to extract the postcode ( zip code) and paste it into a seperate cell. I then need to repeat this for every address. I have had a play around but am not getting far at all. From other questions asked like this they all seem to just want to trim!
View 3 Replies
View Related
May 19, 2014
What I have is a list of selected employees, with the site they work at next to them.
What I need is a macro which looks at the site they work at, references it with an address table in a separate worksheet and then pastes the site address along with the employee's name onto a thrid worksheet which will be used to print post labels.
>Look at which site the employee works at (Sheet 1, D:D)
>Find the address of said site (Sheet 3)
>Paste the relevant address along with the employees name (Sheet 1, B:B) into a separate worksheet.
This will be done weekly, and I need the macro to either only work on the latest's weeks table, or to just work with the current active selection. Any better way to layout my table.
View 12 Replies
View Related
Nov 4, 2008
I am trying to copy the the following from MS Word and paste it in one MS Excel cell:
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
This is just a test.
View 5 Replies
View Related
Feb 6, 2007
In a word file, I have a list of ID numbers. I want to paste them into a excel file, but the problem is that the last 3 digits of every ID number are converted to "000" no matter what they are. The ID number has 18 digits.
View 9 Replies
View Related
Oct 17, 2006
I need to know how to open and manipulate a Microsoft Office document using code in Excel.
I have a list of Names in an Excel column that I am trying to paste into a Word table (formatted as Avery labels). Each name goes in a different table cell in Word. Example: Copy from "B5" in Excel and Paste into the first cell in Word, copy from "B6" in Excel and Paste into the second cell in Word, etc.
I know the code needed within Excel and I also know the code in word used to setup the table format. I just need to know how to "call" it from within Excel and how to copy/paste back and forth.
View 9 Replies
View Related
Dec 18, 2008
1. In whatever cell is selected when the macro is run, enter a new row.
2. Copy the information from the row directly above the new row and paste (values, formulas, formats, etc) into the new row.
3. Return to column P in the new row, i.e if the new row is row 11, then return to P11, for row 12 return to P12, etc.
I have tried recording the macro but because it is hard coded to specific rows, its not working. I have attached a sample copy of the sheet (had to zip due to the size of the file).
View 3 Replies
View Related
Dec 11, 2013
I have about 600 Word Documents that contains information about clients. Each Word document file name is the name of the client. Example. Tom Smith. I wanted to be able to highlight all 600 word documents and paste them into Excel, so that I can press Ctrl-F to find what ever name it is I'm looking for, then click the name and the word document open. Is this possible?
View 2 Replies
View Related
Jun 28, 2014
I have created a userform thats extracts data from a worksheet, pace a command button on the form that will send the info in textboxes to a word document.
I did attempt this but even reading how didn't make sense. I have placed book marks on my doc (RTWdoc) ready. bookmarks are named textbox1, textbox2, etc, for ease of reference so they match textboxes on userform1.
word.doc and workbook are in same folder.
View 1 Replies
View Related
Jun 25, 2009
I have a workbook with a number of worksheets which is used to produce the information for an estimate.
I then copy and paste different cells or group of cells into a word document to send to the customer.
Is there a Macro which could do this automatically
View 5 Replies
View Related
Jul 13, 2009
I am trying to figure out how to go down a list of words and copy/paste a row if it equals a specific ring of words. For example, if want to go down a column and copy the word "Dog" if the word is "Dog" and paste it to the second sheet in a certain column... The thing that I can't figure out is how to step down to the next row until the cell is empty.
Sub Cats_and_Dogs()
For i = 1 To 100
If Range("i, 1") = "Dog" Then
Range("i,1").Select
Selection.Copy
Sheet2.Paste
End If
Next
End Sub
View 9 Replies
View Related
Aug 26, 2009
I am trying to have Excel 2007 open a Word Table, Select All, then Copy and paste to the open workbook. Here is what I have so far:
Sub Comments()
Dim objWord As Object
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
objWord.Documents.Open "R:JohnstonOfficeProductionSO COMMENTS.doc"
Selection.WholeStory
Selection.Copy
Right now I and getting an "Type not defined" error and the Dim oData As New DataObject step. Also if delete the code to clear the clipboard, I get an error at the WholeStory step.
View 9 Replies
View Related
Apr 16, 2009
I have a macro that transfers (copy/paste) information from one master file to several other individual files. The macro works, but I would like
to enhance it by have it spit out errors in the process as follows: if cell A42 on file VP1.xls is not equal to Cell C35 on file Masterfile.xls then make cell E2 ERROR and fomat E2 bold-red, otherwise do nothing. The macro should continue regardless, I just want it to spot errors.
I think this is pretty simple is just a matter of inserting an IF formula in the macro which is something i don't know how to do yet.
View 6 Replies
View Related
Jul 15, 2014
I've recorded a Marco copying and pasting information from one cell to other cells and some of the copying functions paste to two cells. I just need this to loop through all information I'm copying from the the new cells.
Range("I1").Select
Selection.Copy
Range("D1").Select
ActiveSheet.Paste
Range("J1").Select
[Code]...
View 7 Replies
View Related
Sep 9, 2013
I have a list of asset data (columns A:Z and over 20,000 rows).
I want a macro to find the word TAG in column F then cut off the entire row for all that meet the criteria and paste in another sheet. So I can see both sheets.
View 1 Replies
View Related
Apr 15, 2014
I have 10 worksheets in my workbook. The two that I'm concerned with in this post are "Main" and "Completed".
If Column AA in "Main" contains the word "Complete" (which is from a drop down list) I want to copy the entire row from "Main" and paste in the "Complete" sheet without over-writting previous pasted rows.
Back in sheet "Main" I want the data in that row to be cleared with the exception of Column A as it contains a formula for sorting blanks. If I delete that row it will mess up my links on other sheets.
View 14 Replies
View Related
Aug 6, 2014
I am importing a data table from Excel into word. All works well except for the first column of my data, which contains numbers formatted as currency. I am using a bunch of loops to transfer the data into word, and for each cell the code looks like this:
[Code]....
Is there a way to tweak the code and preserve the formatting when I am importing numbers into word?
I tried the following code but it gives me type mismatch error:
[Code] ....
View 1 Replies
View Related
Oct 29, 2008
i need a code to open a specific word document, copy table from word into excel with a link so when the word document is changed so is the excel doc
View 9 Replies
View Related
Apr 22, 2014
I tried all failed.We have about 160 different workbooks (one for each business unit) stored online. Staff enters information about their weekly revenue and expenses and here at head office I collect that information and consolidate them.What I am trying to do is that;1.) Create a master Workbook with ~160 worksheets (One worksheet for each unit) named exactly the same with other workbooks2.) And macro can pull the information from related files stored in a certain folderIt is very much like another members problem but I am not sure why I cant get that code working for me? [URL]
View 5 Replies
View Related
Nov 3, 2013
I have a simple excel sheet with columns A (name1) B (name2) C (name3) D (name4) E (name5) F (text). A given name can only appear once in any given row.
I am looking for a vba code (Excel 2003) that would loop through cells in A1:E?? (number of rows varies, loop needs to find last non-empty row in column A) and look for a particular name (e.g. "Stefan Thomas"):
1) create new unnamed word doc
2) Put "New Annex" as a header (top right) in the new word doc
3) Insert text "List for Stefan Thomas" centered and underlined as the first line of the new word doc. The document will have two sections:
4) Insert text "Items in Column A" bolded and aligned to the left
5) Insert text "Items in Column B to E" bolded and aligned to the left below the section in 4
6) if "Stefan Thomas" is in column A, copy text in column F and paste in word doc as first bullet (below title "Items in Column A")
7) repeat step 6 for all other instances of "Stefan Thomas" in column A (append text as next bullet in section "Items in Column A")
8) If "Stefan Thomas" is in column B or C or D or E (can only appear once per row), copy text in column F and paste in word doc as first bullet (below title "Items in Column B to E")
9) repeat step 8 for all other instances of "Stefan Thomas" in column B or C or D or E (append text as next bullet in section "Items in Column B to E")
if you could indicate in the code how I can choose the type of bullet as well as space between bullets and font type
View 8 Replies
View Related
May 8, 2014
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.
View 6 Replies
View Related
Apr 26, 2013
I would Need a macro which would Search a Keyword in the excel sheet and copies and pates the data in Cell "A2". for Example "Market" and then after the search it copies 12 rows upwards and 10 columns from the Cell that the word "Market" is placed. And then it copies 12 rows downwards and 10 columns from the Cell that the word "Market" is placed.
I have tried recording the same but it does not work if the Word "Market" is placed in different cell value.
View 2 Replies
View Related