Then, let's use macro :
Sub Test()
Dim X As Single
X = 10
If [Sheet1!A1] < X Then
[Sheet3!A1] = ""
[Sheet2!A1] = [Sheet1!A1]
Else
[Sheet2!A1] = ""
[Sheet3!A1] = [Sheet1!A1]
End If
End Sub
[Sheet1!A1] is equivalent to Sheets("Sheet1").Range("A1")
Regards.
Daniel
> -----Message d'origine-----
> De : excel-macros@googlegroups.com [mailto:excel-
> mac...@googlegroups.com] De la part de jmholt
> Envoyé : jeudi 9 juillet 2009 08:32
> À : MS EXCEL AND VBA MACROS
> Objet : [Norton AntiSpam] $$Excel-Macros$$ Inserting data from one
> worksheet to another
>
>
> Just starting to learn macros.....
>
> I have a cell in Sheet1 that performs a calculation. Either by means
> of a function in a cell, or with a macro, create a conditional that
> will insert the calculated data into a cell in Sheet2 or Sheet3.
>
> Example:
>
> Calculation performed in Sheet1 A1.
>
> Conditional function or macro that: IF A1 < X then insert value of A1
> to Sheet2 A1 otherwise insert value of
> A1 to Sheet3 A1.
>
> Any insight would be greatly appreciated.
>
> John
>
> >
--~--~---------~--~----~------------~-------~--~----~
----------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!
We reach over 5,000 subscribers worldwide and receive many nice notes about the
learning and support from the group. Our goal is to have 10,000 subscribers by
the end of 2009. Let friends and co-workers know they can subscribe to group at
http://groups.google.com/group/excel-macros/subscribe
-~----------~----~----~----~------~----~------~--~---
