Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Multiply Cell by 10... in Word 97

Status
Not open for further replies.
Feb 4, 2002
792
GB
We have about 100 tables in Word that need to be amended. Is there any way to select all of the cells in the table that need to be amended, and multiply them by 10? We have tried experimenting with the Formula button and PRODUCT, but we are getting no where. It is looking like it will be easier just to change each cell!! But that would take days... can anyone help?

i.e. what do we put after the = sign in the formula field?

Thanks in advance,

Will
 
Are these tables consistent in size? If they are (at least widthways) I would be tempted to copy them into excel then do the work there and copy them back (or even leave them in excel format!)

Even if they aren't consistent in size I am sure it would be much quicker to do it in excel. I am sure you could create some sort of macro to do it quickly on each one. Learn something new every day *:->*
 
I've done some more thinking on this. You could set up sheet 2 to be as big as the biggest table in word. Put this formula in A1 =Sheet1!A1*10 then drag to copy the formula to all cells in Sheet2.

Now copy and paste your table into Sheet1 and hey presto Sheet2 has your figures. Do what you like with them! Learn something new every day *:->*
 
Thanks! It is good to know someone is listening! ;)

Anyway, to save time, one of our editors whose a whizz with macros literally made a macro in five minutes that did the job. Not having done this myself, I can't repeat what he did here, but that is just what we needed.

Thanks all!

Will
 
Sub Macro1()

Dim value As Long

value = Selection.Calculate
Selection.Delete
Selection.InsertFormula Formula:="=" & (value) & "*10", NumberFormat:=""

End Sub

But... I didn't realise this, but the macro which was set up with a hot-key, had to be run on each cell, which took a while, but was acceptable to our editor who managed to highlight each cell with her right hand, and click CTRL-Q with the left, quickly.

Will
 
I thought about your solution but as I suffer from RSI I decided against it. I am glad you have got it sorted! Learn something new every day *:->*
 
LOL! I think our editor is immune... she does this kind of thing day-in day-out! ;)

Will
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top