Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 4
Default Macro for copy and paste values

Hi,

I am running the following macro for copying a number derived from a goal
seek function and pasting into another worksheet.


Dim A As String

A = Sheets("Sheets1").Range("A10").Value
Sheets("Sheets1").Range("A15").GoalSeek Goal:=A,
ChangingCell:=Sheets("Sheets2").Range("D10")

The macro works fine and my sheets2.D10 gets a value with 15 decimal places.
However, I want it to roundup to 2 decimal places by adding the roundup
function in the above macro. How can I do this?

A quick help would be greatly appreciated. Many thanks.
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 1,696
Default Macro for copy and paste values

Range("D10").NumberFormat = "0.00"

"excelnerd" wrote:

Hi,

I am running the following macro for copying a number derived from a goal
seek function and pasting into another worksheet.


Dim A As String

A = Sheets("Sheets1").Range("A10").Value
Sheets("Sheets1").Range("A15").GoalSeek Goal:=A,
ChangingCell:=Sheets("Sheets2").Range("D10")

The macro works fine and my sheets2.D10 gets a value with 15 decimal places.
However, I want it to roundup to 2 decimal places by adding the roundup
function in the above macro. How can I do this?

A quick help would be greatly appreciated. Many thanks.

  #3   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 4
Default Macro for copy and paste values

This changes the number format only. But I want the cell itself to contain
only two decimal points. For example,

If Cell A * Cell B = Cell C and
I want to put a value 1000 to Cell C by changing Cell A. Cell A should
contain a number of only two decimal places, not a number like
10.459409908349.

Do you think it's possible?

"Sean Timmons" wrote:

Range("D10").NumberFormat = "0.00"

"excelnerd" wrote:

Hi,

I am running the following macro for copying a number derived from a goal
seek function and pasting into another worksheet.


Dim A As String

A = Sheets("Sheets1").Range("A10").Value
Sheets("Sheets1").Range("A15").GoalSeek Goal:=A,
ChangingCell:=Sheets("Sheets2").Range("D10")

The macro works fine and my sheets2.D10 gets a value with 15 decimal places.
However, I want it to roundup to 2 decimal places by adding the roundup
function in the above macro. How can I do this?

A quick help would be greatly appreciated. Many thanks.

  #4   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 22,906
Default Macro for copy and paste values

ActiveCell.Value = Application.WorksheetFunction.Round(ActiveCell, 2)


Gord Dibben MS Excel MVP

On Sat, 8 Mar 2008 09:31:00 -0800, excelnerd
wrote:

This changes the number format only. But I want the cell itself to contain
only two decimal points. For example,

If Cell A * Cell B = Cell C and
I want to put a value 1000 to Cell C by changing Cell A. Cell A should
contain a number of only two decimal places, not a number like
10.459409908349.

Do you think it's possible?

"Sean Timmons" wrote:

Range("D10").NumberFormat = "0.00"

"excelnerd" wrote:

Hi,

I am running the following macro for copying a number derived from a goal
seek function and pasting into another worksheet.


Dim A As String

A = Sheets("Sheets1").Range("A10").Value
Sheets("Sheets1").Range("A15").GoalSeek Goal:=A,
ChangingCell:=Sheets("Sheets2").Range("D10")

The macro works fine and my sheets2.D10 gets a value with 15 decimal places.
However, I want it to roundup to 2 decimal places by adding the roundup
function in the above macro. How can I do this?

A quick help would be greatly appreciated. Many thanks.


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Copy range in macro using paste special values Jeff Excel Discussion (Misc queries) 2 August 20th 07 08:12 PM
Copy/Paste how to avoid the copy of formula cells w/o calc values Dennis Excel Discussion (Misc queries) 10 March 2nd 06 11:47 PM
Macro to open workbook and copy and paste values in to orig workbo Dena X Excel Worksheet Functions 1 December 16th 05 12:13 AM
Macro needed to Paste Values and prevent Macro operation thunderfoot Excel Discussion (Misc queries) 1 June 11th 05 12:44 AM
Macro needed to Paste Values and prevent Macro operation thunderfoot Excel Discussion (Misc queries) 0 June 10th 05 03:38 PM


All times are GMT +1. The time now is 02:20 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"