Ligne trop longue

Lone-wolf

XLDnaute Barbatruc

• 2 Avril 2017

• #2

Bonjour kadelmalin 🙂

Tu veux faire quoi au juste avec toutes ces cellules, par-ce que écrit comme ça ce n'est pas bon du tout.

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 2 Avril 2017

• #3

Salut tous,

Une solution :

VB:

Sheets("GTS1").Range("AF71:AR72,AF74:AR75,AE77:AS78," & _
"U88:X89,AC88:AG89,AT88:AX89,BB88:BE89,G91:Q92,U91:AE92," & _
"AM91:AW92,BA91:BK92,U107:X108,AC107:AG108,AT107:AX108," & _
"BB107:BE108,G110:Q111,U110:AE111,AM110:AW111,BA110:BK111").Select

Une autre,

VB:

p1 = "AF71:AR72,AF74:AR75,AE77:AS78,U88:X89,AC88:AG89,AT88:AX89,BB88:BE89,"
p2 = "G91:Q92,U91:AE92,AM91:AW92,BA91:BK92,U107:X108,AC107:AG108,AT107:AX108,"
p3 = "BB107:BE108,G110:Q111,U110:AE111,AM110:AW111,BA110:BK111"
Sheets("GTS1").Range(p1 & p2 & p3).Select

Mais je rejoins la question de lone qui est : quel est l'intéret ? + le .select, ça devrait être banni ^^

 

Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc

• 2 Avril 2017

• #4

Bonjour,

Je pense qu'il n'est pas possible de couper un même "texte" (suite de caractères entre deux guillemets), donc il faut couper ce texte en plusieurs morceaux.

Sheets("GTS1").Range("AF71:AR72,AF74:AR75,AE77:AS78,U88:X89,AC88:AG89,AT88:AX89," _
& "BB88:BE89,G91:Q92,U91:AE92,AM91:AW92,BA91:BK92,U107:X108,AC107:AG108,AT107:AX108," _
& "BB107:BE108,G110:Q111,U110:AE111,AM110:AW111,BA110:BK111").Select

 

Vote positif 0 Vote négatif

kadelmalin

XLDnaute Occasionnel

• 2 Avril 2017

• #5

Merci pour vos réponses, Maitres. C'est pour la commande : Selection.ClearContents

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 2 Avril 2017

• #6

Ah,
Et bien tu peux mettre directement :
Sheets("toto").Range("titi").Clearcontents

Ca t evitera une ligne de commande

 

Vote positif 0 Vote négatif

kadelmalin

XLDnaute Occasionnel

• 2 Avril 2017

• #7

Ce sont des plages de cellules non contigües que je voulais réinitialiser. J' ai essayé le "ClearContents" sans le select mais ça n'a pas marché.

 

Vote positif 0 Vote négatif

H

Hieu

XLDnaute Impliqué

• 2 Avril 2017

• #8

Ça m'étonne...
Envoie nous ta ligne de commande ?

 

Vote positif 0 Vote négatif