OVH Cloud OVH Cloud

Range

6 réponses
Avatar
DENIS
Bonjour à tous,

question très bête mais je ne trouve pas.
Impossible de faire tenir en une seule ligne énormément d'arguments pour
cette sélection Range, ca finit par bloquer. Je veux alors la scinder en
plusieurs lignes mais je n'y arrive pas. J'ai essayé ,G143:BP148" _ (puis
continuer à la ligne la suite de la sélection mais ce ne fonctionne pas.
Comment fait -on ?
si à la fin de la 1ère ligne je termine par ,G143:BP148" _
comment doit commencer la 2ème ligne ? : "G150:BP155,G157:BP162, etc....
Range("G150:BP155,G157:BP162, ??
_ "G150:BP155,G157:BP162, ???


With
Sheets("calendrier").Range("G13:BP18,G20:BP25,G27:BP32,G34:BP39,G41:BP46,G48:BP53,G55:BP60,G62:BP67,G71:BP76,G78:BP83,G85:BP90,G92:BP97,G99:BP104,G106:BP111,G113:BP118,G120:BP125,G129:BP134,G136:BP141,G143:BP148")

Merci
Denis

6 réponses

Avatar
Nicolas B.
Salut,

Pour scinder une chaine de caractères en plusieurs lignes, il faut
utiliser le symbole de concaténation :

msgbox "La chaine de " _
& "caractères très " _
& "très longue"

Ces lignes sont strictement équivalentes à celle-ci :
msgbox "La chaine de " & "caractères très " & "très longue"

Qu'on peut bien sûr simplifier comme ça :
msgbox "La chaine de caractères très très longue"


A+
Nicolas B.

Bonjour à tous,

question très bête mais je ne trouve pas.
Impossible de faire tenir en une seule ligne énormément d'arguments pour
cette sélection Range, ca finit par bloquer. Je veux alors la scinder en
plusieurs lignes mais je n'y arrive pas. J'ai essayé ,G143:BP148" _ (puis
continuer à la ligne la suite de la sélection mais ce ne fonctionne pas.
Comment fait -on ?
si à la fin de la 1ère ligne je termine par ,G143:BP148" _
comment doit commencer la 2ème ligne ? : "G150:BP155,G157:BP162, etc....
Range("G150:BP155,G157:BP162, ??
_ "G150:BP155,G157:BP162, ???


With
Sheets("calendrier").Range("G13:BP18,G20:BP25,G27:BP32,G34:BP39,G41:BP46,G48:BP53,G55:BP60,G62:BP67,G71:BP76,G78:BP83,G85:BP90,G92:BP97,G99:BP104,G106:BP111,G113:BP118,G120:BP125,G129:BP134,G136:BP141,G143:BP148")

Merci
Denis


Avatar
DENIS
Salut,

J'ai fait ceci pour réduire la taille de l'instruction mais ca ne fonctionne
pas.

Sub Macro1()

Range("E2:H8,E11:H13" _
& "E16:H18,E21:H26" _
& "E28:H31,E34:H37" _
& "E40:H43,E46:H48").Select

End Sub

Alors pourquoi cela ne fonctionne t'il pas ?



Salut,

Pour scinder une chaine de caractères en plusieurs lignes, il faut
utiliser le symbole de concaténation :

msgbox "La chaine de " _
& "caractères très " _
& "très longue"

Ces lignes sont strictement équivalentes à celle-ci :
msgbox "La chaine de " & "caractères très " & "très longue"

Qu'on peut bien sûr simplifier comme ça :
msgbox "La chaine de caractères très très longue"


A+
Nicolas B.

Bonjour à tous,

question très bête mais je ne trouve pas.
Impossible de faire tenir en une seule ligne énormément d'arguments pour
cette sélection Range, ca finit par bloquer. Je veux alors la scinder en
plusieurs lignes mais je n'y arrive pas. J'ai essayé ,G143:BP148" _ (puis
continuer à la ligne la suite de la sélection mais ce ne fonctionne pas.
Comment fait -on ?
si à la fin de la 1ère ligne je termine par ,G143:BP148" _
comment doit commencer la 2ème ligne ? : "G150:BP155,G157:BP162, etc....
Range("G150:BP155,G157:BP162, ??
_ "G150:BP155,G157:BP162, ???


With
Sheets("calendrier").Range("G13:BP18,G20:BP25,G27:BP32,G34:BP39,G41:BP46,G48:BP53,G55:BP60,G62:BP67,G71:BP76,G78:BP83,G85:BP90,G92:BP97,G99:BP104,G106:BP111,G113:BP118,G120:BP125,G129:BP134,G136:BP141,G143:BP148")

Merci
Denis





Avatar
anonymousA
bonjour,

la syntaxe pose déjà problème avant même de se préoccuper des
underscores (_)

Range("E2:H8,E11:H13,E16:H18,E21:H26,E28:H31,E34:H37,E40:H43,E46:H48") _
.Select

ou

Union(Range("E2:H8"), Range("E11:H13"), Range("E16:H18"), _
Range("E21:H26"), Range("E28:H31"), Range("E34:H37"), _
Range("E40:H43"), Range("E46:H48")).Select

A+


Salut,

J'ai fait ceci pour réduire la taille de l'instruction mais ca ne fonctionne
pas.

Sub Macro1()

Range("E2:H8,E11:H13" _
& "E16:H18,E21:H26" _
& "E28:H31,E34:H37" _
& "E40:H43,E46:H48").Select

End Sub

Alors pourquoi cela ne fonctionne t'il pas ?




Salut,

Pour scinder une chaine de caractères en plusieurs lignes, il faut
utiliser le symbole de concaténation :

msgbox "La chaine de " _
& "caractères très " _
& "très longue"

Ces lignes sont strictement équivalentes à celle-ci :
msgbox "La chaine de " & "caractères très " & "très longue"

Qu'on peut bien sûr simplifier comme ça :
msgbox "La chaine de caractères très très longue"


A+
Nicolas B.


Bonjour à tous,

question très bête mais je ne trouve pas.
Impossible de faire tenir en une seule ligne énormément d'arguments pour
cette sélection Range, ca finit par bloquer. Je veux alors la scinder en
plusieurs lignes mais je n'y arrive pas. J'ai essayé ,G143:BP148" _ (puis
continuer à la ligne la suite de la sélection mais ce ne fonctionne pas.
Comment fait -on ?
si à la fin de la 1ère ligne je termine par ,G143:BP148" _
comment doit commencer la 2ème ligne ? : "G150:BP155,G157:BP162, etc....
Range("G150:BP155,G157:BP162, ??
_ "G150:BP155,G157:BP162, ???


With
Sheets("calendrier").Range("G13:BP18,G20:BP25,G27:BP32,G34:BP39,G41:BP46,G48:BP53,G55:BP60,G62:BP67,G71:BP76,G78:BP83,G85:BP90,G92:BP97,G99:BP104,G106:BP111,G113:BP118,G120:BP125,G129:BP134,G136:BP141,G143:BP148")

Merci
Denis







Avatar
anonymousA
ou à la AV

[E2:H8,E11:H13,E16:H18,E21:H26,E28:H31,E34:H37,E40:H43,E46:H48].Select

A+


bonjour,

la syntaxe pose déjà problème avant même de se préoccuper des
underscores (_)

Range("E2:H8,E11:H13,E16:H18,E21:H26,E28:H31,E34:H37,E40:H43,E46:H48") _
.Select

ou

Union(Range("E2:H8"), Range("E11:H13"), Range("E16:H18"), _
Range("E21:H26"), Range("E28:H31"), Range("E34:H37"), _
Range("E40:H43"), Range("E46:H48")).Select

A+



Salut,

J'ai fait ceci pour réduire la taille de l'instruction mais ca ne
fonctionne pas.

Sub Macro1()

Range("E2:H8,E11:H13" _
& "E16:H18,E21:H26" _
& "E28:H31,E34:H37" _
& "E40:H43,E46:H48").Select

End Sub

Alors pourquoi cela ne fonctionne t'il pas ?




Salut,

Pour scinder une chaine de caractères en plusieurs lignes, il faut
utiliser le symbole de concaténation :

msgbox "La chaine de " _
& "caractères très " _
& "très longue"

Ces lignes sont strictement équivalentes à celle-ci :
msgbox "La chaine de " & "caractères très " & "très longue"

Qu'on peut bien sûr simplifier comme ça :
msgbox "La chaine de caractères très très longue"


A+
Nicolas B.


Bonjour à tous,

question très bête mais je ne trouve pas.
Impossible de faire tenir en une seule ligne énormément d'arguments
pour cette sélection Range, ca finit par bloquer. Je veux alors la
scinder en plusieurs lignes mais je n'y arrive pas. J'ai essayé
,G143:BP148" _ (puis continuer à la ligne la suite de la sélection
mais ce ne fonctionne pas. Comment fait -on ?
si à la fin de la 1ère ligne je termine par ,G143:BP148" _
comment doit commencer la 2ème ligne ? : "G150:BP155,G157:BP162,
etc....
Range("G150:BP155,G157:BP162, ??
_ "G150:BP155,G157:BP162, ???


With
Sheets("calendrier").Range("G13:BP18,G20:BP25,G27:BP32,G34:BP39,G41:BP46,G48:BP53,G55:BP60,G62:BP67,G71:BP76,G78:BP83,G85:BP90,G92:BP97,G99:BP104,G106:BP111,G113:BP118,G120:BP125,G129:BP134,G136:BP141,G143:BP148")


Merci
Denis










Avatar
michdenis
Bonjour Denis,

Cette syntaxe fonctionne : tu y était presque !

Range("E2:H8,E11:H13," & _
"E16:H18,E21:H26," & _
"E28:H31,E34:H37," & _
"E40:H43,E46:H48").Select


Salutations!




"DENIS" a écrit dans le message de news:
Salut,

J'ai fait ceci pour réduire la taille de l'instruction mais ca ne fonctionne
pas.

Sub Macro1()

Range("E2:H8,E11:H13" _
& "E16:H18,E21:H26" _
& "E28:H31,E34:H37" _
& "E40:H43,E46:H48").Select

End Sub

Alors pourquoi cela ne fonctionne t'il pas ?



Salut,

Pour scinder une chaine de caractères en plusieurs lignes, il faut
utiliser le symbole de concaténation :

msgbox "La chaine de " _
& "caractères très " _
& "très longue"

Ces lignes sont strictement équivalentes à celle-ci :
msgbox "La chaine de " & "caractères très " & "très longue"

Qu'on peut bien sûr simplifier comme ça :
msgbox "La chaine de caractères très très longue"


A+
Nicolas B.

Bonjour à tous,

question très bête mais je ne trouve pas.
Impossible de faire tenir en une seule ligne énormément d'arguments pour
cette sélection Range, ca finit par bloquer. Je veux alors la scinder en
plusieurs lignes mais je n'y arrive pas. J'ai essayé ,G143:BP148" _ (puis
continuer à la ligne la suite de la sélection mais ce ne fonctionne pas.
Comment fait -on ?
si à la fin de la 1ère ligne je termine par ,G143:BP148" _
comment doit commencer la 2ème ligne ? : "G150:BP155,G157:BP162, etc....
Range("G150:BP155,G157:BP162, ??
_ "G150:BP155,G157:BP162, ???


With
Sheets("calendrier").Range("G13:BP18,G20:BP25,G27:BP32,G34:BP39,G41:BP46,G48:BP53,G55:BP60,G62:BP67,G71:BP76,G78:BP83,G85:BP90,G92:BP97,G99:BP104,G106:BP111,G113:BP118,G120:BP125,G129:BP134,G136:BP141,G143:BP148")

Merci
Denis





Avatar
DENIS
Merci !

Cette dernière me va à merveille.

Merci encore
Denis


Bonjour Denis,

Cette syntaxe fonctionne : tu y était presque !

Range("E2:H8,E11:H13," & _
"E16:H18,E21:H26," & _
"E28:H31,E34:H37," & _
"E40:H43,E46:H48").Select


Salutations!




"DENIS" a écrit dans le message de news:
Salut,

J'ai fait ceci pour réduire la taille de l'instruction mais ca ne fonctionne
pas.

Sub Macro1()

Range("E2:H8,E11:H13" _
& "E16:H18,E21:H26" _
& "E28:H31,E34:H37" _
& "E40:H43,E46:H48").Select

End Sub

Alors pourquoi cela ne fonctionne t'il pas ?



Salut,

Pour scinder une chaine de caractères en plusieurs lignes, il faut
utiliser le symbole de concaténation :

msgbox "La chaine de " _
& "caractères très " _
& "très longue"

Ces lignes sont strictement équivalentes à celle-ci :
msgbox "La chaine de " & "caractères très " & "très longue"

Qu'on peut bien sûr simplifier comme ça :
msgbox "La chaine de caractères très très longue"


A+
Nicolas B.

Bonjour à tous,

question très bête mais je ne trouve pas.
Impossible de faire tenir en une seule ligne énormément d'arguments pour
cette sélection Range, ca finit par bloquer. Je veux alors la scinder en
plusieurs lignes mais je n'y arrive pas. J'ai essayé ,G143:BP148" _ (puis
continuer à la ligne la suite de la sélection mais ce ne fonctionne pas.
Comment fait -on ?
si à la fin de la 1ère ligne je termine par ,G143:BP148" _
comment doit commencer la 2ème ligne ? : "G150:BP155,G157:BP162, etc....
Range("G150:BP155,G157:BP162, ??
_ "G150:BP155,G157:BP162, ???


With
Sheets("calendrier").Range("G13:BP18,G20:BP25,G27:BP32,G34:BP39,G41:BP46,G48:BP53,G55:BP60,G62:BP67,G71:BP76,G78:BP83,G85:BP90,G92:BP97,G99:BP104,G106:BP111,G113:BP118,G120:BP125,G129:BP134,G136:BP141,G143:BP148")

Merci
Denis