gt; Regards
>> Santosh Bahuguna
>>
>> On Sat, Jul 9, 2011 at 1:42 PM, karunanithi ramaswamy
>> wrote:
>>
>>> Mr Santhosh,
>>> your formula put 1 in A2,1 IN A3,2 IN A4,AGAIN 1 IN A5,3 IN A6.
>>> i.e., REQUIRED NUMBERING FILLED IN EVE
gt; * *
>>>
>>> *Private Sub Worksheet_Change(ByVal Target As Range)*
>>>
>>> *On Error GoTo Err:*
>>>
>>> *If Target = Range("A1") Then*
>>>
>>> *For i = 1 To Range("A1").Value*
>>>
>>>
D IN EVEN CELLS, AND ODD CELLS HAVE 1
> AM I RIGHT?
> R.KARUNANITHI
>
> --- On *Sat, 7/9/11, santosh bahuguna * wrote:
>
>
> From: santosh bahuguna
>
> Subject: Re: $$Excel-Macros$$ Numbering
> To: excel-macros@googlegroups.com
> Date: Saturday, July 9, 2011, 3:59 AM
&g
Mr Santhosh,
your formula put 1 in A2,1 IN A3,2 IN A4,AGAIN 1 IN A5,3 IN A6.
i.e., REQUIRED NUMBERING FILLED IN EVEN CELLS, AND ODD CELLS HAVE 1
AM I RIGHT?
R.KARUNANITHI
--- On Sat, 7/9/11, santosh bahuguna wrote:
From: santosh bahuguna
Subject: Re: $$Excel-Macros$$ Numbering
To: excel
A2, copy down as many needed
=IF(ROWS(A$2:A2)<=A$1,ROWS(A$2:A2),"")
Or, If you are inserting rows between A2 & the last rows this will not work
as expected, so use this one;
=IF(COUNT(A$1:A1)<=A$1,COUNT(A$1:A1),"")
copy down as many needed
HTH
Haseeb
--
-
ext*
>>
>> *End If*
>>
>> *Err:*
>>
>> *End Sub*
>>
>> * *
>>
>> *From:* excel-macros@googlegroups.com [mailto:
>> excel-macros@googlegroups.com] *On Behalf Of *NOORAIN ANSARI
>> *Sent:* Friday, July 08, 2011 5:38 PM
>> *To:* exc
com [mailto:
> excel-macros@googlegroups.com] *On Behalf Of *NOORAIN ANSARI
> *Sent:* Friday, July 08, 2011 5:38 PM
> *To:* excel-macros@googlegroups.com
> *Cc:* Kal xcel
> *Subject:* Re: $$Excel-Macros$$ Numbering
>
> ** **
>
> kalyan babu.
>
>
macros@googlegroups.com]
On Behalf Of NOORAIN ANSARI
Sent: Friday, July 08, 2011 5:38 PM
To: excel-macros@googlegroups.com
Cc: Kal xcel
Subject: Re: $$Excel-Macros$$ Numbering
kalyan babu.
Please try it..also
=IF(A2="","",COUNTA($A$2:A2))
On Fri, Jul 8, 2011
Dear Kalyan,
Please try it
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i, j, k As Long
i = Sheet1.Range("A1").Value
Sheet1.Range("A2:A1000").Clear
For j = 2 To i + 1
Sheet1.Cells(j, 1).Value = k + 1
k = k + 1
Next
End Sub
--
Thanks & regards,
Noorain Ansari
*htt
try this
On Fri, Jul 8, 2011 at 5:40 PM, Kal xcel wrote:
> Dear Ashish,
>
> I want the numbering will start frm 1 and it will end at the number given
> by user, like if user put 100 so numbering 1,2,3,4,5,6,7100, if
> user put 200 numbering will start from 1,2,3,4,5,6,7,8,9,10...
Dear Ashish,
I want the numbering will start frm 1 and it will end at the number given by
user, like if user put 100 so numbering 1,2,3,4,5,6,7100, if
user put 200 numbering will start from 1,2,3,4,5,6,7,8,9,10200.
I think you got what I am saying.
Thanks in advance
Kaly
kalyan babu.
Please try it..also
=IF(A2="","",COUNTA($A$2:A2))
On Fri, Jul 8, 2011 at 4:35 PM, Kal xcel wrote:
> Dear Experts,
>
> I want the formula for below mention query...
>
> user will put 100 in A1, from A2 autometically numbering will start like
> this
>
> A21
>
a2= a1+1
On Fri, Jul 8, 2011 at 4:35 PM, Kal xcel wrote:
> Dear Experts,
>
> I want the formula for below mention query...
>
> user will put 100 in A1, from A2 autometically numbering will start like
> this
>
> A21
> A32
> A43
> .
> .
> .
> .
>
> till 100
>
> What will be th
13 matches
Mail list logo
