Discussion :

[pajude]

Bonjour,
Je voudrais faire un retour à la ligne à chaque changement de lettre de cette instruction, et je galère, j'ai bien mis un espace suvi d'un _ , mais rien n'y fait.

Range ("B8:B12,B16:B20,B24:B28,B32:B36,B40:B44,B48:B52,B56:B60,B64:B68,B72:B76,G8:G12,G16:G20,G24:G28,G32:G36,G40:G44,G48:G52,G56:G60,G64:G68,G72:G76,M8:M12,M16:M20,M24:M28,M32:M36,M40:M44,M48:M52,M56:M60,M64:M68,M72:M76,R8:R12,R16:R20,R24:R28,R32:R36,R40:R44,R48:R52,R56:R60,R64:R68,R72:R76").Select

Merci de votre aide.
Cdt,
Pajude

[patricktoulon]

re

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
addresse="B8:B12,B16:B20,B24:B28,B32:B36,B40:B44,B48:B52,B56:B60,B64:B68,B72:B76,G8:G12,G16:G20,G24:G28,G32:G36,G40:G44,G48:G52,G56:G60,"
addresse=addresse=&"G64:G68,G72:G76,M8:M12M16:M20,M24:M28,M32:M36,M40:M44,M48:M52,M56:M60,M64:M68,M72:M76,R8:R12,R16:R20,R24:R28,"
addresse=addresse=&"R32:R36,R40:R44,R48:R52,R56:R60,R64:R68,R72:R76"
range(addresse).select

[Marc-L]

Bonjour,

il faut juste fermer les guillemets puis utiliser l'opérateur de concaténation avant l'underscore
puis à la ligne suivante commencer évidemment par ouvrir de nouveau les guillemets …

_________________________________________________________________________________________________________

Je suis Paris, Nice, Bruxelles, Charlie, …

[pajude]

re

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
addresse="B8:B12,B16:B20,B24:B28,B32:B36,B40:B44,B48:B52,B56:B60,B64:B68,B72:B76,G8:G12,G16:G20,G24:G28,G32:G36,G40:G44,G48:G52,G56:G60,"
addresse=addresse=&"G64:G68,G72:G76,M8:M12M16:M20,M24:M28,M32:M36,M40:M44,M48:M52,M56:M60,M64:M68,M72:M76,R8:R12,R16:R20,R24:R28,"
addresse=addresse=&"R32:R36,R40:R44,R48:R52,R56:R60,R64:R68,R72:R76"
range(addresse).select

J'ai copié et collé, mais la 2ème et 3ème ligne reste en rouge et j'ai l'erreur de compiltaion, erreur de syntaxe.

Bonjour,

il faut juste fermer les guillemets puis utiliser l'opérateur de concaténation avant l'underscore
puis à la ligne suivante commencer évidemment par ouvrir de nouveau les guillemets …

_________________________________________________________________________________________________________

Je suis Paris, Nice, Bruxelles, Charlie, …

N'étant pas du tout un pro de vba, je ne comprends pas ce qu'il faut faire.
Merci

[patricktoulon]

autant pour moi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
addresse = "B8:B12,B16:B20,B24:B28,B32:B36,B40:B44,B48:B52,B56:B60,B64:B68,B72:B76,G8:G12,G16:G20,G24:G28,G32:G36,G40:G44,G48:G52,G56:G60,"
addresse = addresse & "G64:G68,G72:G76,M8:M12M16:M20,M24:M28,M32:M36,M40:M44,M48:M52,M56:M60,M64:M68,M72:M76,R8:R12,R16:R20,R24:R28,"
addresse = addresse & "R32:R36,R40:R44,R48:R52,R56:R60,R64:R68,R72:R76"
Range(addresse).Select

[Patrice740]

Bonjour,

Ou encore :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Range("B8:B12,B16:B20,B24:B28,B32:B36,B40:B44,B48:B52,B56:B60,B64:B68,B72:B76," & _
      "G8:G12,G16:G20,G24:G28,G32:G36,G40:G44,G48:G52,G56:G60,G64:G68,G72:G76," & _
      "M8:M12,M16:M20,M24:M28,M32:M36,M40:M44,M48:M52,M56:M60,M64:M68,M72:M76," & _
      "R8:R12,R16:R20,R24:R28,R32:R36,R40:R44,R48:R52,R56:R60,R64:R68,R72:R76 ").Select

[pajude]

autant pour moi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
addresse = "B8:B12,B16:B20,B24:B28,B32:B36,B40:B44,B48:B52,B56:B60,B64:B68,B72:B76,G8:G12,G16:G20,G24:G28,G32:G36,G40:G44,G48:G52,G56:G60,"
addresse = addresse & "G64:G68,G72:G76,M8:M12M16:M20,M24:M28,M32:M36,M40:M44,M48:M52,M56:M60,M64:M68,M72:M76,R8:R12,R16:R20,R24:R28,"
addresse = addresse & "R32:R36,R40:R44,R48:R52,R56:R60,R64:R68,R72:R76"
Range(addresse).Select

J'ai le message d'erreur : Erreur d'exécution 1004 : La méthode 'Range' de l'objet_Global a échoué

Bonjour,

Ou encore :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Range("B8:B12,B16:B20,B24:B28,B32:B36,B40:B44,B48:B52,B56:B60,B64:B68,B72:B76," & _
      "G8:G12,G16:G20,G24:G28,G32:G36,G40:G44,G48:G52,G56:G60,G64:G68,G72:G76," & _
      "M8:M12,M16:M20,M24:M28,M32:M36,M40:M44,M48:M52,M56:M60,M64:M68,M72:M76," & _
      "R8:R12,R16:R20,R24:R28,R32:R36,R40:R44,R48:R52,R56:R60,R64:R68,R72:R76 ").Select

J'ai le même message d'erreur que Patricktoulon
Erreur d'exécution 1004 : La méthode 'Range' de l'objet_Global a échoué

PS : si j'enlève la ligne M, ça fonctionne,

J'ai testé à nouveau, en fait, ça ne fonctionne qu'avec 3 lignes