IF macro VBA

[Robert72]

Hi,

i want to make a macro with a if formula that takes a value and placed it on the right row every row got's a specific date.

this is what i got so far:

If Sheets("Data").Range("A2") = "1" Then Sheets("Numpay").Range("F312").Copy
Sheets("3C").Select
Range("D12").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

'other date:
If Sheets("Data").Range("A2") = 2 Then Sheets("Numpay").Range("F312").Copy
Sheets("3C").Select
Range("F12").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

'the sheet data range A2 = the day
'in the sheet numpay are placed the values.
'sheets 3c is the sheet where it needs to be placed.

im working in excel 2003
greetz

 

[Andrew Poulsom]

What does the data in sheet 3C look like?

 

[Robert72]

I can sent u the file if u want?
is it possible to upload it on this forum?

 

[Andrew Poulsom]

You can copy the data in Excel and paste it into a reply. Put borders around it first and don't post too much.

 

[Robert72]

Datum 1-11-2011 2-11-2011 3-11-2011 4-11-2011


American Express



This is what it looks like.
the value what is located at the sheet numpay needs to be placed under the specific date. in the row American Express.

the macro's i gave you are for the 1st and the 2nd.

 

[Andrew Poulsom]

Why column D for 1 and column F for 2?

 

[Robert72]

In collum A, B and C is put some information.
between D and F is putted a empty collum. i can delete that if that makes the macro better working

 

[Andrew Poulsom]

In which row are those dates? I assume that American Express is in row 12.

 

[Robert72]

yes it is.

 

[Andrew Poulsom]

And which row are the dates in?