Settare Range da VBA

[Ely]

Ciao, è un po che non torno a rompervi le scatole, quindi un caloroso saluto
a tutti! :)

Ho ripreso in mano un vecchio progetto che ho elaborato con Excel 2002
Devo passare ad una funzione un range stabilito
uriga è una variabile precalcolata che mi indica l'ultima riga scritta del
foglio facendo riferimento alla colonna A

Dim ranger As range
Dim pippo As String

pippo = "A" & uriga & ":C" & uriga
set ranger = pippo

Ovviamente cosi non funziona.... come posso fare ad assegnare quel range?

[Tiziano Marmiroli]

Il Tue, 28 Apr 2009 03:17:02 -0700, Ely ha scritto:

>Devo passare ad una funzione un range stabilito

>uriga � una variabile precalcolata che mi indica l'ultima riga scritta del

>foglio facendo riferimento alla colonna A
>
>Dim ranger As range
>Dim pippo As String
>
>pippo = "A" & uriga & ":C" & uriga

Set ranger = Range(pippo)
Debug.Print ranger.Address
Set ranger = Nothing

Facci sapere se e come hai risolto, grazie.
--
Tiziano Marmiroli
Microsoft MVP - Office System
http://www.riolab.org

[Roberto Restelli]

Ciao Ely.

Ely ha scritto:

> Devo passare ad una funzione un range stabilito
> uriga è una variabile precalcolata che mi indica l'ultima riga
> scritta del foglio facendo riferimento alla colonna A
>
> Dim ranger As range
> Dim pippo As String
> pippo = "A" & uriga & ":C" & uriga
> set ranger = pippo
>
> Ovviamente cosi non funziona.... come posso fare ad assegnare quel
> range?

Non sono sicuro di aver capito bene, ma interpreto che da un valore scalare
vuoi recuperare un range.
Io farei così:
=====
Dim ranger As range
Set ranger = Range("A" & uriga, "C" & uriga)
=====
Per essere più precisi serve avere qualche elemento di contesto in più...

Ciao
Roberto

--
Roberto Restelli
Microsoft MVP - Office Systems - Outlook
************************************************
La prima raccolta delle FAQ del newsgroup Microsoft di Outlook:
http://www.msoutlook.it

[Big John]

"Ely" <E...@discussions.microsoft.com> ha scritto nel messaggio
news:6E32D0FB-A1B3-4E24...@microsoft.com...
> Ciao, � un po che non torno a rompervi le scatole, quindi un caloroso

> saluto
> a tutti! :)
>
> Ho ripreso in mano un vecchio progetto che ho elaborato con Excel 2002
> Devo passare ad una funzione un range stabilito

> uriga � una variabile precalcolata che mi indica l'ultima riga scritta del

> foglio facendo riferimento alla colonna A
>
>
> Dim ranger As range
> Dim pippo As String
>
> pippo = "A" & uriga & ":C" & uriga
> set ranger = pippo
>
> Ovviamente cosi non funziona.... come posso fare ad assegnare quel range?

Guarda questo link http://www.contextures.com/xlNames03.html al paragrafo :
Create Dynamic Ranges with a macro.
Saluti,
Gianni.