;>>
>>> '
>>> If you absolutely INSIST that you need to use a "case" statement,
>>> then I suppose you could use:
>>>
>>> If (Cells(2, j).Value = "sexta-feira") Then
>>> Select Case (Cells(i, 1).Value)
>>>
i, j + 1).Value = Cells(i, j + 1).Value + Cells(i,
>> j).Value
>> Case 513
>>
>> Cells(i, j + 1).Value = Cells(i, j + 1).Value + Cells(i,
>> j).Value
>> Case 516
>>
>> Cells(i, j + 1).Value = Cells(i, j + 1).Va
you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
-
From: NOORAIN ANSARI
To: excel-macros@go
Dear Jorge,
Please share sample workbook.
On Wed, Jul 25, 2012 at 3:36 PM, Jorge Marques wrote:
> Hi guys, can anybody help me turning this If macro to an case macro.
>
> Sub friday()
>
> For i = 1 To 200
> For j = 1 To 200
>
> If Cells(2, j).Value = "sexta-feira" And Cells(i, 1).Value = 512 Or
