si j'écris une référence à une plage de la manière suivante cela ne marche
pas :
tableau = Worksheets("feuille").Range(Cells(2 + (Z - 1) * 22, 1),Cells(1 + Z
* 22, 14).Value
si je l'écris comme ci dessous cela fonctionne:
Z = Range("variable").Value
debselec = Cells(2 + (Z - 1) * 22, 1).Address(False, False)
finselec = Cells(1 + Z * 22, 14).Address(False, False)
tableau = Worksheets("feuille").Range(debselec & ":" & finselec).Value
Ni aurait'il pas de façon plus simple d'écrire ce genre de référence ?
merci d'avance
Patrice
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour Patrice,
With Worksheets("Feuille") tableau = .Range(.Cells(2 + (Z - 1) * 22, 1),.Cells(1 + Z * 22, 14).Value End With
Il ne faut pas oublier le "."(point) devant Range et les 2 Cells qui sont des objets appartenant à la même feuille "feuille"
Salutations!
"patrice-toulouse" a écrit dans le message de news:
si j'écris une référence à une plage de la manière suivante cela ne marche pas : tableau = Worksheets("feuille").Range(Cells(2 + (Z - 1) * 22, 1),Cells(1 + Z * 22, 14).Value
si je l'écris comme ci dessous cela fonctionne: Z = Range("variable").Value debselec = Cells(2 + (Z - 1) * 22, 1).Address(False, False) finselec = Cells(1 + Z * 22, 14).Address(False, False) tableau = Worksheets("feuille").Range(debselec & ":" & finselec).Value
Ni aurait'il pas de façon plus simple d'écrire ce genre de référence ? merci d'avance Patrice
Bonjour Patrice,
With Worksheets("Feuille")
tableau = .Range(.Cells(2 + (Z - 1) * 22, 1),.Cells(1 + Z * 22, 14).Value
End With
Il ne faut pas oublier le "."(point) devant Range et les 2 Cells qui sont des objets appartenant à la même feuille "feuille"
Salutations!
"patrice-toulouse" <patrice-toulouse@discussions.microsoft.com> a écrit dans le message de news:
4C61AAF7-74FF-4B85-BF16-645741CBBBB7@microsoft.com...
si j'écris une référence à une plage de la manière suivante cela ne marche
pas :
tableau = Worksheets("feuille").Range(Cells(2 + (Z - 1) * 22, 1),Cells(1 + Z
* 22, 14).Value
si je l'écris comme ci dessous cela fonctionne:
Z = Range("variable").Value
debselec = Cells(2 + (Z - 1) * 22, 1).Address(False, False)
finselec = Cells(1 + Z * 22, 14).Address(False, False)
tableau = Worksheets("feuille").Range(debselec & ":" & finselec).Value
Ni aurait'il pas de façon plus simple d'écrire ce genre de référence ?
merci d'avance
Patrice
With Worksheets("Feuille") tableau = .Range(.Cells(2 + (Z - 1) * 22, 1),.Cells(1 + Z * 22, 14).Value End With
Il ne faut pas oublier le "."(point) devant Range et les 2 Cells qui sont des objets appartenant à la même feuille "feuille"
Salutations!
"patrice-toulouse" a écrit dans le message de news:
si j'écris une référence à une plage de la manière suivante cela ne marche pas : tableau = Worksheets("feuille").Range(Cells(2 + (Z - 1) * 22, 1),Cells(1 + Z * 22, 14).Value
si je l'écris comme ci dessous cela fonctionne: Z = Range("variable").Value debselec = Cells(2 + (Z - 1) * 22, 1).Address(False, False) finselec = Cells(1 + Z * 22, 14).Address(False, False) tableau = Worksheets("feuille").Range(debselec & ":" & finselec).Value
Ni aurait'il pas de façon plus simple d'écrire ce genre de référence ? merci d'avance Patrice
