Variable Question

[alvin Kuiper]

Hi
If i have this
With Worksheets("Ark1")
Set cell = .Cells(Rows.Count, 1).End(xlUp)
End With
If Not IsEmpty(cell) Then Set cell = cell(2)
cell.Value = antal

What type is Cell as vaiable

Regards alvin

[Otto Moehrbach]

As you have it, cell is a range. HTH Otto
"alvin Kuiper" <alvinKuiper@discussions.microsoft.com> wrote in message
news:9C8534BF-28AC-4A80-AAF8-1E7DCD0F4A7D@microsoft.com...
> Hi
> If i have this
> With Worksheets("Ark1")
> Set cell = .Cells(Rows.Count, 1).End(xlUp)
> End With
> If Not IsEmpty(cell) Then Set cell = cell(2)
> cell.Value = antal
>
> What type is Cell as vaiable
>
> Regards alvin
>

[alvin Kuiper]

Thanks
Alvin

"Otto Moehrbach" wrote:

> As you have it, cell is a range. HTH Otto
> "alvin Kuiper" <alvinKuiper@discussions.microsoft.com> wrote in message
> news:9C8534BF-28AC-4A80-AAF8-1E7DCD0F4A7D@microsoft.com...
> > Hi
> > If i have this
> > With Worksheets("Ark1")
> > Set cell = .Cells(Rows.Count, 1).End(xlUp)
> > End With
> > If Not IsEmpty(cell) Then Set cell = cell(2)
> > cell.Value = antal
> >
> > What type is Cell as vaiable
> >
> > Regards alvin
> >
>
>
>

[Bob Phillips]

You can easily find out. Step through the code, and after setting the value,
drag a copy of cell into the Watch window and it will tell you in there.

--

HTH

Bob Phillips

(remove nothere from the email address if mailing direct)

"alvin Kuiper" <alvinKuiper@discussions.microsoft.com> wrote in message
news:9C8534BF-28AC-4A80-AAF8-1E7DCD0F4A7D@microsoft.com...
> Hi
> If i have this
> With Worksheets("Ark1")
> Set cell = .Cells(Rows.Count, 1).End(xlUp)
> End With
> If Not IsEmpty(cell) Then Set cell = cell(2)
> cell.Value = antal
>
> What type is Cell as vaiable
>
> Regards alvin
>

[alvin Kuiper]

Wow not bad at all
Thanks
Alvin


"Bob Phillips" wrote:

> You can easily find out. Step through the code, and after setting the value,
> drag a copy of cell into the Watch window and it will tell you in there.
>
> --
>
> HTH
>
> Bob Phillips
>
> (remove nothere from the email address if mailing direct)
>
> "alvin Kuiper" <alvinKuiper@discussions.microsoft.com> wrote in message
> news:9C8534BF-28AC-4A80-AAF8-1E7DCD0F4A7D@microsoft.com...
> > Hi
> > If i have this
> > With Worksheets("Ark1")
> > Set cell = .Cells(Rows.Count, 1).End(xlUp)
> > End With
> > If Not IsEmpty(cell) Then Set cell = cell(2)
> > cell.Value = antal
> >
> > What type is Cell as vaiable
> >
> > Regards alvin
> >
>
>
>