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
anonymousA
bonsoir,
je sais pas pourquoi tu penses que ca énverve. mais bon!!!
une solution parmi d'autres qui couvre l'ensemble des cas de zones de cellules définies par des noms bien que certaines configurations soient de toute façon inutiles pour une utilisation manuelle d'Excel.
Sub toto()
Set orange = ActiveSheet.Range("axeX")
If orange.Rows.Count = 1 Then Set orangeextrait = Range(orange(3), orange(20)) Else Set orangeextrait = orange(3) For I = 4 To 20 Set orangeextrait = Union(orangeextrait, orange(I)) Next End If
set orange=orangeextrait
End Sub
J'attire tout de même ton attenton sur le fait qu'utiliser Union connait des limites non pas en taille mémoire mais en temps passé à rajouter des cellules à une plage. M'enfin visiblement t'es un petit plaisantin.
A+
"Killedman" a écrit dans le message de news:
Bonjour à tout le monde.
Si je vous énerve ça fait plaisir :)
bon, j'ai un range et un objet range je voudrais que mon objet range ne contienne qu'un partie de mon range.
ex: dim oRange as range dim lDep as long dim lFin as long
set oRange = ActiveSheet.Range("axeX").cells(1, lDep to lFin)
si lDep = 23 et lfin = 20
oRange dois contenir les cells 3 à 20 de axeX
merci d'avoir lu merci de répondre merci d'être là et que la force soit avec vous lol
bonsoir,
je sais pas pourquoi tu penses que ca énverve. mais bon!!!
une solution parmi d'autres qui couvre l'ensemble des cas de zones de
cellules définies par des noms bien que certaines configurations soient de
toute façon inutiles pour une utilisation manuelle d'Excel.
Sub toto()
Set orange = ActiveSheet.Range("axeX")
If orange.Rows.Count = 1 Then
Set orangeextrait = Range(orange(3), orange(20))
Else
Set orangeextrait = orange(3)
For I = 4 To 20
Set orangeextrait = Union(orangeextrait, orange(I))
Next
End If
set orange=orangeextrait
End Sub
J'attire tout de même ton attenton sur le fait qu'utiliser Union connait des
limites non pas en taille mémoire mais en temps passé à rajouter des
cellules à une plage.
M'enfin visiblement t'es un petit plaisantin.
A+
"Killedman" <touty81@hotmail.com> a écrit dans le message de news:
1105650351.160014.161390@f14g2000cwb.googlegroups.com...
Bonjour à tout le monde.
Si je vous énerve ça fait plaisir :)
bon, j'ai un range et un objet range je voudrais que mon objet range ne
contienne qu'un partie de mon range.
ex:
dim oRange as range
dim lDep as long
dim lFin as long
set oRange = ActiveSheet.Range("axeX").cells(1, lDep to lFin)
si lDep = 23 et lfin = 20
oRange dois contenir les cells 3 à 20 de axeX
merci d'avoir lu
merci de répondre
merci d'être là
et que la force soit avec vous lol
je sais pas pourquoi tu penses que ca énverve. mais bon!!!
une solution parmi d'autres qui couvre l'ensemble des cas de zones de cellules définies par des noms bien que certaines configurations soient de toute façon inutiles pour une utilisation manuelle d'Excel.
Sub toto()
Set orange = ActiveSheet.Range("axeX")
If orange.Rows.Count = 1 Then Set orangeextrait = Range(orange(3), orange(20)) Else Set orangeextrait = orange(3) For I = 4 To 20 Set orangeextrait = Union(orangeextrait, orange(I)) Next End If
set orange=orangeextrait
End Sub
J'attire tout de même ton attenton sur le fait qu'utiliser Union connait des limites non pas en taille mémoire mais en temps passé à rajouter des cellules à une plage. M'enfin visiblement t'es un petit plaisantin.
A+
"Killedman" a écrit dans le message de news:
Bonjour à tout le monde.
Si je vous énerve ça fait plaisir :)
bon, j'ai un range et un objet range je voudrais que mon objet range ne contienne qu'un partie de mon range.
ex: dim oRange as range dim lDep as long dim lFin as long
set oRange = ActiveSheet.Range("axeX").cells(1, lDep to lFin)
si lDep = 23 et lfin = 20
oRange dois contenir les cells 3 à 20 de axeX
merci d'avoir lu merci de répondre merci d'être là et que la force soit avec vous lol
bon, j'ai un range et un objet range je voudrais que mon objet range ne contienne qu'un partie de mon range.
ex: dim oRange as range
....
Non ca n'enerve pas , mais ton orange derange la frange de ma frangine . Range la ou je t'arrange.
8-)
Bon, je crois que je suis fatigué.Je vais prendre mes médicaments et j'arrete.
Bon weekend Jean Francois
Killedman
bon ok d'abord
merci à toi cher anonymousA pour ta suberbe réponce qui me comble de joi et d'allégresse sans compter que cela fonctionne très bien et répond parfaitement à question.
ou
merci à toi Ô sublime aidant votre connaissance en la matière esttous ce qui a de plus grand et n'a d'égal que le sommet de la pyramide de Khéops .
ou
merci d'avoir bien du haut de votre estrades de connaissance, d'avoir bien voulu prêter attention à problème indigne d'une personne tel que vous. mais je crois qu'un simple merci est plus approprié. :)
bon ok d'abord
merci à toi cher anonymousA pour ta suberbe réponce qui me comble de
joi et
d'allégresse sans compter que cela fonctionne très bien et répond
parfaitement à
question.
ou
merci à toi Ô sublime aidant votre connaissance en la matière
esttous ce qui a de plus
grand et n'a d'égal que le sommet de la pyramide de Khéops .
ou
merci d'avoir bien du haut de votre estrades de connaissance, d'avoir
bien voulu prêter
attention à problème indigne d'une personne tel que vous.
mais je crois qu'un simple merci est plus approprié.
:)
merci à toi cher anonymousA pour ta suberbe réponce qui me comble de joi et d'allégresse sans compter que cela fonctionne très bien et répond parfaitement à question.
ou
merci à toi Ô sublime aidant votre connaissance en la matière esttous ce qui a de plus grand et n'a d'égal que le sommet de la pyramide de Khéops .
ou
merci d'avoir bien du haut de votre estrades de connaissance, d'avoir bien voulu prêter attention à problème indigne d'une personne tel que vous. mais je crois qu'un simple merci est plus approprié. :)
anomymousA
bon, je ne t'en demandais pas ta,t, mais je reconnais que tu as raté ta vocation de flatteur en chef.
Cordialement
A+
bon ok d'abord
merci à toi cher anonymousA pour ta suberbe réponce qui me comble de joi et d'allégresse sans compter que cela fonctionne très bien et répond parfaitement à question.
ou
merci à toi Ô sublime aidant votre connaissance en la matière esttous ce qui a de plus grand et n'a d'égal que le sommet de la pyramide de Khéops .
ou
merci d'avoir bien du haut de votre estrades de connaissance, d'avoir bien voulu prêter attention à problème indigne d'une personne tel que vous. mais je crois qu'un simple merci est plus approprié. :)
bon, je ne t'en demandais pas ta,t, mais je reconnais que tu as raté ta
vocation de flatteur en chef.
Cordialement
A+
bon ok d'abord
merci à toi cher anonymousA pour ta suberbe réponce qui me comble de
joi et
d'allégresse sans compter que cela fonctionne très bien et répond
parfaitement à
question.
ou
merci à toi Ô sublime aidant votre connaissance en la matière
esttous ce qui a de plus
grand et n'a d'égal que le sommet de la pyramide de Khéops .
ou
merci d'avoir bien du haut de votre estrades de connaissance, d'avoir
bien voulu prêter
attention à problème indigne d'une personne tel que vous.
mais je crois qu'un simple merci est plus approprié.
:)
bon, je ne t'en demandais pas ta,t, mais je reconnais que tu as raté ta vocation de flatteur en chef.
Cordialement
A+
bon ok d'abord
merci à toi cher anonymousA pour ta suberbe réponce qui me comble de joi et d'allégresse sans compter que cela fonctionne très bien et répond parfaitement à question.
ou
merci à toi Ô sublime aidant votre connaissance en la matière esttous ce qui a de plus grand et n'a d'égal que le sommet de la pyramide de Khéops .
ou
merci d'avoir bien du haut de votre estrades de connaissance, d'avoir bien voulu prêter attention à problème indigne d'une personne tel que vous. mais je crois qu'un simple merci est plus approprié. :)
